在考生文件夹中有一个工程文件vbs5.vbp(相应的窗体文件为vbsj5.frm)。窗体Forml上有两个名称为Lab1和Lab2的标签,它们的标题分别为“密码”和“允许次数”;一个名称为Cmdl的命令按钮,其标题为“确定”;两个名称分别为Txt1和Txt

admin2016-03-22  28

问题 在考生文件夹中有一个工程文件vbs5.vbp(相应的窗体文件为vbsj5.frm)。窗体Forml上有两个名称为Lab1和Lab2的标签,它们的标题分别为“密码”和“允许次数”;一个名称为Cmdl的命令按钮,其标题为“确定”;两个名称分别为Txt1和Txt2的文本框。其中Txt1用来输入密码(输入时显示“*”),无初始内容,Txt2的初始内容为3。已给出了Cmdl的事件过程,但不完整,要求去掉程序中的注释符“*”,把程序中的问号“?”改为正确内容,使得在运行时,在Txt1中输入密码后,单击“确定”按钮,如果输入的是“123456”,则在Txt1中显示“密码正确”如图3.30所示;如果输入其他内容,单击“确定”后,弹出如图3-31所示的错误提示对话框,并且Txt2中的数字减1。最多可输入3次密码,若3次输入错误,则禁止再次输入。

程序源码:
PriVate  Sub Cmdl一Click()
    Txtl.Text=”密码正确”
    Else
    Txtt.Text=Txt2.Text一1
    MsgBox“第”&(3一Txt2.Text)&
    “次密码错误,请重新输入”
    Else
    MsgBox”3次输入错误,请退出”
    End If
End Sub

选项

答案【操作步骤】 步骤1:打开考生文件夹中的本题工程文件vbsJ5.vbp,将文本框。Txt1的PasswordChar属性值设置为“*”。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If Txt1.Text=“123456”Then Txt1.PasswordChar=“” If Txt2.Text>0 Then Txt1.Enabled=False 步骤3:按要求将文件保存至考生文件夹中

解析
转载请注明原文地址:https://kaotiyun.com/show/s0Lp777K
0

最新回复(0)