在表单form1中有三个文本框text1、text2、text3（它们的value初值均为"无"）和一个命令按钮command1，命令按钮的click事件代码如下：thisform.text3.value=thisform.text1.value-thisform.text2.value表单运行后，在text1、text2中分别输入{^2006/11/6}和4，然后单击command1，则text3显示（）。

A. 111222

B. -111

C. 222

D. 111-222

A. T+32

B. T32

C. t

D. 97

A. 0

B. 22

C. 50

D. 100

item（“123”）Thisform.list1.additem（“123”）Thisform.text1.value=””list1的interactivechange事件代码如下：Thisform.text1.value=Thisform.text1.value-Thisform.list1.value表单运行后，在list1中先选择456，再选择123，则text1显示的内容是（）。

A. 333.00

B. B.456123

C. C.123456

D. D.-333.00

窗体上有三个文本框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

在窗体上有两个命令按钮Command1和Commnd2，三个文本框Text1，Text2和Text3，有如下事件过程： Private Sub Comuand1_Click() Text3.Text= Text1.Text+Text2.Text End Sub Private Sub Command2_Click() Text3.Text= Text3.Text+Str(Val(Text1.Text)+Val (Text2.Text)) End Sub程序运行后，在Text1和Text2中分别输入123、456，然后依次单击Command1和Command2，则在Text3中显示的内容依次是______ 。

A．123456 579

B．123456 123456

C．579 579

D．579 123456

在窗体(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．空值

在名为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．出错

在窗体中建立三个文本框，名称分别为text1、text2和text3，还有一个名称为label1的标签，一个名称为command1的命令按钮，编写如下代码：

Private Sub Command1_Click( )

Dim x!, y!, z!, t!

x = Text1

y = Text2

z = Text3

If x< y Then

t = x

x = y

y = t

End If

If y< z Then

t = y

y = z

z = t

If x< y Then

t = x

x = y

y = t

End If

End If

Label1.Caption = x & "," & y & "," & z

End Sub

当在文本框text1、text2 和 text3 中分别输入5、3和8，则标签显示的结果为()

A.3,5,8

B.5,3,8

C.8,5,3

D.3.8.5

（ 27 ） 在窗体上画 3 个标签 、 3 个文本框 （ 名称分别为 Text1 、 Text2 和 Text3 ） 和 1 个命令按钮 （ 名称 为Command1 ），外观如图 4 所示。

编写下列程序：

Private Sub Form_Load( )

Text1.Text=" "

Text2.Text=" "

Text3.Text=" "

End Sub

Private Sub Command1_Click( )

x=Val(Text1.Text)

y=Val(Text2.Text)

Text3.Text=f(x,y)

End Sub

Function f(ByVal x As Integer,ByVal y As Integer)

Do While y<>0

tmp=x Mod y

x=y

y=tmp

Loop

f=x

End Function

运行程序 ， 在 Text1 文本框中输入 36 ， 在 Text2 文本框中输入 24 ， 然后单击命令按钮 ， 则在 Text 3

文本框中显示的内容是（ ）。

A ） 4

B ） 6

C ） 8

D ） 12