在名称为Form1的窗体上添加一个名称为Iabel1，标题为“口令”的标签；添加一个名称为Text1的文本框；再添加三个命令按钮，名称分别为Command1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。
程序运行时，在Text1中输入若干字符，单击“隐藏口令”按钮，则只显示与字符同样数量的“*”(如图2所示)；单击“显示口令”按钮，则正常显示输入的字符(如图1所示)，单击“重新输入”按钮，则清除Text1中的内容，并把光标定位到Text1中。
要求：请按要求添加所有控件，编写命令按钮的Click事件过程，程序中不得使用变量，在“显示口令”、“隐藏口令”按钮的事件过程中只能写1条语句。存盘时必须存放在考生文件夹下，工程文件名为sja.vbp, 窗体文件名为sjt2.frm.
参考答案：[操作步骤]
步骤A：新建一个窗体，按照题目要求建立标控件，程序中用到的控件及属性见表CD和表CE。
表CD
表CE 控件 文本框 命令按钮A 命令按钮B 属性 Name Text Name Caption Name Caption 设置值 TextA CommandA 显示口令 CommandB 隐藏口令
步骤B：打开代码编辑窗口，去掉程序中的注释符“’”，将问号改为正确的内容。 控件 命令按钮C 标签 属性 Name Caption Name Caption 设置值 CommandC 重新输入 LabelA 口今
参考答案：(阴影部分是需考生填入的内容)
Private Sub CommandA_Click()
TextA.PasswordChar="" ’当PasswordChar属性设置为空时,TextA文本框显示内容
End Sub
Private Sub CommandB_Click()
TextA.PasswordChar="*" ’当PasswordChar属性设置为*时,用*代替TextA文本框中的字符显示
End Sub
Private Sub CommandC_Click()
TextA=""’清空文本框
TextA.SetFocus ’TextA获得焦点
End Sub
步骤D：调试并运行程序，关闭程序后按题目要求存盘。
解析：[考点] 本题考点有：文本框的Name、Text和PasswordChar属性，命令按钮的Name和Caption属性，标签的Name和Caption属性以及文本框的SetFocus方法。
PasswordChar属性用来设置是否在控件中显示用户输入的字符。如果该属性设置为某一字符，那么无论Text属性值是什么，在文本框中都只显示该字符。另外，MultiLine属性必须设置为False。运用SetFocus方法使文本框获得焦点。