单项选择题

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Option Base 1
Private Sub Command1_Click()
Dim a(5,5) As Integer
For i=1 To 5
For j=1 To 5
a(i,j)=(i+j)*5\10
Next j
Next i
s=0
For i=1 To 5
s=s+a(i,i)
Next i
Print s
End Sub
程序运行后,单击命令按钮,输出结果是

A.15
B.13
C.11
D.9
<上一题 目录 下一题>
热门 试题

填空题
在两种基本测试方法中,______测试的原则之一是保证所测模块中每一个独立路径至少要执行一次。
单项选择题
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码: Private Sub Command1_Click() Dim X As Integer, Y As Integer X=5 Y=3 Call proc(X,Y) Label1.Caption=X Label2.Caption=Y End Sub Private Sub proc(a As Integer, ByVal b As Integer) X=a*a Y=b+b End Sub 程序运行后,单击命令按钮,则两个标签中显示的内容分别是
A.25和3
B.5和3
C.25和6
D.5和6
相关试题
  • 下面程序的功能是把文件file11.txt中重...
  • 在窗体上画一个通用对话框,其名称为Common...
  • 设有如下程序: Private Sub Form_Clic...
  • 在窗体上画一个名称为Command1的命令按钮...
  • 在窗体上有一个名称为Command1的命令按钮...