填空题

阅读程序： Sub p(b () As Integer) For i=1 To 4 b(i) =2(i Next i End Sub Private Sub Command1_Click() Dim a (1 To 4) As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 call p (a) For i=1 To 4 Print a(i) Next i End Sub 运行上面的程序，单击命令按钮，输出结果为 ______。

【参考答案】

2 4 6 8
<上一题 目录 下一题>
热门 试题

填空题
在窗体上画一个名称为“Command1”、标题为“计算”的命令按钮，再画7个标签，其中5个标签组成名称为Label1的控件数组；名称为Label2的标签用于显示计算结果，其Caption属性的初始值为空；标签Label3的标题为“计算结果”。运行程序时会自动生成 5个随机整数，分别显示在标签控件数组的各个标签中，如图所示。单击“计算”按钮，则将标签数组各元素的值累加，然后将计算结果显示在Label2中。请填空。Private Sub Command1_Click()Sum = 0For i = 0 To 4Sum= Sum + ______Next______ = SumEnd Sub
填空题
阅读程序：Option Base 1Private Sub Form Click()Dim a(3) As IntegerPrint“输入的数据是：”；For i = 1 To 3a(i) = InputBox(“输入数据”)Print a(i)；NextPrintIf a(1)＜a(2) Thent = a(1)a(1) = a(2)a(2)= ______End IfIf a(2)＞a(3) Thenm = a(2)ElseIf a(1)＞a(3) Thenm= ______Elsem= ______End IfPrint “中间数是:”；mEnd Sub程序运行后，单击窗体，在输入对话框中分别输入三个整数，程序将输出三个数中的中间数，如图所示。请填空。
相关试题