在窗体上画一个文本框,其名称为Text1,然后编写如下程序: Option Base 1 Pfivate Sub Form_Click0 Dim Arr(1 0)As Integer For i=6 T0 10 Art(i)=i一3 Next i Text

admin2015-11-24  22

问题 在窗体上画一个文本框,其名称为Text1,然后编写如下程序:
Option Base 1
Pfivate Sub Form_Click0 Dim Arr(1 0)As Integer
For i=6 T0 10
Art(i)=i一3
Next i
Text1.Text=sir(Art(6)+Arr(Arr(6)+Arr(10)))
End Sub
程序运行后,单击窗体,在文本框中显示的内容是

选项 A、7
B、8
C、9
D、10

答案D

解析 本题中在循环中为数组部分元素赋值,把.Art(6)~Arr(10)分别赋值为3~7,其余的数组元素保持默认值0;最终输出的是Art(6)+Arr(Arr(6)+Arr(10))即Arr(6)+Arr(10)=10。
转载请注明原文地址:https://jikaoti.com/ti/WdJ0FFFM
0

最新回复(0)