填空题

如下有一段不完整的程序段，如果要求该程序执行3次循环，则在程序中的括号里要填入 【6】 。
Private Sub Command1_Click()
x = 1
do
x=x+3
Print x
Loop Until 【6】
End Sub

【参考答案】

x＞=8
<上一题 目录 下一题>
热门 试题

填空题
在窗体上建立—个名称为Text1的文本框，用来接收一个整数。当form1_ Click事件发生时，将在窗体上显示输入整数的各位数字和。Private Function fun(m As Integer) As IntegerDim k As Integer, n As Integerdo n = 【10】 k=k+ n m= m 10Loop until m = 0fun = kEnd FunctionPrivate Sub form_ Click() Dim n As Integer n = Val(Text1. Text) Print 【11】 End Sub
填空题
下列程序实现的功能是：当在窗体上单击时，将输出a1．txt 文件中的数字字符的个数。Private Sub form_ Click() Dim Ch As String * 1 Dim n As Integer Open c: a1. txt for Input As #10 do while 【7】 Ch = Input(1, #10) if 【8】 then n=n+1 End if Loop 【9】 Close #10End Sub
相关试题