题目内容

在窗体上添加一个命令按钮，编写如下代码：Option Base 1Private Sub Command1_ClickDim a(10) As Integer,p(3)As Integerk=5For i=1 To 10a(i)=iNext iFor i=1 To 3p(i)=a(ii)Next iFor i=1 To 3k=k+p(i)2Next iPrint kEnd Sub程序运行后，单击命令按钮，输出结果是

A. 35
B. 28
C. 33
D. 37

查看答案

搜索结果不匹配？点我反馈

更多问题

在窗体上添加一个命令按钮，编写如下代码：Option Base 1Private Sub Command1_Click()Dim aA=Array(1,2,3,4)J=1For i=4 To1 Step -1S=s+a(i)jJ=j10Next iPrint sEnd Sub程序运行后，单击命令按钮，输出结果是

A. 4321
B. 12
C. 34
D. 1234

在窗体上添加一个命令按钮，编写如下代码：Private Sub Command1_ClickDim Arr1(10) as Integer ,Arr2(10) As IntegerN=3For i=1 to 5Arr1(i)=iArr2(n)=2*n+iNext iPrint Arr2(n), Arr1(n)End Sub程序运行后，单击命令按钮，输出结果是

A. 11 3
B. 3 11
C. 13 3
D. 3 13

在窗体中添加两个文本框Text1和Text2,一个命令按钮Command1,编写如下事件过程:Private Sub Command1_Click()x = 0Do While x < 10x = (x - 2) * (x + 3)n = n + 1LoopText1.Text = Str(n) : Text2.Text = Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为

A. 1 和 0
B. 3 和 50
C. 2 和 24
D. 4 和 68

在窗体中添加一个命令按钮,然后编写如下代码:Private Sub Command1_Click()ReDim this(4)For i = 1 To 4this(i) = i * 3NextReDim this(6)For i = 1 To 6this(i) = this(i) + iNextPrint this(3);this(6)End Sub程序运行后,则窗体上显示的内容为

A. 3 6
B. 10 6
C. 12 6
D. 8 0