计算机二级vb(第8单元)

《计算机二级vb(第8单元)》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、(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　　Whilenum<=2　　num=num+1　

2、　Wend　　Printnum　　（8）改变驱动器列表框的Drive属性值将引发【8】事件。　　（9）下面的程序是由鼠标事件在窗体上画图，如果按下鼠标将可以画图，双击窗体可以清除所画图形。补充完整下面的程序。　　首先在窗体层定义如下变量：　　DimPaintStartAsBoolean　　编写如下事件过程：　　PrivateSubForm_Load(）　　DrawWidth=2　　ForeColor=vbGreen　　EndSub　　PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,_　　XAsSingle,

3、YAsSingle）　　【9】　　EndSub　　PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,_　　XAsSingle,YAsSingle）　　IfPaintStartThen　　PSet(X,Y）　　EndIf　　EndSub　　PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,_　　XAsSingle,YAsSingle）　　【10】　　EndSub　　PrivateSubForm_DblClick()　　【11】　　EndSub　　（10）

4、下列程序的输出结果为【12】。　　num=2　　Whilenum<=3　　num=num+1　　Printnum　　Wend　　（11）以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。　　SubRecArea(L,W）　　DimSAsDouble　　S=LW　　MsgBox"TotalAreais"&Str(S）　　EndSub　　PrivateSubCommand1_Click(）　　DimM,N　　M=InputBox("WhatistheL?"）　　M=Val(M)　　【13】　　N=Val(N)　　【14】　　EndSub　　（12）在窗

5、体上画一个命令按钮，然后编写如下事件过程：　　PrivateSubCommand1_Click(）　　x=0　　DoUntilx=-1　　a=InputBox("请输入第一个数字a的值"）　　a=Val(a）　　b=InputBox("请输入第二个数字b的值"）　　b=Val(b）　　x=InputBox("请输入第三个数字x的值"）　　x=Val(x）　　a=a+b+x　　Loop　　Printa　　EndSub　　在程序运行后，单击命令按钮，在对话框中分别输入5，4，8，5，8，-1，输出结果为【15】。存储结构前件继承降低复杂性关系模型Shanghai3Chang

6、ePaintStart=True10PaintStart=False11Cls34N=InputBox（"WhatistheW?"）14CallRecArea（M,N）12