[填空题]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click（　） Dim a (1 To 10) Dim p(1 To 3) k=5 For i=1 To 10 a(i)=i Nexti Fori=1 To 3 p(i)=a(ii) Next i For i=1 To 3 k=k+p(i)2 Next i Print k End Sub 程序运行后，单击命令按钮，输出结果是【13】。

更多"在窗体上画一个命令按钮，然后编写如下事件过程： Private S"的相关试题:

[单项选择]在窗体上画一个命令按钮，然后编写如下程序　　Private Sub Command4 Click（　）　　　　Dim a As Integer，b As Integer　　　　a=1　　　　b=2　　　　Print N(a，b)　　End Sub　　Function N(x As Integer，y As Integer)As Integer　　　　N=IIf(x＞y，x，y)　　End Function　　程序运行后，单击命令按钮，输出结果为

A. l
B. 2
C. 5
D. 8

查看答案

[单项选择]在窗体上画一个命令按钮，然后编写如下程序
Private Sub Command1_Click( )
Dim a As Integer，b As hiteger
a=1
b=2
Print N(a，b)
End Sub
Function N(x As Integer，y As Integer)As Integer
N=IIf(x>y，x，y)
End Function
程序运行后，单击命令按钮，输出结果为
A. 1
B. 2
C. 5
D. 8

查看答案

[填空题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Commandl_Click（　） Dim M(10) As Integer For k=1 To 10 M(k)=12-k Next k x=6 Msgbox M(2+M(x)) End Sub 程序运行后，单击命令按钮，消息框显示的是。

查看答案

[填空题]在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl Click（　）
Do Until b＜0
a=InputBox("输入a的值")
a=Val(a)
b=InputBox("输入b的值")
b=Val(b)
a=a +b
Loop
Print a
End Sub
程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【14】。

查看答案

[填空题]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) Do Until b ＜ 0 a = InputBox( "输入a的值" ) a = Val(A) b = InputBox( "输入b的值" ) b =VM(B) a=a+b Loop Print a End Sub 程序运行后，依次输入5,4,3,2,1,0,-1,-2,则输出结果是【15】。

查看答案

[填空题]在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl Click（　） Do Until b＜0 a=InputBox("输入a的值") a=Val(a) b=InputBox("输入b的值") b=Val(b) a=a +b Loop Print a End Sub 程序运行后，依次输入5，4，3，2，1，0，-1，-2，则输出结果是【14】。

查看答案

[单项选择]在窗体上画一个命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1 Click（　）
Dim Arr1(12)As Integer， Arr2(3)As Integer
Dim Sum As Integer
Sum = 2
For i=1 To 12
Arrl(i)= i
Next i
For i=1 To 3
Arr2(i)= Arrl(i*i)
Next i
For i = 1 To 3
Sum = Sum + Arr2(i)
Next i
Print Sum
End Sub
程序运行后，单击命令按钮，在窗体上的输出结果为
A. 16
B. 24
C. 32
D. 36

查看答案

[单项选择]在窗体上画一个命令按钮，然后编写下列程序　　Private Sub Command3_Click( )　　　　Tcl 2　　　　Tcl 3　　　　Tel 4　　End Sub　　Sub Tcl(a As Integer)　　Static x As Integer　　x=x + a　　Print x；　End Sub　　程序运行后，单击命令按钮，输出结果为

A. 2 3 4
B. 2 5 9
C. 3 5 4
D. 2 4 3

查看答案

[填空题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command l-Click （　） Dim M (10) As Integer Fork=l To 10 M(k)＝12-k Next k x=6 Ms g box M (2+M(x)) End Sub 程序运行后，单击命令按钮，消息框显示的是【13】。

查看答案

[填空题]在窗体上画一个命令按钮，然后编写如下代码： Private Sub Command1_Click（　） Dim M (10) As Integer For k=1 To 10 M(k)=12-k Next k x=6 Msgbox M(2+M(x)) End Sub 程序运行后，单击命令按钮，消息框显示的是【13】。

查看答案

我来回答:

提交