问答题
注意：下面出现的“考生文件夹”均为c：/wexam/25160001。
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1) 在名称为Form1的窗体上添加一个计时器控件，名称为Timer1。请利用“属性”窗口设置适当属性，使得在运行时可以每隔1秒，调用计时器的Timer事件过程一次。另外，请把窗体的标题设置为“题目2”。设计阶段的窗体如图18-1所示。
注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。
(2) 在名称为Form1的窗体上画一个文本框，名称为Text1，无初始内容；再画一个图片框，名称为 P1。请编写Text1的Chang事件过程，不能使用任何变量，使得运行时，在文本框中每输入一个字符，就在图片框中输出一行文本框中的完整内容。程序运行界面如图18-2所示。
注意：保存时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
【正确答案】
【答案解析】[解析]
时钟控件的Interval属性，表示两个计时器事件之间的时间间隔，其值以ms(0.001s)为单位，题目要求每1秒产生一个计时器事件，那么Interval属性应该设置为1000；窗体的标题由窗体的Caption属性设置。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表18-1。
表 18-1
第二步：调试并运行程序。
第三步：按题目要求存盘。
(2) [解析] 当用户向文本框中输入新信息，或当程序把Text属性设置为新值从而改变文本框的Text属性时，将触发 Change事件。程序运行后，在文本框中每键入一个字符，就会引发一次Change事件。
在图片框中显示打印信息应使用Print方法，其形式为：
[对象.] Print要显示的内容。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表18-2。
表 18-2
第二步：编写程序代码。
参考代码：
Option Explicit
Private Sub Text1 Change()
P1.Print Text1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表18-1。
表 18-1
|
标 题 |
属 性 |
设 置 值 |
| 窗体 | Caption | 题目 2 |
| 时钟控件 | Name Interval |
Timer1 1000 |
第三步：按题目要求存盘。
(2) [解析] 当用户向文本框中输入新信息，或当程序把Text属性设置为新值从而改变文本框的Text属性时，将触发 Change事件。程序运行后，在文本框中每键入一个字符，就会引发一次Change事件。
在图片框中显示打印信息应使用Print方法，其形式为：
[对象.] Print要显示的内容。解题步骤：
第一步：建立界面并设置控件属性。程序用到的控件及其属性见表18-2。
表 18-2
|
控 件 |
属 性 |
设 置 值 |
| 图片框 | Name | P1 |
| 文本框 | Name | Text1 |
参考代码：
Option Explicit
Private Sub Text1 Change()
P1.Print Text1.Text
End Sub
第三步：调试并运行程序。
第四步：按题目要求存盘。