2. 计算机
  3. 在考生文件夹下有一个工程文件sj5．vbp，其窗体上有4个标签Labell、Lable2、Label3和Label4，标题分别为“用户名”、“密码”、“剩余次数”和“5”；一个命令按钮Commandl、标题为“登录”；两个文本框名称分别为Textl和Tex

在考生文件夹下有一个工程文件sj5．vbp，其窗体上有4个标签Labell、Lable2、Label3和Label4，标题分别为“用户名”、“密码”、“剩余次数”和“5”；一个命令按钮Commandl、标题为“登录”；两个文本框名称分别为Textl和Tex

admin2009-08-26  50
问题 在考生文件夹下有一个工程文件sj5．vbp，其窗体上有4个标签Labell、Lable2、Label3和Label4，标题分别为“用户名”、“密码”、“剩余次数”和“5”；一个命令按钮Commandl、标题为“登录”；两个文本框名称分别为Textl和Text2，其中Textl用来输入用户名，Text2用来输入密码(输入时，显示“*”)，无初始内容。
    程序给出了Cornmandl的事件过程，但不完整，要求去掉程序中的注释符“’”，把程序中的“?”改为正确内容，使得在运行时，在Textl中输入用户名，Text2中输入密码后，单击“登录”按钮，如果输入的用户名和密码都是“abcd”时，则在Textl中显示“登录成功”；如果输入其他内容，单击“登录”后，弹出如图35—5所示的错误提示对话框，并且Label4中的数字减1。最多可输人5次口令，若5次都输入错误，则禁止再次输入。
    注意：不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘，运行结果如图35—5所示。
选项
答案在文本框里显示的内容通过Text属性设置，其格式为：文本框名．Text=显示的内容。要使文本框内容显示为“*”，需将PasswordChar属性设置为“*”。MsgBox函数的格式为： MsgBox提示[，按钮][，标题] 根据题意，将4个标签、两个文本框控件和一个命令按钮添加到窗体中，标签的名称分别为Labell、Label2、Label3和Label4，Caption属性分别为“用户名”、“密码”、“剩余次数”和“5”，文本框的名称分别为Textl和Text2、Caption属性都为空，Text2的Passwordchar属性为“*”，命令按钮的名称为Commandl，Caption属性为“登录”。补充后的具体代码如下： Private Sub Commandl Click() If Textl．Text="abcd"And Text2．Text="abcd"Then MsgBox("登录成功") Else MsgBox("登录失败") Label4．Caption=Val(Label4．Caption)-1 End If If Val(Label4．Caption)=0 Then Textl．Enabled=False Text2．Enabled=False Commandl．Enabled=False End If End Sub 单击[*]按钮运行程序，并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/fc1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)