问答题
注意：下面出现的“”均为c：/wexam/25160001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框，名称为Text1：再画两个命令按钮，名称分别为C1和 C2，标题分别为“隐藏”和“显示”。请编写适当的事件过程，使得在运行时，如果单击“隐藏”按钮，则文本框消失，而如果单击“显示”按钮，则文本框显示出来，如图9-1和图9-2所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
(2)在窗体上画两个文本框，名称分别为Text1和Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在Text1中每输入一个字符，则显示一个“*”，同时在Text2中显示输入的内容，如图9-3所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个文本框，名称为Text1：再画两个命令按钮，名称分别为C1和 C2，标题分别为“隐藏”和“显示”。请编写适当的事件过程，使得在运行时，如果单击“隐藏”按钮，则文本框消失，而如果单击“显示”按钮，则文本框显示出来，如图9-1和图9-2所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
(2)在窗体上画两个文本框，名称分别为Text1和Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在Text1中每输入一个字符，则显示一个“*”，同时在Text2中显示输入的内容，如图9-3所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
【正确答案】[解析] 在窗体上建立好控件后，先设置控件属性，再编写事件过程。
命令按钮的标题由Caption属性设置，单击命令按钮触发Click事件；文本框的可见性由Visible属性设置。当Visible属性为True时，控件在运行时可见：当属性Visible为False时，在运行时不可见。解题步骤：
第一步：建立界面并没置控件属性。程序用到的控件及其属性见表9-1。
[*]
第二步：编写程序代码。
参考代码：
Private Sub C1_Click()
Textl.Visible = False
End Sub
Private Sub C2_Click()
Textl.Visible = True
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
(2)[解析] 在窗体上建立好控件后，先设置控件属性，再编写事件过程。
文本框的内容由其Text属性设置。文本框的PasswordChar属性可用于口令输入，在默认状态下，该属性被设置为空字符串(不是空格)。题目要求在Text1中输入字符的同时Text2中显示Text1中输入的内容，这要用到文本框的Change事件。当用户向文本框中输入新信息，或当程序吧Text属性设置为新值从而改变文本框的Text属性，将触发Change事件。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表9-2。
[*]
第二步：编写程序代码。
参考代码：
Private Sub Text1_Change()
Text2.Text=Text1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
答案考生文件夹
命令按钮的标题由Caption属性设置，单击命令按钮触发Click事件；文本框的可见性由Visible属性设置。当Visible属性为True时，控件在运行时可见：当属性Visible为False时，在运行时不可见。解题步骤：
第一步：建立界面并没置控件属性。程序用到的控件及其属性见表9-1。
[*]
第二步：编写程序代码。
参考代码：
Private Sub C1_Click()
Textl.Visible = False
End Sub
Private Sub C2_Click()
Textl.Visible = True
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
(2)[解析] 在窗体上建立好控件后，先设置控件属性，再编写事件过程。
文本框的内容由其Text属性设置。文本框的PasswordChar属性可用于口令输入，在默认状态下，该属性被设置为空字符串(不是空格)。题目要求在Text1中输入字符的同时Text2中显示Text1中输入的内容，这要用到文本框的Change事件。当用户向文本框中输入新信息，或当程序吧Text属性设置为新值从而改变文本框的Text属性，将触发Change事件。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表9-2。
[*]
第二步：编写程序代码。
参考代码：
Private Sub Text1_Change()
Text2.Text=Text1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
答案考生文件夹
【答案解析】