谁看的懂下面的这段程序的,麻烦帮我解释下,ret.MoveFirst ret.Find "name ='" & Combo1.Text & "'" pt = ret("password") pa = pt If txtPassword = pa Then 'frmSplash.show LoginSucceeded = True Me.Hide frmMain.Show Unload Me Else MsgBox "

来源：学生作业帮助网编辑：作业帮时间：2024/05/01 11:53:42

谁看的懂下面的这段程序的,麻烦帮我解释下,ret.MoveFirst ret.Find "name ='" & Combo1.Text & "'" pt = ret("password") pa = pt If txtPassword = pa Then 'frmSplash.show LoginSucceeded = True Me.Hide frmMain.Show Unload Me Else MsgBox "
谁看的懂下面的这段程序的,麻烦帮我解释下,
ret.MoveFirst ret.Find "name ='" & Combo1.Text & "'" pt = ret("password") pa = pt If txtPassword = pa Then 'frmSplash.show LoginSucceeded = True Me.Hide frmMain.Show Unload Me Else MsgBox "无效的密码,请重试!",,"登录" LOGINNO = LOGINNO + 1 If LOGINNO > 2 Then MsgBox "对不起,您不能使用该系统!",64,"登录失败" Unload Me Unload frmLogin Exit Sub End If txtPassword.SetFocus SendKeys "{Home}+{End}" End If End Sub Private Sub cmdCancel_Click() '设置全局变量为 false '不提示失败的登录 LoginSucceeded = False Me.Hide Unload Me End Sub

谁看的懂下面的这段程序的,麻烦帮我解释下,ret.MoveFirst ret.Find "name ='" & Combo1.Text & "'" pt = ret("password") pa = pt If txtPassword = pa Then 'frmSplash.show LoginSucceeded = True Me.Hide frmMain.Show Unload Me Else MsgBox "
ret.MoveFirst'游标指向数据表中第一条记录 ret.Find "name ='" & Combo1.Text & "'"'查找name = combo1内容的记录 pt = ret("password")'取对应的密码值 pa = pt If txtPassword = pa Then'判断密码是否是txtPassword的值 'frmSplash.show LoginSucceeded = True'是则成功标志置1 Me.Hide'隐藏当前登陆窗口 frmMain.Show'显示主窗体 Unload Me'卸载当前登陆窗口 Else MsgBox "无效的密码,请重试!",,"登录" LOGINNO = LOGINNO + 1'错误次数加1 If LOGINNO > 2 Then'累积2次退出系统 MsgBox "对不起,您不能使用该系统!",64,"登录失败" Unload Me'卸载当前窗体 Unload frmLogin Exit Sub End If txtPassword.SetFocus'输入光标移至txtPassword中方便输入 SendKeys "{Home}+{End}"'移到文本末尾 End If End Sub Private Sub cmdCancel_Click() '设置全局变量为 false '不提示失败的登录 LoginSucceeded = False Me.Hide Unload Me

谁看的懂下面的这段程序的,麻烦帮我解释下,ret.MoveFirst ret.Find name =' & Combo1.Text & ' pt = ret(password) pa = pt If txtPassword = pa Then 'frmSplash.show LoginSucceeded = True Me.Hide frmMain.Show Unload Me Else MsgBox 帮我解释下下面这段代码的意思帮我解释下下面的电路有会越南语的吗,麻烦帮我看下下面这段话的意思. 麻烦帮我看下颜色特征的英文是什么意思帮我解释下下面英文的意思如图您好,谢谢你帮我翻译的这段文字,还有点材料麻烦你帮我翻译下可以吗》? 有关古代印章的文字图片在相册麻烦懂的帮我看下谁帮我解释下非主流的意思啊?/ 麻烦具体点哈谁麻烦帮我看下篆书的几个字谢谢麻烦帮我把下面这段句子翻成英文~谢谢你让我懂泪的重量证明了爱情它总是善良懂程序的朋友帮组我看下这个是什么意识,会者不难难者不会啊. 十万火急!急求VB高手帮我做一下这倒程序改错题,每个FOUND的下一行都有错误,请改正!'【程序改错】'------------------------------------------------'题目：以下程序段用于输出100-300的所有素数'------------ 麻烦懂波斯语的人帮我看一下, 麻烦帮我看一下,不要看我写的. matlab--哪位帮我把下面的程序运行下!求了!麻烦把得到的图贴上来!如果有错的话麻烦修改下……可以用百度HI呼叫我!我在!我这里在网吧,没有程序啊……哭死了E=10 C=10*10^-6 R=2000 %输入电压E,电帮我看一下下面的卦麻烦有哪位大神帮我解决下,下面的数学题,用简便法计算!