单项选择题
阅读程序:
Sub subP(b()As Integer)
For i=1 To 4
b(i)=2*i
Next i
End Sub
Private Sub Command1_Click()
Dim a(1 To 4)As Integer
a (1)=5
a (2)=6
a (3)=7
a (4)=8
subP a()
For i=1 To 4
Print a(i)
Next i
End Sub
运行以上程序,单击命令按钮,输出结果为______ 。
A.2
4
6
8
B.5
6
7
8
C.10
12
14
16
D.出错
点击查看答案
<上一题
目录
下一题>
热门
试题
填空题
面向对象的模型中,最基本的概念是对象和 【2】 。
点击查看答案
单项选择题
在窗体上建立三个文本框,名称分别为Text1、Text2和Text3,一个命令按纽,名称为command1,如果在TEXT1中输入数200,在TEXT2中输入数150,则执行下列程序后,TEXT3的值为______。 Private Sub Command1_Click() Dim m, n As Integer m = Val (Text1. Text) n = Val (Text2. Text) If n * m = 0 Then Exit Sub End If If m < n Then t =m: m= n: n = t End If Do r = m Mod n m= n n =r Loop While r <> 0 Text3. Text= m End Sub
A.200
B.50
C.100
D.150
点击查看答案
相关试题
一下程序的作用是生成一个10×10的矩阵...
在Visual Basic 中,要将一个窗体装载到...
以下程序段中Do...Loop 循环执行的次数...
以下程序的作用是生成一个如下图的矩阵,该...
有如下程序,该程序的执行结果是 【6】 ...