问答题
在名称为Form1的窗体上添加一个名称为L1的标签，标题为“口令”；添加两个文本框，名称分别为Text1、Text2，初始内容为空；再添加三个命令按钮，名称分别为C1、C2、C3，标题分别为“显示口令”、“隐藏口令”、“复制口令”。在程序开始运行时，向Text1中输入的所有字符，都显示为“*”，单击“显示口令”按钮后，在Text1中显示所有字符，再单击“隐藏口令”按钮后，Text1中的字符不变，但显示的都是“?”，单击“复制口令”后，把Text1中的实际内容复制到Text2中，如图所示。
要求：
①在属性窗口中，将窗体的标题改为“口令窗口”；
②建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。
注意：存盘时，工程文件名保存为sjt3.vbp，窗体文件名保存为sjt3.frm。
要求：
①在属性窗口中，将窗体的标题改为“口令窗口”；
②建立适当的事件过程，完成上述功能。每个过程中只允许写一条语句，且不能使用变量。
注意：存盘时，工程文件名保存为sjt3.vbp，窗体文件名保存为sjt3.frm。
【正确答案】[操作步骤]
步骤1：新建一个窗体，按照题目要求建立控件并设置相应的属性，程序中用到的控件及其属性见表26和表27。
表26
表27
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Private Sub Cl_Click()'显示口令
Text1.PasswordChar;""'清空Password Char的设置使密码显示
End Sub
Private Sub C2_Click() '隐藏口令
Text1.PasswordChar="?" '将PasswordChar设置为?则密码显示?
End Sub
Private Sub C3_Click() '复制口令
Text2.Text=Text1.Text
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
步骤1：新建一个窗体，按照题目要求建立控件并设置相应的属性，程序中用到的控件及其属性见表26和表27。
表26
| 控件 | 窗体 | 文本框1 | 文本框2 | |||
| 属性 | Caption | Name | Text | Password Char | Name | Text |
| 设置值 | 口令 窗口 | Text1 | * | Text2 | ||
| 控件 | 命令按钮1 | 命令按钮2 | 命令按钮3 | 标签 | ||||
| 属性 | Name | Caption | Name | Caption | Name | Caption | Name | Caption |
| 设置值 | C1 | 显示 口令 | C2 | 隐藏 口今 | C3 | 复制 口今 | L1 | 口令 |
参考答案
Private Sub Cl_Click()'显示口令
Text1.PasswordChar;""'清空Password Char的设置使密码显示
End Sub
Private Sub C2_Click() '隐藏口令
Text1.PasswordChar="?" '将PasswordChar设置为?则密码显示?
End Sub
Private Sub C3_Click() '复制口令
Text2.Text=Text1.Text
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
【答案解析】[考点] 本题考点有：命令按钮的Name和Caption属性，文本框的Name、Text和PasswordChar属性，窗体的Caption属性以及标签的Name和Caption属性。
PasswordChar属性用于屏蔽文本框中的内容，如果要去掉对文本框中输入内容的屏蔽，需将其PasswordChar属性值清空。
PasswordChar属性用于屏蔽文本框中的内容，如果要去掉对文本框中输入内容的屏蔽，需将其PasswordChar属性值清空。