填空题

Private Sub Form_Activate( )
For j = 1 to 3
x=3
For i = 1 to 2
x=x+6
Next
Next
Print x
End Sub
程序运行后，窗体上显示的结果为 【14】 。

【参考答案】

O
<上一题 目录 下一题>
热门 试题

填空题
在用Open语句打开文件时，如果省略“For方式”则打开的文件的存在方式是 【13】 。
填空题
下列程序功能是，产生10个0-100的随机数，输出其中的最大值。请将程序补充完整。 Private Sub Form_Click() Dim an(10)As Integer Dim max As Integer Randomize For i%=1 To 10 an(i%)= 【10】 Next max=an(1) For i%=2 to 10 if an(i%)＞max then max=an(i%) End If Next Print max End Sub
相关试题