执行以下Command1的Click事件过程在窗体上显示
Option Base 1
Private Sub Command1_Click( )
Dim a
a=Array(“a”,“b”,“c”,“d”,“e”,“f”,“g”)
Printa(1);a(3);a(5)
End Sub
A.abc
B.bdf
C.ace
D.出错
参考答案:C
解析: 根据Option Basel,可知数组a的下标下界为1,故a(1)、a(3)、a(5)的值分别为a、c、e。
执行以下Command1的Click事件过程在窗体上显示
Option Base 1
Private Sub Command1_Click( )
Dim a
a=Array(“a”,“b”,“c”,“d”,“e”,“f”,“g”)
Printa(1);a(3);a(5)
End Sub
A.abc
B.bdf
C.ace
D.出错
参考答案:C
解析: 根据Option Basel,可知数组a的下标下界为1,故a(1)、a(3)、a(5)的值分别为a、c、e。