123
456
579
123456
第1题:
在窗体上画一个命令按钮,然后编写如下事件过程:
PrivateSubcommand1_click()
DimaAsString,bAsString
a=InputBox("EntertheFirstinteger")
b=InputBox("EntertheSecondinteger")
Printb+a
EndSub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和111,则输出结果
是( )
A.456
B.111
C.567
D.111456
第2题:
在窗体上画一个命令按钮,然后编写如下事件过程:
Private Sub Command1 Click()
a= Val(InputBox(“请输入一个整数”))
b=Val(InputBox(“请输入一个整数”))
Print a+b
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入12和34,输出结果为 ______。
第3题:
在窗体上画一个名称为Cl的命令按钮,然后编写如下事件过程:
程序运行后单击命令按钮,如果输入4,则在窗体上显示的内容是( )。
A)5
B)6
C)9
D)10
第4题:
在窗体上画一个命令按钮,然后编写如下事件过程。该程序运行后,单击命令按钮,在输入对话框中分别输入321和456,则输出结果为【 】。
Private Sub Command1_Click()
a=InputBox("请输入一个整数")
b=InputBox("请再输入一个整数")
Print a+b
End Sub
第5题:
在窗体上画一个命令按钮和一个文本框,其名称分别为Commandl和Text1,把文本框的 Text属性设置为空白,然后编写如下事件过程: Private Sub Commandl_click() a=InputBox("Enter an integer") b=InputBox("Enter an integer") Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示内容是( )。
A.108
B.18
C.810
D.出错
第6题:
在窗体上添加一个名称为Textl的文本框和一个名称为Commandl的命令按钮,然后编写如下事件过程:
程序运行后,单击命令按钮,在文本框中显示的值是__________。
第7题:
在窗体上画一个命令按钮和一个文本框,并把窗体的KeyPreview属性设置为True,然后编写如下代码: Dim SaveAll As String Private Sub Command1_Click() Text1.Text=UCase(SaveAll) End Sub Private Sub Form_KeyPress(KeyAscii As Integer) SaveAll=SaveAll+Chr(KeyAseii) End Sub 程序运行后,在键盘上输入“abcdefg”,单击命令按钮,则文本框中显示的内容为 ______ 。
A.abcdefg
B.不显示任何信息
C.ABCDEFG
D.出错
第8题:
在窗体中添加一个命令按钮(名为Command1)和一个文本框(名为text1),然后编写如下事件过程:
打开窗体运行后,单击命令按钮,文本框中显示的内容是( )。
第9题:
在窗体上画一个命令按钮,然后编写如下时间过程( )。程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是
A. 579
B. 123
C. 456
D. 123456
第10题:
在窗体上绘制一个文本框,然后编写如下事件过程: Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 程序运行时,在文本框中输入456,然后单击窗体,在输入对话框中输入123,单击“确定”按钮后,在窗体上显示的内容为( )。
A.123
B.456
C.579
D.123456
第11题:
在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl),然后编写如下事件过程:
程序运行后,在文本框中输入3,然后单击命令按钮,则Y的值变为__________。
第12题:
579
123
456123
456
第13题:
在窗体上画一个命令按钮,然后编写如下事件过程:
private sub command1_click()
dima,basinteger
a=Val(inputbox("EntertheFirstinteger"))
b=Val(inputbox("EntertheSecondinteger"))
Printb+a
end sub
程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和111,则输出结果是( )
A.456
B.111
C.567
D.111456
第14题:
在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_ Click ( ) x = InputBox("Enter the First integer") y = InputBox("Enter the Second integer") Print y +xEnd Sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是 ______。
A.579
B.123
C.456
D.123456
第15题:
在窗体上画一个命令按钮,然后编写如下程序:
Dim k As Long
k=1
Do While num
Loop
fun=k
End Function
Private Sub Command1_Click()
Dim n As Long
Dim r As Long
MsgBox r
End Sub
程序运行后,单击命令按钮,在输入对话框中输入234,消息框显示的结果为( )。
第16题:
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Commandl—Click() x=InputBox(“请输入一个整数”) Print x+345 End Sub 程序运行后,单击命令按钮,在输入对话框中输入123,则在窗体上输出的内容为( )
A.123345
B.468
C.123
D.345
第17题:
在窗体上画两个文本框和一个命令按钮,然后在命令按钮的代码窗口中编写如下事件过程:
Private Sub Command1_Click()
Text 1="VB programming"
Text 2=Text 1
Text 1="ABCD"
End Sub
程序运行后,单击命令按钮,文本框Text 2中显示的内容为【 】。
第18题:
在窗体上放一个文本框Text1,在文本框中输入456,并有如下事件过程: Private Sub Form_Click() x=InputBox("请输入一个整数") Print x+Text1.Text End Sub 单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示是( )。
A.123
B.456
C.579
D.123456
第19题:
在窗体上放一个文本框Text1,在文本框中输入456,并有下列事件过程:
Private Sub Form_Click()
x=InputBox("请输入一个整数")
Print x+Text1.Text
End Sub
单击该窗体,在输入对话框中输入123,单击“确定”按钮后,窗体上显示的是( )。
A.123
B.456
C.579
D.123456
第20题:
在窗体上画一个文本框,然后编写如下事件过程:程序运行后,如果在键盘上输入字母“a”,则文本框中显示的内容为( )。
A. a
B. A
C. aaaaaa
D. AAAAAA
第21题:
在窗体上画二个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
程序运行后,单击命令按钮,在文本框中显示的值是
A.2
B.3
C.4
D.5
第22题:
在窗体上有一个命令按钮,然后编如下事件过程:
程序运行后,单击命令按钮,在输入对话框内输入-1,输出结果是 。
第23题:
"在窗体上放入一个名称为Button1命令按钮和两个名称分别为TextBox1、TextBox2两个文本框,然后编写如下事件过程: 程序运行后,在文本框TextBox1中输入10,然后单击命令按钮,则在TextBox2中显示的内容是()"
A10
B20
C30
D40