填空题设有如下程序 Private 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 Integer， ByVal 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=______。
填空题由关系数据库系统支持的完整性约束是指{{U}} 【5】 {{/U}}和参照完整性。
填空题数据结构包括数据的逻辑结构、数据的
________
以及对数据的操作运算。
填空题下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度：1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。
Private TyPe Ang
K As Integer
Sinx As Single
Cosx As Single
End TyPe
Dim Ksc As Ang
Private Sub Form_Click()
Dim Y As Single
Open ______
Y=3.14159/180
For i=1 T0 90
Ksc.K=i
Ksc.Sinx=Sin(i*Y)
Ksc.Cosx=Cos(i*Y)
Put #2，i，Ksc
Next i
Close #2
End Sub
填空题在VB中，用于文件复制的命令是______。
填空题具有n个结点的完全二叉树的深度为 【2】 。
填空题下列程序的功能是计算两个自然数的最大公约数，界面如下图所示。给定的程序不完整，将程序补充完整。PrivateSubCommand1_Click()DimxAsLong，yAsLong，iAsLongx=Val(Text1．Text)y=Val(Text2．Text)Text3．Text=Str(____________)EndSubFunctionfun1(aAsLong，bAsLong)AsLongDimrAsLongDimtAsLongIf____________Thent=aa=bb=tEndIfr=aModbDoWhiler＜＞0a=bb=rr=aModbLoop____________EndFunction
填空题软件是程序、数据和{{U}} 【3】 {{/U}}的集合。
填空题下列程序的功能是：将数据1,2…，10写入顺序文件Base.txt中，请填空。 Private Sub Form_Click( ) Dim i As Integer Open "Base. txt" For Output As #1 For i=1 To 10 【15】 Next Close #1 End Sub
填空题为同一种对象设置不同的属性，可以使一种对象具有不同的外观和不同的______。
填空题把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：
Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)
Print KeyCode
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)
Print KeyAscii
End Sub
程序运行后，如果按下B键，则在窗体上输出的数值是【 】和【 】。
填空题下面的程序用于根据文本框Test中输入的内容进行以下处理：
若Text为1，则打印“您的成绩为优秀！”；若Text为2，则打印“您的成绩为良好!”；若Text为3，则打印“您的成绩为一般”；否则打印“您的成绩一般以下!”，请填空。
Private Sub Command1_Click( )
Selct Case Val(Text1.Text)
Case{{U}} 【13】 {{/U}}
Print "您的成绩为优秀！"
Case{{U}} 【14】 {{/U}}
Print "您的成绩为良好！"
Case{{U}} 【15】 {{/U}}
Print "您的成绩为一般！"
Case Else
Print "您的成绩为一般以下！"
End Select
End Sub
填空题当用______方式打开文件时，如果对文件进行写操作，则写入的数据附加到原文件的后面。
填空题下列函数调用时弹出的对话框中按钮的个数为______。 MsgBox("程序非法!"，vbAbortRetryIgnore，"消息提示：")
填空题下列软件系统结构图的宽度为________
填空题常用的黑盒测试有等价分类法、 【1】 、因果图法和错误推测法4种。
填空题以下程序的功能是：从键盘上输入若干个学生的考试分数，当输入负数时结束输入，然后输出其中的最高分数和最低分数。请在空白处填入适当的内容，将程序补充完整。 Private Sub Form_Click() Dim x As Single, amax As Single, amin As Single x=InputBox("Enter a score") amax=x amin=x Do, While______ If x＞amax Then aman=X End If If______Then amin=x End If x=InputBox("Enter a Score") Loop Pnnt"Max="; amax, "Min=";amin End Sub
填空题阅读以下程序：
Prlvate Sub Form_Click()
Dim k，n，m As Integer
n=10
m=1
k=1
Do While k＜=n
m=m*2
k＝k+1
Loop
Print m
End Sub程序运行后，单击窗体，输出结果为{{U}} 【8】 {{/U}}。
填空题数据的基本单位是 【5】 。
填空题为了能自动放大或缩小图像框中的图形以与图像框的大小相适应，必须把该图片框的 Stretch属性设置为{{U}} 【8】 {{/U}}。