填空题

设有以下循环：
x=1
Do
x=x+2
Print x
Loop Until ______
要求程序运行时执行3次循环体，请填空。

【参考答案】

x＞=7、x＞5或x＞=6
<上一题 目录 下一题>
热门 试题

填空题
设窗体上有一个名称为CD1的通用对话框、一个名称为Text1的文本框和一个名称为Command1的命令按钮。程序执行时，单击Command1按钮，则显示打开文件对话框，操作者从中选择一个文本文件，并单击对话框上的“打开”按钮后，则可打开该文本文件，并读入一行文本，显示在Text1中。下面是实现此功能的事件过程，请填空。 Private Sub Command1_Click() CD1.Filter= 文本文件|*.txt|Word文档|*.doc CD1.FilterIndex=1 CD1.ShowOpen If CD1.FileName＜＞ Then Open (9) For Input As #1 Line Input #1, Ch$ Close #1 Text1.Text= (10) End If End Sub
填空题
在窗体上画一个命令按钮，其名称为Command1，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim Arr Arr=Array(43,68,-25,65,-78,12,-79,43,-94,72) pos=0 neg=0 For k=1 To 10 If Arr(k)＞0 Then (11) Else (12) End If Next k Print pos,neg End Sub 以上程序的功能是：计算并输出数组Arr中10个数的正数之和pos与负数之和neg，请填空。
相关试题