窗体Form. 1上有一个名称为Command 1的命令按钮,以下对应窗体单击事件的事件过程是
A)Private Sub Form. 1_Click() B)Private Sub Form. _Click()
End Sub End Sub
C)Private Sub Commandl_Click() D)Private Sub Command_ Click()
End Sub End Sub
第1题:
在窗体上画一个名称为 \"Command1\" 的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a As String
A="123456789"
For i=1 To 5
Print Space(6-i);Mid $ (a,______ ,2*i-1)
Next i
End Sub
程序运行后,单击命令按钮,窗体上的输出结果是
5
456
34567
2345678
123456789
请填空。
第2题:
( 13 )设在名称为 Myform. 的窗体上只有 1 个名称为 C1 的命令按钮 , 下面叙述中正确的是( )
A )窗体的 Click 事件过程的过程名是 Myform_Click
B )命令按钮的 Click 事件过程名是 C1_Click
C )命令按钮的 Click 事件过程的过程名是 Command1_Click
D) 上述 3 种名称读市错误的
第3题:
( 13 )设在窗体上有一个名称为 Command1 的命令按钮和一个名称为 Text1 的文本框。要求单击 Command 1
按钮时可把光标移到文本框中。下面正确的事件过程是
A ) Private Sub Command1_Click()
Text1.GotFocus
End Sub
B ) Private Sub
Command1.GotFocus
EndSub
C ) Private Sub Command1_Click()
Text1.SetFocus
End Sub
D ) Private Sub
Command1.SetFocus
End Sub
第4题:
在窗体上有一个命令按钮Command1,编写事件代码如下:
Private Sub Command1_Click()
Dim a(10),P(3) As Integer
k=5
For i=1 To 10
For i=1 To 3
For i=1 To 3
End Sub
打开窗体运行后,单击命令按钮,消息框中输出的结果是( )。
第5题:
窗体上有一个命令按钮,命令按钮的单击事件过程如下: Private Sub Command1_Click() Dim a a=Array(1,2,3,4,5) For k=1 To 4 s=s+a(k) Next Print S End Sub 运行程序后,单击命令按钮,输出结果是
A.10
B.14
C.15
D.120
第6题:
窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是
A.Private Sub Forml_Click() … End Sub
B.Private Sub Form_Click() … End Sub
C.Private Sub Commandl_Click() … End Sub
D.Private Sub Command_Click() … End Sub
第7题:
在窗体上画一个名称为Commandl的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a$="VisualBasic" Print String(3,a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是
A.VVV
B.Vis
C.sic
D.11
第8题:
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a()
a=Array("机床","车床","钻床","轴承")
Print a(2)
End Sub
程序运行后,如果单击命令按钮,则在窗体上显示的内容是( )。
A.机床
B.车床
C.钻床
D.轴承
第9题:
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后,单击命令按钮,在窗体上输出的是______。
A.49
B.64
C.81
D.100
第10题:
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:
Private Sub Command1_Cilck()
End Sub
运行程序,单击命令按钮,则在弹出的信息框的标题栏中显示的是( )。
第11题:
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() a = 12345 Print Format$(a, "000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是
A. 123.45
B.12345.00
C.12345
D.00123.45
第12题:
-4
-3
3
3.6
第13题:
工程中有两个窗体,名称分别为Form1、Form2,Fonn1为启动窗体,该窗体上有命令按钮 Command1。要求程序运行后单击该命令按钮时显示Form2,则按钮Click事件过程应该是 ______。
A.Private Sub Command1_click() Foma2.Show End Sub
B.Private Sub Command1_Click() Form2.Visible End Sub
C.Private Sub Command1_Click() Load Form2 End Sub
D.Private Sub Command1_click() Form.Load EndSub
第14题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a S="VisualBasic" Print String(3, a$) End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是______。
A.VVV
B.Vis
C.sic
D.11
第15题:
窗体上有一个命令按钮Command1,编写如下事件过程:
Private Sub Command1_Click()
x = InputBox("x=")
y = InputBox("y=")
Print x + y
End Sub
运行后,单击命令按钮,先后在两个输入对话框中输入123和321,窗体显示的内容是( )。
A、 444
B、 123321
C、 123+321
D、 出错信息
第16题:
窗体Form1上有一个名称为Command1的命令按钮,以下对应窗体单击事件的事件过程是( )。
A.Private Sub Form1 Click( )
End Sub···
B.Private Sub Form1. Click( )
End Sub···
C.Private Sub Command1 click( )
End Sub···
D.Private Sub Command Click( )
End Sub···
第17题:
在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click( ) a=12345 Print Format $(a,"000.00") End Sub 程序运行后,单击命令按钮,窗体上显示的是
A.123.45
B.12345.00
C.12345
D.00123.45
第18题:
窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。
A.控制流
B.数据流
C.模块调用
D.事件驱动
第19题:
窗体Forml上有一个名称为Commandl的命令按钮,以下对应窗体单击事件的事件过程是( )。
第20题:
在窗体上有一个标签Lb1和一个命令按钮Command1,事件代码如下: Option Compare Database Dim a As String * 10 Private Sub Command1_Click( ) a="1234" b=Len(a) Me. Lb1. Caption=b End Sub 打开窗体后单击命令按钮,窗体中显示的内容是( )。
A.4
B.5
C.10
D.40
第21题:
在窗体上添加一个命令按钮(名为Command1),然后编写如下事件过程:
Private Sub Command1_Cliek
Dim b, k
For k = 1 to 6
b=23+k
Next k
MsgBox b + k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是【 】。
第22题:
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() For n=1 To 20 If n Mod 3<>0 Then m=m+n\3 Next n Print n End Sub 程序运行后,如果单击命令按钮,则窗体上显示的内容是______。
A.15
B.18
C.21
D.24
第23题:
( 15 )在窗体上添加一个命令按钮(名为 Command1 ),然后编写如下事件过程:
Private Sub Command1_Click ()
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
打开窗体后,单击命令按钮,消息框的输出结果是 【 15 】 。