在名称为Form1的窗体中绘制一个名称为Label1的标签，其标题为空，BorderStyle属 性为1；再添加一个名称为Timer1的计时器。请设置适当的控件属性，并编写适当的事件过程，使得运行时，标签中的数字每隔1秒钟加2。程序运行效果如图1—1所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为Sj1．vbp，窗体文件名为Sj1．frm。

（1）在名称为Form1的窗体中画一个名称为Label1的标签，其标题为"0"，BorderStyle属性为1：再添加一个名称为Timer1的计时器。请设置适当的控件属性，并编写适当的事件过程，使得运行时，标签中的数字每隔1秒钟加2。程序运行效果如图8-1所示。

图8-1

注意：存盘时必须存放在考生文件夹下，工程文件名为sj1.vbp，窗体文件名为sj1.frm。

（2）在窗体上设置一个文本框，名称为Text1，再添加一个命令按钮，名称为Command1，标题为"当前时间/日期切换"；每次单击按钮时，Text1就显示出当前时间，再单击一次，Text1就显示当前日期。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图8-2所示。

图8-2

注意：要求考生在编写完程序后，把工程文件与窗体文件保存到考生文件夹下，文件名分别为sj2.vbp与sj2.frm。

注意：存盘时必须存放在考生文件夹下，工程文件名为sj1．vbp，窗体文件名为sj1．frm。

（2）在窗体上设置一个文本框，名称为Text1，再添加一个命令按钮，名称为Command1，标题为“当前时间／日期切换”；每次单击按钮时，Text1就显示出当前时间，再单击一次，Text1就显示当前日期。请编写相应的程序代码来完成这个功能。程序运行时的窗体界面如图61-2所示。

注意：要求考生在编写完程序后，把工程文件与窗体文件保存到考生文件夹下，文件名分别为sj2．vbp与sj2．frm。

注意：

程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 exeeise85.vbp，窗体文件名为execise85.tim。

在窗体上画一个文本框(名称为Textl)和一个标签(名称为Label1)，程序运行后，在文本框中每输入一个字符，都会立即在标签中显示文本框中字符的个数。以F可以实现上述操作的事件过程是（）

注意：存盘时必须存放在考生文件夹下，工程文件名为ylcl．vbp，窗体文件名为ylcl.frm。

在名为Foma1的窗体上绘制一个标签(名称为Lab1，标题为Input)、一个文本框(名称为Text1，Text属性为空白)和一个命令按钮(名称为Cmd1，标题为Display)。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入Visual Basic，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如下图所示。

注意：

要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为 execise69.vbp，窗体文件名为exeCise69.frm。

Private Sub Command1_Click（）

Sum = 0

For i = 0 To 4

Sum = Sum + ________

Next

________ = Sum

End Sub

注意：程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为sj1．vbp，窗体文件名为sj1．frm。

（2）在名为Form1的窗体上绘制一个标签（名称为Label1，标题为“输入”）、一个文本框（名称为Text1，Text属性为空白）和一个命令按钮（名称为Command1，标题为“显示”）。请编写命令按钮的Click事件过程，使程序运行后，在文本框中输入内容，然后单击命令按钮，则标签和文本框消失，并在窗体上显示文本框中的内容。运行后的窗体如图21-2和图21-3所示。

注意：要求程序中不得使用任何变量；文件必须存放在考生文件夹中，工程文件名为Sj2．vbp，窗体文件名为sj2．frm。