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