填空题线性表是最简单的一种数据结构，有顺序和链接两种存储方式。线性表按链接方式存储时，每个结点的存储包括______两部分。
填空题在n个运动员中选出任意r个人参加比赛，有很多种不同的选法，选法的个数可以用公式计算，下图窗体中3个文本框的名称依次是Text1、Text2、Text3。程序运行时，在Text1、Text2中分别输入n和r的值，单击Command1按钮即可求出选法的个数，并显示在Text3文本框中。请填空。PrivateSubCommand1_Click()DimrAsInteger,nAsIntegern=Text1r=Text2Text3=fun(n)/fun((9))/fun(r)EndSubFunctiontuntnAsInteger/aslongDimfAsLongX=1Fork=1Tont=t*kNextfun=tEndFunction
填空题在窗体上有一个命令按钮，然后编写如下程序： Function Trans(ByVal num As Long)As Long Dim k As Long k=1 DO While num k=k*(num Mod 10) num=num/10 Loop Trans=k Print trans End Function Private Sub Command1_Click() Dim m As Long Dim s As Long m=InputBox("请输入一个数") s=Trans(m) End Sub 程序运行时，单击命令按钮，在输入对话框中输入“789”，输出结果为 [11] ，在输入对话框中输入“987”输出 [12] ，在输入对话框中输入“879”，输出结果为 [13] 。
填空题下列程序的功能是：当x＜50时，y=0.8 x；当50≤x≤100时，y:0.7 x；当x＞100时，没有意义。请填空。 Private Sub Command1_Click() Dim X As Single x:InputBox(“请输入x的值！”) Select Case X Case Is ＜ 50 y=0.8*X Case 50 To 100 y=07 *x (12) Print“输入的数据出界！” End Select Print X，y End Sub
填空题数据库管理系统(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