填空题数据库管理系统(DBMS)是数据库的机构，通常由数据定义语言、数据控制语言，{{U}} 【5】 {{/U}}和一些实用程序四部分组成。
填空题以下Prime过程，用于判断—个数是否为素数。素数是只能被1和数本身整除的自然数。一个自然数不是素数，就是合数。用被测试的数除以从2开始到该数本身的数，如果能除尽(余数为0)，则为合数；如果都除不尽(余数均不为0)，则为素数。请在划线处将下面过程补充完整：
Function Prime(inputvar As Integer)As Integer
For i=2 To inputvar-1
If inputvar Mod i={{U}} 【13】 {{/U}}Then
GoTocomfinish
End If
Next i
Prime=inpuvar
Print"素数"
Go To{{U}} 【14】 {{/U}}
comfinish：
Prime=inputvar
Print"合数"
finish:
End Function
填空题为了提高程序的易读性，同的为减少错误，提高软件开发效率，编码时应注意养成良好的{{U}} 【2】 {{/U}}。
填空题执行下列程序，输入数字3，则输出结果为______。 Private Sub Command1_Click() a=inputBox("Input a Number") If a＞5 Then GoTo L5 Else If a＞2 Then GoTo L2 Else GoTo L3 End If Exit Sub L5: Print a Mod 5 Exit Sub L3: Print a Mod 3 Exit Sub L2： Print a Mod 2 End Sub
填空题软件测试的主要和重要的测试方法是通过测试数据和 【3】 的设计来实现。
填空题以下程序段的输出结果是
________
。
num=0
Do While num＜=5
num=num+1
Loop
Print num
填空题组合框有3种不同的类型，这3种类型是下拉式组合框、简单组合框、下拉式列表框，分别通过把______属性设置为、0、1、2来实现。
填空题执行以下程序段，并输入1.23，则程序的输出结果应是{{U}} 【15】 {{/U}}。
N=Str(InputBox("请输入一个实数:"))
p=InStr(N,".")
Print Mid(N, p)
填空题Jackson结构化程序设计方法是英国的M.Jackson提出的，它是一种面向{{U}} 【2】 {{/U}}的设计方法。
填空题下列事件过程的功能是：建立一个名为Datal的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private SubForm_Click() Dim Y As Single Open 【10】 Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) 【11】 Next i Close #2 End Sub
填空题在长度为 n 的顺序存储的线性表中插入一个元素， 最坏情况下需要移动表中________ 个元素
填空题完成下面的程序，使显示结果如下图所示。PrivateSubFormClick()FontSize=18Sample$="______"x=(ScaleWidth-TextWidth(Sample$))/2y=(ScaleHeight-TextHeight(Sample$))/2______CurrentY=y______Sample$EndSub
填空题控件数组的名字由Name属性指定，而数组中的每个元素由______属性指定。
填空题在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程：
Private Sub Form_Load()
Show
Text1.Text=""
Text2.Text=""
Text2.SetFocus
End Sub
Private Sub Text2 KeyDown(KeyCode As Integer,Shift As Integer)
Text1.Text=Text.Text+Chr(KeyCode-4)
End Sub
程序运行后，如果在Text2文本框中输入“efghi”，则Text1文本框中的内容为{{U}} 【11】 {{/U}}。
填空题在深度为7的满二叉树中，度为2的结点个数为
________
。
填空题斐波那契(Fibonacci)数列的构成规律是：数列的第一、二个数是1，从第三个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前12项值的过程，请完善之。 Sub Fibonacci(N As Integer，s1) s1=0 f1=1 (11) For i=1 To N/2 Print f1；f2； s1=f1+f2 f1=f1+f2 f2= (12) Next i Print End Sub Private Sub Command1_Click( ) Dim sun As Integer Call Fibonacci(12，sun) Print "Sun="；Sun End Sub
填空题设a=1，b=2，c=3，d=4，表达式Not b=a Or 4 * a+1＞=d And c＜＞a+b的值为{{U}} 【1】 {{/U}}。
填空题数据的物理结构在计算机存储空间中的存放形式称为数据的 【2】 。
填空题软件测试是保证软件质量的重要手段，而软件测试的主要和重要的测试方法是通过测试方法是通过测试数据和{{U}} 【3】 {{/U}}的设计来实现。
填空题下面程序运行后，单击命令按钮，输出的结果是{{U}} 【12】 {{/U}}
Private Sub Command1_Click()
Dim a%(1 To 4)，b%(2 To 6)，i%，str1#，str2#
For i=1 To 4
a(i)=i
Next
For i=2 To 6
b(i) =i
Next
str1 = YAG(a)
str2 = YAG(b)
Print "str1 ="; str1; "str2 ="; str2
End Sub
Function YAG (a ( ) As Integer)
Dim t#, i%
t=1
For i = LBound(a) To UBound(a)
t=t * a(i)
Next
YAG = t
End Function