参考答案:
[操作步骤]步骤A:打开本题工程文件,将文本框TextA的PasswordChar属性设置为“*”。步骤B:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容。(阴影部分是需考生填入的内容)PrivateSubCl_Click()IfTextA.Text="ABCDEF"Then’输入的口令与正确的口令相比较TextA.Text="口今正确"TextA.Passwordchar=""ElseTextB.Text=TextB.Text-A’当密码错误时TextB中的数减AIfTextB.Text>0ThenMsgBox"第"&(C-TextB.Text)&"次口令错误,请重新输入"ElseMsgBox"C次输入错误,请退出"TextA.Enabled=False’当TextA的Enabled属性为false时则文本不能输入EndIfEndIfEndSub步骤C:调试并运行程序,关闭程序后按题目要求存盘。