2. 计算机
  3. 在窗体上画一个名称为Command1的命令按钮，一个名称为Text1的文本框数组（含４个文本框，下标从０开始），然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, n As Intege

在窗体上画一个名称为Command1的命令按钮，一个名称为Text1的文本框数组（含４个文本框，下标从０开始），然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer, n As Intege

admin2015-09-23  70
问题 在窗体上画一个名称为Command1的命令按钮，一个名称为Text1的文本框数组（含４个文本框，下标从０开始），然后编写如下事件过程：
Private Sub Command1_Click()
  Dim i As Integer, n As Integer
  For Each TextBox In Text1
      Text1(i) = Text1(i).Index
      n = 10 * (n + Val(Text1(i).Text))
      i = i + 1
  Next
  Print n
End Sub
运行程序，单击命令按钮Command1，则在窗体上的输出结果是
选项 A、0123
B、123
C、1234
D、1230
答案D
解析 控件数组是指由一组相同类型的控件组成。数组中的每一个控件都有唯一的索引号（Index）。分析该程序，在For Each……Next结构中，语句"Text1(i)=Text(i).Index"，实际上是将每个索引（Index）的值赋予每个控件元素的Text值。第一次执行时，n=0，Text1(0) = Text(0).Index，n=10*(0+Val(Text1(0).Text))=10*(0+0)=0，i=2。第二次执行时，Text1(1) = Text(1).Index，n=10*(0+Val(Text1(1).Text))=10*(0+1)=10，i=3。第三次执行时，Text1(2) = Text(2).Index，n=10*(10+Val(Text1(2).Text))=10*(10+2)=120，i=4。第四次执行时，Text1(3) = Text(3).Index，n=10*(120+Val(Text1(3).Text))=10*(120+3)=1230，i=5。循环结束。故最后输出结果为1230。本题正确答案为D。
转载请注明原文地址:https://kaotiyun.com/show/OGLp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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