有一个VBA计算程序的功能如下:该程序用户界面由3个文本框和3个按钮组成,3个文本框的名称分别为Text1、Text2和Text3,3个按钮分别为清除(名为Command1) 、计算(名为 Command2) 和退出(名为Command3) 。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1和Text2两个文本框中输入的数值的和并将结果存放在Text3文本框中;单击退出按钮则退出。请将下列程序填空补充完整。
Private Sub Command1_Click(
第1题:
设计一个计时程序。该程序用户界面如图所示,由一个文本框(Text1)、两个按钮:命令按钮1(Command1)、命令按钮2(Command2)组成。程序运行后,单击开始按钮,则开始计时,文本框中显示秒数,单击停止按钮,则计时停止。单击窗口则退出。请在【 】、【 】和【 】处填入适当的内容,将程序补充完整。
Option Explicit
Dim i
Private Sub Command1_Click()
i=0
Timer1.Interval=1000
TimerEnabled=True
End Sub
Private Sub Command2_Click()
TimerEnabled=False
End Sub
Private Sub Form_Click()
【 】Me
End Sub
Private Sub Form_Load()
TimerEnabled=False
TextText=0
End Sub
Private Sub Timer1_【 】()
i=i+1
TextText=【 】
End Sub
第2题:
在考生文件夹下有一个工程文件execise59.vbp及窗体文件execise59.frm。在窗体上有两个命令按钮,名称分别为Cmd1和Cmd2,标题为“添加”和“清除”;一个文本框,名称为Text1,程序运行前,文本框的编辑区为空白;一个列表框,名称为List1。程序界面如下图所示。
在文本框中输入文本,若单击“添加”按钮,则将文本框中的文本作为列表框的一个列表项添加到列表框的末尾,且使“添加”按钮变为无效,“清除”按钮变为有效:若单击“清除”按钮,则使文本框中的内容为空,且使“添加”按钮变为有效,“清除”按钮变为无效。
要求:
去掉程序中的注释“'”,把程序中的问号“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。保存时,工程文件名仍为 execise59.vbp,窗体文件名仍为execise59.frm。
第3题:
设计一个简单的加法程序,程序界面设计如下图所示。设第一操作数、第二操作数和计算结果文本框的名称分别定义为txtFirstNum、txtSecondNum和txtSum,“计算”命令按钮的名称定义为cmdSum。
略
第4题:
设有如下通用过程:在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如 下事件过程:End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是( )。
A. 30
B. 25
C. 20
D. 15
第5题:
"在窗体上放入一个名称为Button1命令按钮和1个名称为TextBox1文本框,然后编写如下事件过程: 程序运行后,如果单击命令按钮,则在文本框中显示的内容是()
570
略