单项选择题

有如下程序：
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．出错
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, n As Integer For i=0 To 50 i=i+3 n=n+1 if i＞10 Then Exit For Next Text1.Text=Str(n) End Sub 程序运行后，单击命令按钮，在文本框中显示的值是
A．2
B．3
C．4
D．5
单项选择题
在窗体上有一个名称为CommonDialog1的通用对话框和一个名称为Command1的命令按钮，以及其他一些控件。要求在程序运行时，单击Command1按钮，则显示打开文件对话框，并在选择或输入了一个文件名后，就可以打开该文件。以下是Command1_Click事件过程的两种算法。 算法1： Private Sub Command1_Click() CommonDialog1.ShowOpen Open CommonDialog1.FileName For Input As #1 End Sub 算法2： Private Sub Command1_Click() CommonDialog1.ShowOpen If CommonDialog1.FileName＜＞ Then Open CommonDialog1.FileName For Input As #1 End If End Sub 下列关于这两种算法的叙述中正确的是
A．显示打开文件对话框后若未选择或输入任何文件名，则算法2会出错，算法1不会
B．显示打开文件对话框后若未选择或输入任何文件名，则算法1会出错，算法2不会
C．两种算法的执行结果完全一样
D．算法1允许输入的文件名中含有空格，而算法2不允许
相关试题