在窗体中添加一个名为Command1的命令按钮,然后编写如下事件代码:Private Sub Command1_Click()a
在窗体中添加一个名为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() a=75 If a>60 Then k=1 ElseIf a>70 Then k=2 ElseIf a>80 Then k=3 ElseIf a>90 Then k=4 EndIf
A.1
B. 2
C. 3
D. 4
在窗体中添加一个名为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() a=75 If a>60 Then k=1 ElseIf a>70 Then k=2 ElseIf a>80 Then k=3 ElseIf a>90 Then k=4 EndIf
A.1
B. 2
C. 3
D. 4
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),并在命令按钮中编写如下事件代码: Private Sub Command1_Click m=2.17 n=Len(Str$(m.+Space(5). Me!Text1=n End Sub 打开窗体运行后,单击命令按钮,在文本框中显示
A.5
B.8
C.9
D.10
在窗体上添加一个命令按钮(名为Command1)和一个文本框(名为Text1),则执行如下事件过程后,文本框中的输出为______。private Sub Command1_ click() for i = 1 To 4 for j = 1 To 3 x = 3 for K = 1 To 2 x=x+3 Next K Next j Next i Text1.Text= Str(x)End Sub
A.3
B.6
C.9
D.12
在窗体上添加一个名为Command1的命令按钮,然后编写如下程序:
Function m(x As Integer, y As Integer) As Integer
m=IIf(x>y,x,y)
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=1
b=2
MsgBox m(a,b)
End Sub
打开窗体运行后,单击命令按钮,消息框中输出结果为【 】。
A.21
B.42
C.54
D.72
A.5
B.4
C.3
D.2
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为
Private Sub Comand1_Click()
For i=1 To 4
x=4
For j=1 To 3
x=3
For k=1 To 2
x=x+5
Next
Next
Next
Print x
End Sub
A.13
B.26
C.30
D.40
在窗体上添加一个按纽,名为command1,然后编写如下的事件过程:______。 Private Sub Command1_Click() For i=1 To 4 x= 4 For j=1 To 3 x= 3 For k=1 To 2 x=x + 5 Next k Next j Next i Print x End Sub
A.13
B.26
C.30
D.40
For i=1 To 4
For j=1 To 3
x=3
For k=1 To 2
K=x+3
Next k
Next j
Next i
Text1.Text=Str(x)
A.3
B.6
C.9
D.12
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为()。 Prinvate Sub Comand1_Click() For i=1 To 4 x=4 For j=1 To 3 x=3 For k=1 To 2 x=x+5 Next k Next j Next i Print x End Sub
A.13
B.26
C.30
D.40
在窗体上添加一个命令按纽,名为command1,其事件过程如下,程序运行后,其输出的结果为______ 。 Private sub_command1_ click () Dim a a=array(1,2,3,4,5) For k=1 to 4 S=s+ a(k) Next k Print s End sub
A.10
B.14
C.15
D.120