皮皮学，免费搜题
登录
搜题
【单选题】
电子杂志《走进教学与科研——全国电大图书馆通讯》可通过邮箱免费订阅，读者成功订阅后可在自己邮箱中点击浏览最新一期的电子杂志内容。A.
正确
B.
错误
拍照语音搜题，微信中搜索"皮皮学"使用
参考答案：
参考解析：
知识点：
皮皮学刷刷变学霸
举一反三
【单选题】下面程序的输出结果是( )。 Dim a a = Array(1,2,3,4,5,6,7) For i = Lbound(a)to Ubound(a) a(i)= a(i)* a(i) Next i Print a(i)
A.
36
B.
程序出错(下标越界)
C.
49
D.
不确定
【单选题】下面程序的输出结果是( )。 Dim a a = Array(1,2,3,4,5,6,7) For i = Lbound(a)to Ubound(a) a(i)= a(i)* a(i) Next i Print a(i)
A.
程序出错
B.
49
C.
36
D.
不确定
【单选题】下面程序的输出结果是( )。 Dim a a= Array(1,2,3,4,5,6,7) For i=Lbound( A) To Ubound( A) a(j)=a(i)*a(i) Next i Print a(i)
A.
36
B.
程序出错
C.
49
D.
不确定
【简答题】下面程序的输出结果是【 】。 Private Sub Commandl_Click( ) Dim a(1 To 20) Dim i Fori = 1 To 20 a(i) = i Next i For Each i In a( ) a(i) = 20 Next i Print a(2) End Sub
【单选题】下面程序的输出结果是 ( )。 Dim a a = Array(1,2,3,4,5,6,7) For i = Lbound(A) to Ubound(A) a(i) = a(i) * a(i) Next i Print a(i)
A.
36
B.
程序出错
C.
下标越界
D.
49
【单选题】下面程序的输出结果是 。 Dim a A=array(1,2,3,4,5,6,7) For i=Lbound(a) To Ubound(a) A(i)=a(i)*a(i) Next i Print a(6)
A.
36
B.
程序出错
C.
49
D.
不确定
【单选题】在Visusl Basic中,下面程序的输出结果是( )。 Dim a a=Array(1,2,3,4,5,6,7) For i=Lbound(a)to Ubound(a) a(i)=a(i)*a(i) next Print a(i)
A.
36
B.
程序出错
C.
49
D.
不确定
相关题目：