当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 下列程序中有一个按钮Command1,一个文本框Text1,其属性MultiLine=True。当单击按钮后,文本框显示 【10】 行数据,其中第2行和第3行的数据分别是 【11】 和 【12】 。 Option Base 1 Private Sub Command1_Click() Dim a, s As String,i As Integer a=Array(1,3,5,7,2,4,6,8) s=" " For i=1 To Ubound(A) s=s

  

参考答案:

[10]8

[分析]:先计算a(i)+i表达式的结果,再将其转换成字符串。vbCrLf为回车符与换行符结合,它相当于“Chr(13)&Chr(10)”。UBound函数求出数组a的上界值为8,程序循环8次,在文本框Text1中输出8行数据。

  参考解析

[11]5[12]8

微信端