填空题下面程序段的作用是从文本框中输入数据，如果该数据满足条件：除以6余2，除以5余3，则输出，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。 Private Sub Command1_Click() num=Val(Text1.Text) If ______ Then Print num Else Text1. Text="" ______ End If End Sub
填空题当用{{U}} 【12】 {{/U}}方式打开文件时，如果对文件进行写操作，则写入的数据附加到原来文件的后面。
填空题如果单选按钮是“选中”的，即单选按钮中间有一个圆点，那么该单选按钮的Value属性值等于{{U}} 【8】 {{/U}}；反之，如果单选按钮没有被选中，其Value属性值等于{{U}} 【9】 {{/U}}。
填空题测试的目的是暴露错误，评价程序的可靠性；而 【1】 的目的是发现错误的位置井改正错误。
填空题以下程序的功能是：程序运行后，单击命令按钮，输出结果为： 1 4 7 2 5 8 3 6 9 请填空。 Private Sub Command1_Click( ) Dim Arr(3，3)As Integer For i=1 To 3 For j=1 To 3 Arr(i，j)=______ Print Arr(i，j)； Next j Print Next i End Sub
填空题在窗体上先画一个名为Text1的文本框和一个名为Label1的标签，再画一个名为OP1的有4个单选按钮数组，其Index属性按季度顺序为0～3(见图5)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击一个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。图6是单击“第3季度”单选按钮产生的结果。请填空。Dimsales(12)AsLongPrivateSubForm_Load()open"sales.txt"ForInputAS#1Fork=1To12Input#1,sales(k)NextkClose#1EndSubPrivateSub(7)(Index,ASInteger)DimsumASLong,kASIngeger,monthASIngegersum=0month=Index*(8)Fork=1To3month=month+1sum=sum+sales(month)NextkLabel1.Caption=Opl(Index).(9)&"销售总额:"Text1=sumEndSub
填空题在最坏情况下，堆排序需要比较的次数为
________
。
填空题窗体上命令按钮Commandl的事件过程如下：
Private Sub Command1_Click()
Dim total As Integer
total=s(1)+s(2)
Print total
End Sub
Private Function s(m As Integer)As Integer
Static x As Integer
For i=1 To m
x=x+1
Next i
s=x
End Function
运行程序，第3次单击命令按钮Command1时，输出结果为{{U}} 【7】 {{/U}}。
填空题以下程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并输出该数组中各元素的最小值。请填空。
Option Base 1 Private Sub Commandl_Click()
Dimarrl DimMin As Integer,i As
Integer arrl=Array(12，435，76，-24，78，54，866，43)
Min={{U}} {{U}} 14 {{/U}} {{/U}}
Fori=2 To 8 If arrl(i)＜Min
Then{{U}} {{U}} 15 {{/U}} {{/U}}
Nexti Print"最小值是:";Min End Sub
填空题设有程序： Option Base 1 Private Sub Command1 Click() Dim arrl，Max as Integer arrl=Array(12，435，76，24，78，54，866，43) ______ =arrl(1) For i=1 To 8 If arrl(i)＞Max Then_______ Next i Print“最大值是：”；Max End Sub 以上程序的功能是：用Atray函数建立一个含有8个元素的数组，然后查找并输出该数组中元素的最大值。请填空。
填空题为了使标签能自动调整大小以显示全部文本内容，应把标签的______属性设置为True。
填空题对于图书管理数据库，将图书表中“人民邮电出版社”的图书的单价涨价5%。请对下面的SQL语句填空： UPDATE 图书______WHERE出版单位=“人民邮电出版社”
填空题设有命令按钮Command1的单击事件过程，代码如下：
Private Sub Command1_Click()
Dim a(30)As Integer
For i=1 To 30
a(i)=i
Next
For Each arrItem{{U}} 【13】 {{/U}}a
If arrItem Mod 7=0 Then Print arrItem：
If arrItem＞90 Then Exit For
Next
End Sub
请填空。
填空题新建一个工程，内有两个窗体，窗体Form1上有一个命令按钮Command1，单击该按钮，Form1窗体消失，显示Form2窗体，程序如下：
Private Sub Command1_Click()
______
Form2. ______
End Sub
试补充完整。
填空题算法的基本特征是可行性、确定性、 【1】 和拥有足够的情报。
填空题当循环队列非空且队尾指针等于队头指针时，说明循环队列已满，不能进行入队运算。这种情况称为 (1) 。
填空题以下程序的功能是：生成20个200到300之间的随机整数，输出其中能被5整除的数并求出它们的和。请填空。 Private Sub Command1_Click() For i=i To 20 x=Int(______*101 +200) If______=0 Then Print x S=S+______ Ena If Next i Print"Sub="; S End Sub
填空题若二叉树中度为2的结点有15个，度为1的结点有10个，则有 【3】 个叶结点。
填空题在窗体上画一个命令按钮，然后编写如下事件过程：
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1，2，3，4)
j=1
For i=4 To 1 Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序，单击命令按钮，其输出结果是{{U}} 【15】 {{/U}}。
填空题要对文本框中已有的内容进行编辑，按下键盘上的按键，但不起作用，原因是设置了______。