我们不能从水泵样本上查到允许吸上真空高度Hs的数值。
参考答案:错
在窗体中有“用户名称”和“用户密码”两个文本框,名称分别为tUser和tPass,还有“确定”和“退出”两个命令按钮,名称分别为cmdEnter和cmdQuit。在tUser和tPass两个文本框中输入用户名称和用户密码后,单击“确定”按钮,程序将判断输入的值是否正确。如果输入的用户名称为cueb,用户密码为1234,则显示提示框,提示框标题为“欢迎”,显示内容为“密码输入正确,欢迎进入系统!”。提示框中只有一个“确定”按钮,当单击“确定”按钮后,关闭该窗体。如果输入不正确,则提示框显示内容为“密码错误!”,同时清除tUser和tPass两个文本框中的内容,并将光标置于tUser文本框中。当单击窗体上的“退出”按钮后,关闭当前窗体。窗体界面如右图所示。下面给出部分代码,请补充完整。
Private Sub cmdEnter_Click() Dim name As String, pass As String name=Nz(Me!tUser) pass=Nz(Me!tPass) ’******************* Add ******************* (13) ’******************* Add ******************* MsgBox "密码输入正确, 欢迎进入系统!", vbOKOnly+vbCritical, "欢迎" DoCmd.Close Else MsgBox "密码错误!", vbOKOnly ’显示消息框 Me!tUser="" ’使文本框清空 Me!tPass="" ’******************* Add ******************* (14) ’******************* Add ******************* End If End Sub Private Sub cmdQuit_Click() ’******************* Add ******************* (15) ’******************* Add ******************* End Sub
结合实际分析领导用人的心理误区。(至少列举五点)