2. 计算机
  3. 下列程序中有一个按钮Command1，一个文本框Text1，其属性MultiLine=True。当单击按钮后，文本框显示【 】行数据，其中第2行和第3行的数据分别是【 】和【 】。 Option Base 1 Private Sub Co

下列程序中有一个按钮Command1，一个文本框Text1，其属性MultiLine=True。当单击按钮后，文本框显示【 】行数据，其中第2行和第3行的数据分别是【 】和【 】。 Option Base 1 Private Sub Co

admin2009-02-13  58
问题 下列程序中有一个按钮Command1，一个文本框Text1，其属性MultiLine=True。当单击按钮后，文本框显示【  】行数据，其中第2行和第3行的数据分别是【  】和【  】。
   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 + Str(a(i)+i)+ vbCrLf
      Next i
      Text1.Text=s
   End Sub
选项
答案8,5,8
解析 先计算a(i)+i表达式的结果，再将其转换成字符串。vbCrLf为回车符与换行符结合，它相当于“Chr(13)&Chr(10)”。UBound函数求出数组a的上界值为8，程序循环8次，在文本框 Text1中输出8行数据。
转载请注明原文地址:https://www.kaotiyun.com/show/U61p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)