填空题以下程序段的输出结果是{{U}} 【15】 {{/U}}。
num=0
Do While num＜=5
num=mum+1
Loop
Print num
填空题改变驱动器列表框的Drive属性值将引发【 】事件。
填空题链表适用于{{U}} 【2】 {{/U}}查找。
填空题进行文件操作时，常需要使用______函数返回一个当前可以使用的文件号。
填空题假定有以下当循环： While Not条件 循环体 Loop 则执行循环体的"条件"是______。
填空题在程序运行执行闲置循环过程中，程序的控制权被系统占用。若要获得控制权，可以使用一个语句。这样用户可以在获得系统的控制权后进行其他操作。这个语句是______。
填空题设有以下函数过程： Function fun(m As Integer)As Integer Dim k As Integer, sum As Integer sum=0 For k=m To 1 Step-2 sum=sum+k Next k fun=sum Fnd Function 若在程序中用语句s=fun(10)调用此函数，则s的值为______。
填空题对长度为20的线性表进行冒泡排序，最坏情况下需要比较的次数为______。
填空题下列程序是将数组a的元素倒序交换，即第1个变为最后一个，第2个变为倒数第2个， 完成下列程序。 Private Sub Backward(a()) Dim i As Integer,Tmp As Integer Fori=1 To5 Tmp=a(i) a(5-i)=Tmp Nexti End Sub
填空题下列事件过程的功能是：通过Foma_Load事件给数组赋初值为35、48、15、22、67， Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容，将程序补充完整。 Dim Arr() Private Sub Form_Load() ______ End Sub Private Sub Form_CUck() For EaCh x In Arr If Int(x/3)=x/3 Then Pdnt X End If NeXt X End Sub
填空题在长度为n的顺序储的线性表中删除一个元素，最坏情况下需要移动表中的元素个数为______。
填空题以下程序代码实现单击命令按钮Commandl时生成20个(0，100)之间的随机整数，存于数组中，打印数组中大于50的数，并求这些数的和。 Dimalt(1 To 20) Fori=1 To 20 arr(i)= Nexti Sub=0 For Each X In arr If X＞50 Then Print Tab(20)；X Sum=Sum+X End If Next X Print Tab(20)；"Sub="；Sub
填空题设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。
Private Sub Commnd1_Click()
Dim a(1 To 10)As Integer
Dim i As Integer
Dim p As Integer
Dim t As Integer
Dim j As Integer
For i=1 To 10
a(i)=i
Next i
For j=1 To 5
{{U}}【9】 {{/U}}
{{U}}【10】 {{/U}}
{{U}}【11】 {{/U}}
Next j
For i=1 To 10
Print a(i)
Next i
End Sub
填空题下列程序运行后，在窗体上打印的结果是{{U}} 【14】 {{/U}}。
Private Sub test(a， b，c)
a = a + 1： b = b + 2：C = C + 3
End Sub
Private Sub Command1 Click()
x = 1：v = 2：z = 3
Call test(x，y + 3， (z))
Print "Main:"；x；y；z
End Sub
填空题下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值。请完善程序。
Function SumF(n As Integer)As Single
s=0
For i=1 To n
s=______
Next i
SuraF=s
End Function
Private Sub Form_Click
____
Sum1=SumF(100)
Print
Print "sum1=" :sum1
End Sub
填空题假定定义了一个记录类型，名为Rt，同时建立了一个名为Sp.txt的文件，然后编写如下的程序段：
Dim Rv As Rt
r1=Len(Rv)
Open"Sp.txt" For Random As # 1
x=LOF(1)
n=x/r1
执行上面的程序段后，变量n中存放的是文件{{U}} 【6】 {{/U}}中所存放的是{{U}} 【7】 {{/U}}记录类型的记录数。
填空题执行下面的程序段后，S的值为
________
。
s=5
For i=-2.6 To 4.9 Step 0.6
s=s+1
Next i
填空题在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) a=Val(1nputBox(“请输入一个整数”)) b=Val(1nputBox(“请输入一个整数”)) Print a+b End Sub 程序运行后，单击命令按钮，在输入对话框中分别输入12和34，输出结果为 【10】
填空题Name属性的含义是______，窗体的默认Name属性是______。