{^2006/11/6}4
2006/11/2
2006/11/64
{^2006/11/2}
第1题:
在名为Form1的窗体上添加三个文本框和一个命令按钮,其名称分别为Text1、Text2、Text3和Command1,然后编写如下两个事件过程: Private Sub Command1_Click() Text3=Textl+1Text2 End Sub private Sub Form1_Load() Text1="" Text2="" Text3="" End Sub 打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为( )。
A.57
B.12
C.5
D.出错
第2题:
有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,
则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1、Text2和Text3三个文
本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中:单击退出按钮则退出。
请将下列程序填空补充完整。
Private Sub Command1_Click()
Me!Text1=""
Me!Text2=""
Me!Text3=""
Me!Text4=""
End Sub
Pdvate Sub Command2_Click()
If Me!Text1="" Or Me!Text2="" Or Me!Text3=""then
MsgBox"成绩输入不全"
Else
Me!Text4=(【 】+Val(Me!Text2)+Val(Me!Text3))/3
【 】
End Sub
Private Sub Command3_Click()
Docmd. 【 】
End Sub
第3题:
在窗体中有两个文本框分别为 text1 和 text2 ,一个命令按钮 command1, 编写如下两个事件过程:
Private sub command1_click()
A=text1.value+text2.value
Msgbox a
End sub
Private sub form_load()
Text1.value= ””
Text2.value= ””
End sub
程序运行时,在文本框 text1 中 78 ,在文本框 text2 中输入 87 ,单击命令按钮,消息框中输出的结果为____ 11 ___
第4题:
使用下图,表单名为Form1,表单中有两个命令按钮(Commandl和Command2)、两个标签、两个文本框(Text1和Text2)。
如果在运行表单时,要使表单的标题显示“登录窗口”,则可以在Form1的Load事件中加入语句
A.THISFORM.CAPTION=“登录窗口”
B.FORM1.CAPTION=“登录窗口”
C.THISFORM.NAME=“登录窗口”
D.FORM1.NAME=“登录窗口”
第5题:
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Tem1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:
Private Sub Command1 Click()
Text3=Text1+Text2
End Sub
Private Sub Forml Load()
Text1=""
Text2=""
Text3=""
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
第6题:
在名为“Form1”的窗体上添加3个文本框和一个命令按钮,其名称分别为“Text1”、“Text2”、“Text3”和“Command1”,然后编写如下两个事件过程:
Private Sub Commandl Click()
Text3=Text1+Text2
End Sub
Private Sub Form1 Load()
Text1=" "
Text2=" "
Text3=" "
End Sub
打开窗体Form1后,在第一个文本框(Text1)和第二个文本框(Text2)中分别输入5和7,然后单击命令按钮Command1,则文本框(Text3)中显示的内容为【 】。
第7题:
窗体上有三个文本框Text1、Text2和Text3以及一个命令按钮Command1,设文本框Text1中内容为 12,文本框Text2中内容为34。下面程序的执行结果为______。Private Sub Command1_ Cilick() Text3.Text = Str$(Val(Text1.Text)) + Val(Text2.Text) Print val(Text3,Text)End Sub
A.12
B.34
C.46
D.1234
第8题:
在表单中有命令按钮Commandl和文本框Text1,将文本框的InputMask属性值设置为$9,999.9,然后在命令按钮的Click事件中输入代码ThisForm.Text1.Value=123456.789,当运行表单时,单击命令按钮,此时文本框中显示的内容为______。
A.$123456.789
B.$23456.7
C.123456.7
D.**,***.*
第9题:
下图窗体上有三个文本框Text1、Text2和Text3以及一个按钮Command1。为完成已知圆直径求圆周长和圆面积的功能,程序如下:
程序填空处应是______。
第10题:
在窗体(NAME属性为FORM1)上画三个文本框(其NAME属性分别为TEXT1、TEXT2和TEXT3)和一个命令按钮(NAME属性为COMMAND1),然后编写如下两个事件过程: PRIVATE SUB COMMAND1_CLICK( ) TEXT3=TEXT1+TEXT2 END SUB PRIVATE SUB FORM1_LOAD( ) TEXT1="" TEXT2="" TEXT3="" END SUB 程序运行后,在第一个文本框(TEXT1)和第二个文本框(TEXT2)中分别输入5和7,然后单击命令按钮,则文本框(TEXT3)中显示的内容为( )。
A.12
B.57
C.75
D.空值