有下列程序: Option Base 0 Private Sub Command1_Click() Dim City As Variant x = Array("Visual","Basic","Microsoft","

admin2009-02-13  26

问题 有下列程序:    Option Base 0    Private Sub Command1_Click()       Dim City As Variant       x = Array("Visual","Basic","Microsoft","Programming")       Print x(2)    End Sub    程序运行后,单击命令按钮,则在窗体上显示的内容是

选项 A、Microson
B、错误提示
C、Visual
D、Basic

答案1

解析 使用Array函数创建的数组下界是由 Ophon Base语句指定的下界而确定的,在本题中,下界被Option Base语句指定为0,所以x(0)的值为“Visual”,x(1)的值为“Basic”,x(2)的值为“Microsoit”,x(3)的值为“Programming”。
转载请注明原文地址:https://jikaoti.com/ti/eZq0FFFM
0

最新回复(0)