计算机二级VB(第8单元).docVIP

　　(1) 数据结构分为逻辑结构与存储结构，线性链表属于 【1】 　　(2) 在树形结构中，树根节点没有 【2】 。 　　（3）一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【3】 。 　　（4）软件设计模块化的目的是 【4】 　　（5）数据库管理系统常见的数据模型有层次模型、网状模型和 【5】 3种 　　（6）设有如下程序段： 　　a＄=BeijingShanghai 　　b＄=Mid(a＄,InStr(a＄,g)+1) 　　执行上面的程序段后，变量b＄的值为【6】。 　　（7）以下程序段的输出结果是【7】。 　　num=0 　　While num=2 　　num=num+1 　　Wend 　　Print num 　　（8） 改变驱动器列表框的Drive属性值将引发【8】事件。 　　（9） 下面的程序是由鼠标事件在窗体上画图，如果按下鼠标将可以画图，双击窗体可以清除所画图形。补充完整下面的程序。 　　首先在窗体层定义如下变量： 　　Dim PaintStart As Boolean 　　编写如下事件过程： 　　Private Sub Form_Load(） 　　DrawWidth=2 　　ForeColor=vbGreen 　　End Sub 　　Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ 　　X As Single, Y As Single） 　　【9】 　　End Sub 　　Private Sub Form_MouseMove(Button As Integer, Shift As Integer, _ 　　X As Single, Y As Single） 　　If PaintStart Then 　　PSet (X, Y） 　　End If 　　End Sub 　　Private Sub Form_MouseUp(Button As Integer, Shift As Integer, _ 　　X As Single, Y As Single） 　　【10】 　　End Sub 　　Private Sub Form_DblClick() 　　【11】 　　End Sub 　　（10） 下列程序的输出结果为 【12】。 　　num=2 　　While num =3 　　num=num + 1 　　Print num 　　Wend 　　（11） 以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。 　　Sub RecArea(L, W） 　　Dim S As Double 　　S=L  W 　　MsgBox Total Area is Str(S） 　　End Sub 　　Private Sub Command1_Click(） 　　Dim M, N 　　M=InputBox(What is the L?） 　　M=Val(M) 　　【13】 　　N=Val(N) 　　【14】 　　End Sub 　　（12） 在窗体上画一个命令按钮，然后编写如下事件过程： 　　Private Sub Command1_Click(） 　　x=0 　　Do Until x=-1 　　a=InputBox(请输入第一个数字a的值） 　　a=Val(a） 　　b=InputBox(请输入第二个数字b的值） 　　b=Val(b） 　　x=InputBox(请输入第三个数字x的值） 　　x=Val(x） 　　a=a + b + x 　　Loop 　　Print a 　　End Sub 　　在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为 【15】 。 存储结构 前件 继承 降低复杂性 关系模型 Shanghai 3 Change PaintStart = True10 PaintStart = False11 Cls 34 N = InputBox（What is the W?）14 Call RecArea（M, N） 12