单项选择题

阅读程序:
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】 ...