填空题
在窗体上添加一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a(10,10)As Integer
Dim i,j As Integer
For i=2 To 4
For j=3 To 6
a(i,j)=i*j
Next j
Next i
Text1.Text=a(2,3)+a(4,6)
End Sub
程序运行后,单击命令按钮,在文本框中显示的值是______。
【参考答案】
30
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
有如下程序: Option Base 1 Private Sub Form_Click() Dim arr,Sum Sum=0 art=Array(1,3,5,7,9,11,13,15,17,19) For i=1 To 10 If arr(i) 3=arr(i) 3 Then Sum=Sum+arr(i) End If Next i MsgBox Sum End Sub 程序运行后,单击窗体,消息框的输出结果为______。
点击查看答案&解析
填空题
标准模块以函数过程(以______开头)和子过程(以Sub开头)为单元集合存储。
点击查看答案&解析
相关试题
在窗体中添加一个名称为Command1的命令按...