填空题为了选择多个控件，可以按住【 】键，然后单击每个控件。
填空题数据结构包括数据的逻辑结构、数据的{{U}} 【2】 {{/U}}以及对数据的操作运算。
填空题关系模型的完整性规则是对关系的某种约束条件，包括实体完整性、 【5】 和自定义完整性。
填空题有如下函数过程：
Function gys(ByVal x As Integer，ByVal y As Integer)As Integer
Do While y＜＞0
preminder=x/y
x=Y
y=preminder
Loop
gys=x
End Function
以下是调用该函数的事件过程，该程序的运行结果是{{U}} 【9】 {{/U}}。
Private Sub Command1_Click()
Dim a As Integer，b As Integer
a=10：b=2
x=gys(a，b)
Print x
End Sub
填空题在窗体上设计两个复选框，一个显示粗体，另一个显示斜体，通过对复选框的选择，在一个文本框中显示相应效果的文本，请完成下列程序。 Private Sub Form_Load() Check1.Caption="显示粗体" Check2.Caption="显示斜体" Text1.Text="May you a happy day!" End Sub Private Sub Check1_Click() If ______=1 Then Text1.FontBold=True Else Text1.FontBold=False End If End Sub Private Sub Check2_Click() If Check2.Value=1 Then Text1.______ Else Text1.______ End If End Sub
填空题要求打开随机文件“C:/Example.txt”文件，文件号为1。实现的语句是______。
填空题以下是一个比赛评分程序。在窗体上建立一个名为Text1的文本框数组，然后画一个名为Text2的文本框和名为Commandl的命令按钮。运行时在文本框数组中输入7个分数，单击．“计算得分”命令按钮，则最后得分显示在Text2文本框中(去掉一个最高分和一个最低．分后的平均分即为最后得分)，如图所示。请填空。PrivateSubCommandl_Click()DimkAsIntegerDimsumAsSingle,maxAsSingle，minAsSinglesum=Text1(0)max=Text1(0)min={{U}}【11】{{/U}}Fork={{U}}【12】{{/U}}To6Ifmax＜Text1(k)Thenmax=Text1(k)EndIfIfmin＞Text1(k)Thenmin=Text1(k)EndIfsum=sum+Text1(k)NextkText2=({{U}}【13】{{/U}})/5EndSub
填空题实现算法所需的存储单元多少和算法的工作量大小分别称为算法的 【1】 。
填空题下列程序的输出结果为______。 Sub OnGousbGotoDemo() Dim Number，MyString Number=2 On Number GoTo Line1, Line2 Exit Sub Line 1： MyString="In Line 1" Print MyString Line2： MyString="In Line2" Prnt MyString End Sub
填空题把窗体的KeyPreview属性设置为True，并编写如下两个事件过程： Private Sub Form_KeyDown (KeyCode As Integer，Shift As Integer)Print Chr(KeyCode) End Sub Private Sub Form_KeyPress(KeyAseii As Integer)Print KeyAscii End Sub 程序运行后，如果将CapsLock 键锁定在大写的状态，这时按下A键时，则：在窗体上输出的输出结果为 【10】 和 【11】 。
填空题在窗体上画一个名称为command 1的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Colilinand1 Click()
Dim a(10) As Integer
For i = 1 To 10
a(i) = i
Next
call Swap(a)
For i = 1 To 10
Print a(i);
Next
End Sub
Sub Swap(b() As Integer)
n ={{U}} 【6】 {{/U}}
For i = 1 To n/2
t = b(i)
b(i) = b(n)
b(n) = t
{{U}} 【7】 {{/U}}
Next
End Sub
上述程序的功能是，通过调用过程Swap，调换数组中数值的存放位置，即a(1)与a(10)的值互换，a(2)与a(9)的值互换，……，a(5)与a(6)的值互换。请填空。
填空题源程序文档化要求程序应加注释。注释一般分为序言性注释和 (4) 。
填空题在两种基本测试方法中， (4) 测试的原则之一是保证所测模块中每一个独立路径至少要执行一次。
填空题下列程序使用FileListBox来实现程序启动时，列出C盘根目录下的所有“*.exe”文件，完成下列程序。 Private Sub Form_Load() File 1.______="c:/" File 1.______="*.exe" File 1.Refresh End Sub
填空题设有如下程序： Prirate Sub Form_Click() Dim a As Integer,b AS Integer a=20:b=50 p1 a,b p2 a,b p3 a,b Print"a="；a,"b=";b End Sub Sub p1(x As Integeh By Val y As Integer) x=x+10 y=y+20 End Sub Sub p2(ByVal x As Integer,y As Integer) x=x+10 y=y+20 End Sub Sub p3 (ByVal x As Integer,ByVal y As Integer) x=x+10 y=y+20 End Sub 该程序运行后，单击窗体，则在窗体上显示的内容是：a=______和b=______。
填空题与8e3ln3数学式子对应的Visual Basic表达式是______。
填空题下面的程序执行时，可以从键盘输入一正整数，然后把该数的每位数字按逆序输出。例如：输入7685，则输出5867；输入1000，则输出0 0 0 1。请填空。 Private Sub Command1_Click() Dim x As Integer x=InputBox("请输入一个正整数") While x＞ (14) Print x Mod 10; x=x/10 Wend Print (15) End Sub
填空题在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_click()
Dim a(1 To 10)
Dim p(1 To 3)
k=5
For i=1 To 10
a(i)=i
Next i
For i=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}}。
填空题设一棵完全二叉树共有700个结点，则在该二叉树中有{{U}} 【3】 {{/U}}个叶子结点。
填空题以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。请在{{U}} 【8】 {{/U}}和{{U}} 【9】 {{/U}}处填入适当的内容，将程序补充完整。
Private Sub Form_Click( )
Dim x As Single，amax As Single，amin As Single
x=Input Box("Enter a score")
amax=X
amin=x
Do While{{U}} 【8】 {{/U}}
If x＞ama x Then
Ama x=x
End lf
If{{U}} 【9】 {{/U}}Then
amin=X
End lf
x=Input Box("Enter a score")
Loop
Print”Max="；amax，"Min="；amin
End Sub