题目内容:
问题:
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:
Private Sub Command1 Click( )
Dim a(10)As Integer
Fork=10 To 1 Step-1
a(k)=20-2*k
Next k
k=k+7
Print a(k-a(k))
End Sub
运行程序,单击命令按钮,输出结果是( )。
A . 18
B . 12
C . 8
D . 6
参考答案:
答案解析:
问题:
在窗体上画一个名为Command1的命令按钮,然后编写以下程序:
Private Sub Command1 Click( )
Dim a(10)As Integer
Fork=10 To 1 Step-1
a(k)=20-2*k
Next k
k=k+7
Print a(k-a(k))
End Sub
运行程序,单击命令按钮,输出结果是( )。
A . 18
B . 12
C . 8
D . 6