问答题

9.程序执行结果s的值是 [9] 。
Private Sub Commandl_Click()
i = 0
Do
i = i + l
s = i + s
Loop Until i > = 4
Print s
End Sub

A.程序执行结果s的值是

你可能感兴趣的试题

在窗体上加上一个文本控件PCSTextBox，画一个命令按钮，当单击命令按钮的时候将显示'打开文件'对话框，设置该对话框只用于打开文本文件，然后在文本控件中显示打开的文件名。请填空。
Private Sub Command1_Click（）
CommonDialog1.Filter= 【12】
CommonDialog1.ShowOpen
PCSTextBox.Text= 【13】
End Sub

A.Filter=
B.ShowOpen
C.Text=

有下面一个程序段，从文本框中输入数据，如果该数据满足条件，除以4余1，除以5余2，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。
Private Sub Command1_Click（）
x=Val（Text1.Text）
If 【6】 Then
Print x
Else
Text1.Text=''
【7】
End If
End Sub

A.Text）
B.Text=''