题目内容

设有如下程序： Option Base 1 Private Sub Form_Click() Dim a(5) As String, i As Integer For i = 1 To 5 a(i) = Chr(Asc("A") + i) Call f(a, i) Next i End Sub Sub f(ta() As String, n As Integer) Dim i As Integer For i = 1 To n Print ta(i); Next i Print End Sub 对上述程序，以下叙述中正确的是（）。

A. 程序可正常运行，输出内容的第一行是数字65
B. 程序可正常运行，输出内容的第二行是字符串“AB”
C. 程序可正常运行，输出内容的第二行是字符串“BC”
D. 程序有错，因为在过程f的定义中数组参数格式不正确

查看答案

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

更多问题

运行程序，单击窗体后输出结果是（）。 Private Sub f(ByVal x%, ByRef y%) x = x + y y = y + x End Sub Private Sub Form_Click() Dim x%, y% x = 8: y = 4 Call f(x, y) Print x; y End Sub

A. 8 16
B. 12 20
C. 8 4
D. 12 16

窗体上画一个名称为Picture1的图片框，一个名称为Label1的标签控件，然后编写如下程序： Public Sub display(x As Control) If TypeOf x Is Label Then x.Caption = "Visual Basic" Else x.Picture = LoadPicture("pic.jpg") End If End Sub Private Sub Label1_Click() Call display(Label1) End Sub Private Sub Picture1_Click() Call display(Picture1) End Sub 对以上程序，下列叙述中错误的是（）。

A. 程序运行时会出错
B. 过程中的x是控件变量
C. 单击标签，在标签中显示一串文字
D. 单击图片框，在图片框中显示一幅图片

有一子程序定义为Public Sub p(a As Integer, b As Integer)，正确的调用语句是（）。

A. sub 2, 3.5
B. Call p 2, 3.5
C. p 2, 3.5
D. Call sub(2, 3.5)

运行程序，单击窗体后输出结果是（）。 Sub test(x%, y%, z%) x = 7: y = 5: z = 9 End Sub Private Sub Form_Click() Dim a%, b% a = 3: b = 8 Call test(a - 1, a, (b)) Print a; b End Sub

A. 3 8
B. 5 8
C. 6 8
D. 5 9