填空题在命令按钮上释放鼠标按钮时，所触发的事件称为______。
填空题在菜单编辑器中建立一个菜单，其主菜单项的名称为mnuEdit，Visible属性为False。程序运行后，如果用鼠标右键单击窗体，则弹出与mnuEdit对应的菜单。以下是实现上述功能的程序，请填空。
Private Sub Form{{U}} 【6】 {{/U}}(Button As Integer，Shift As Integer，X As SinSle，Y As SinSle)
If Button=2 Then
{{U}}【7】 {{/U}}mnuEdit
End If
End Sub
填空题以下程序的执行结果是{{U}} 【8】 {{/U}}。
a=15.5635
b=Int(a*100+0.5)/100
Print b
填空题________
是数据库应用的核心。
填空题在窗体上画两个组合框，其名称分别为Combo1、Combo2，然后画两个标签，名称分别为Label1、Label2。要求程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下列的标签中显示出来。请填空使程序完整。 Private Sub Combol_Click() Call ShowItem(Combo1，Label1) End Sub Private Sub Combo2_Click() Call ShowItem(Combo2，Label2) End Sub Public Sub ShowItem(tmpCombo As ComboBox,tmpLabel As Label) ______.Caption=______.Text End Sub
填空题建立打开文件、保存文件、颜色、字体、打印对话框所使用的方法分别为 【13】 、 【14】 、ShowColor、ShowFont 和 ShowPrinter。
填空题在窗体上画一个名称为Command1的命令按钮。编写如下事件过程： Private Sub Command1_Click() Dim a As String A= 【6】 For i=1 To 5 Print Space(6-i); Mid$(a, 6-i, 2*i-1) Next i End Sub 程序运行后，单击命令按钮，要求窗体上显示的输出结果为： 5 456 34567 2345678 123456789 请填空。
填空题假定建立了一个工程，该工程包括两个窗体，其名称(Name属性)分别为Form1和 Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将下面的程序补充完整。
Private Sub Command1_click()
{{U}}【14】 {{/U}}Form1
Form 2.{{U}} 【15】 {{/U}}
End Sub
填空题以下程序段的输出结果是______。 num=0 Do While num＜=5 num=num+1 Loop Print num
填空题MagBox函数除了在对话框中显示提示信息外，另一个功能是工______。
填空题在窗体上画1个命令按钮，其名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click() Dim arr(1 To 100) As Integer For i = 1 To 100
arr(i) = Int(Rnd * 1000) Next i
Max = arr(1) Min = arr(1)
For i = 1 To 100
If _________ Then
Max = arr(i) End If
If _________ Then
Min = arr(i) End If
Next i
Print "Max="; Max, "Min="; Min
End Sub
程序运行后，单击命令按钮，将产生100个1000以内的随机整数，加入数组arr中，然后 查找并输出这100个数中的最大值Max和最小值Min，请填空。
填空题设有如下通用过程： Public Sub Fun(a()，ByVal x As Integer) For i=1 To 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程： Private Sub Command1_Click() Dim arr(5)As variant For i=1 To 5 arr(i)=i Next n=10 Call Fun(arr()，n) Text1.Text=n End Sub 程序运行后，单击命令按钮，则在文本框中显示的内容是 【8】 。
填空题一个数据库的数据模型至少应该包括以下3个组成部分，{{U}} 【5】 {{/U}}、数据操作和数据的完整性约束条件。
填空题默认情况下，工具箱中只显示______控件。
填空题以下程序用随机函数模拟掷骰子，统计掷50次骰子出现各点的次数。阅读该程序，并在【8】和【9】处填上正确的内容。
Private Sub Command1_ Click()
Dim d(6)
for i = 1 To 50
n ={{U}} 【8】 {{/U}}
d(n) ={{U}} 【9】 {{/U}}
Next i
for i = 1 To 6
Print d(i)
Next i
End Sub
填空题VB中的控件分为内部控件、ActiveX控件和
________
三类。
填空题算法执行过程中，所需要的基本运算次数称为算法的{{U}} 【1】 {{/U}}。
填空题不等式A＜B＜C＜D的VB表达式为{{U}} 【7】 {{/U}}。
填空题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Commandl_Click()
Dim a (1 To 10)
Dim p(1 To 3)
k=5
For i=1 To 10
a(i)=i
Nexti
Fori=1 To 3
p(i)=a(i*i)
Next i
For i=1 To 3
k=k+p(i)*2
Next i
Print k
End Sub
程序运行后，单击命令按钮，输出结果是{{U}} 【13】 {{/U}}。
填空题编写一个程序把一维数组的各元素反序存放。在主过程中调用subl过程把从键盘上输入的10个元素反序存放后再输出。根据题意，请完善下列程序。
Private Sub subl(b()As Integer, ByVal n As Integer)
Dim i As Integer, j As Integer, t As Integer
{{U}} 【13】 {{/U}}
j=n
Do While i＜j
t=b(i):b(i)=b(j):b(j)=t
i=i+1:j=j-1
Loop
End Sub
Private Sub Command1_Click()
Dim a(1 To 10)As Integer, i As Integer
Randomize
For i=1 To 10
a(i)=Int(100*RnD) +1
Next i
For i={{U}} 【14】 {{/U}}
Print a(i);
Next i
Print
Call{{U}} 【15】 {{/U}}
For i=i To 10
Print a(i);
Next i
Print n
End Sub