【计算机类职业资格】计算机二级(VB)51及答案解析.doc

《【计算机类职业资格】计算机二级(VB)51及答案解析.doc》由会员分享，可在线阅读，更多相关《【计算机类职业资格】计算机二级(VB)51及答案解析.doc（25页珍藏版）》请在麦多课文档分享上搜索。

1、计算机二级(VB)51 及答案解析(总分：4230.00，做题时间：90 分钟)一、选择题(每小题 2分，共 70分) 下列各(总题数：60，分数：4200.00)1.下面程序段的运行结果是（ ）。 a=1 b=1 Do a=a+1 b=b + 1 Loop Until b5 Print“k=“；a；Spc(4)；“b=“；b+a （分数：70.00）A.k=7 b=14B.k=6 b=6C.k=4 b=8D.k=6 b=122.下列说法错误的是（ ）。（分数：70.00）A.CREATE REPORT PP1B.MODIFY REPORT PP1C.CREATE PP1D.MODIFY PP

2、13.设有声明语句 Dim b(-1 To 10，2 To 9，20)As Integer 则数组 b中全部元素的个数是（ ）。（分数：70.00）A.“设计”视图B.“打印预览”视图C.“报表预览”视图D.“版面预览”视图4.下列语句中，不能实现循环 100次的是（ ）。（分数：70.00）A.联合查询B.传递查询C.数据定义查询D.子查询5.要使菜单项 MenuOne在程序运行时失效，使用的语句是（ ）。（分数：70.00）A.程序的语法错B.程序在编译和运行中所发生的异常事件C.程序预先定义好的异常事件D.程序编译错误6.下列程和序段的执行结果为（ ）。 x=Int(Rnd()+9) S

3、elect Case X Case 10 Print “excellent“ Case 9 Print “good“ Case 8 Print “pass“ Case Else Print “fail“ End Select （分数：70.00）A.excellentB.goodC.passD.fail7.资源文件的扩展名是（ ）。（分数：70.00）A.basB.clsC.frmD.res8.执行下列程序段后，输出的结果是（ ）。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k

4、1 Print y （分数：70.00）A.5B.6C.7D.89.有如下事件过程，单击命令按钮扣，输出结果是( )。 Private Sub Command1 Click( ) Dim b% (1 To4) ,j%, t# For j=1 To 4 b(j) =j Next j t=Tax(b( ) ) Print “t=“; t, End Sub Function Tax (a( ) As Integer) Dim t#, i% t=1 For i=2 To UBound (a) t=t * a(i) Next i Tax=t End Function （分数：70.00）A.私有成员B.

5、保护成员C.公有成员D.所有成员10.以下能在窗体 Form1的标题栏中显示“VisualBasic 窗体”的语句是（ ）。 （分数：70.00）A.Form1Name=“VisualBasic 窗体”B.Form1Title“VisualBasic 窗体”C.Form1Caption“VisualBasic 窗体”D.Form1Text“VisualBasic 窗体”11.下列程序段，在运行时最早输出的内容是（ ）。 a=2 C=1 AAA： C=C + a If c10 Then Print c GoTo AAA Else Print“10 以内的奇数显示完毕。“ End If （分数：7

6、0.00）A.对象的可见性可设为 True或 FalseB.标题的属性值可设为任何文本C.属性窗口中属性可以按字母顺序排列D.某些属性的值可以跳过不设置，系统之不理自动设为空值12.有如下事件过程： Private Sub Command1_Click( ) Dim m AS Integer，n AS Integer m=2：n=1 Print “m=“；m；“n=“；n Call TOD(m，n) Print “m=“；m；“n=“；n End Sub Sub TOD(x，y) x=x2 y=y3 End Sub 程序运行后，输出的结果为( )。 （分数：70.00）A.m=2，n=1 m=

7、1，n=2B.m=2，n=1 m=4，n=1C.m=1，n=2 m=1，n=4D.m=1，n=2 m=2，n=413.在修改列表框内容时，AddItem 方法的作用是（ ）。（分数：70.00）A.在列表框内插入一行文本B.在列表框中插入多行文本C.删除列表框中指定的项目D.清除列表框内的全部内容14.下面说法不正确的是（ ）。（分数：70.00）A.变量名的长度不能超过 255个字符B.变量名可以包含小数点或者内嵌的类型声明字符C.变量名不能使用关键字D.变量名的第一个字符必须是字母15.与 List1Text 属性值相同的是（ ）。（分数：70.00）A.任何时候都可以使用标准工具栏的“菜

8、单编辑器”按钮打开菜单编辑器B.只有当代码窗口为当前活动窗口时，才能打开菜单编辑器C.任何时候都可以使用“工具”菜单下的“菜单编辑器”命令，打开菜单编辑器D.只有当某个窗体为当前活动窗体时，才能打开菜单编辑器16.在窗体上画一个名称为 Label1的标签，然后编写如下事件过程： Private Sub Form_Click() Dim arr(10, 10) As Integer Dim i As Integer, j As Integer For i = 2 To 4 For j = 2 To 4 arr(i, j) = i * j Next j Next i Label1.Caption

9、= Str(arr(2, 2) + arr(3, 3) End Sub 程序运行后，单击窗体，在标签中显示的内容是_。 （分数：70.00）A.12B.13C.14D.1517.下列描述中正确的是_。 （分数：70.00）A.软件工程只是解决软件项目的管理问题B.软件工程主要解决软件产品的生产率问题C.软件工程的主要思想是强调在软件开发过程中需要应用工程化原则D.软件工程只是解决软件开发中的技术问题18.Print方法可以在对象上输出数据，这些对象包括（ ）。（分数：70.00）A.图片框B.状态栏C.标题栏D.代码窗口19.阅读下面的程序段： For a=1 To 2 For b=1 To

10、a For C=b To 2 I=I + 1 Next Next Next Print I 执行上面的三重循环后，I 的值为（ ）。 （分数：70.00）A.4B.5C.6D.920.在窗体上画一个通用对话框,其名称为 CommonDialog1,然后画一个命令按钮,并编写如下事件过程： Private Sub Commandl_Click() CommonDialog1.Filter=“All Files(*.*)|*.*| Text Files“ a2(3, 3) End Sub 程序运行后，单击命令按钮，在窗体上输出的是_。（分数：70.00）A.6 6B.10 5C.7 21D.6 1

11、247.下列程序段的执行结果为（ ）。 a=95 If a60 Then I=l If a70 Then l=2 If a80 Then I=3 If a90 Then I=4 Print“I=“:I （分数：70.00）A.3B.4C.9D.1048.下列程序运行结果是( )。 a=25：b=-45 i=Not a=b Print i （分数：70.00）A.-45B.TrueC.0D.不能输出49.在 Visual Basic中，被称为对象的是 （ ）。（分数：70.00）A.在需要自定义 Swing构件的时候，首先要确定使用哪种构件类作为所定制构件的父类B.paintComponent(

12、 )方法位于 JComponent类内，该方法与 paint( )方法类似，也要求一个 Graphics类的实例为参数C.无论在系统开始执行还是窗口被覆盖后需要重新绘制时，paintComponent( )方法都会被系统自动调用，所以在程序中不要调用它，否则会与自动化过程相冲突D.如果需要重新绘制 Applet，就调用方法 paintComponent( )50.执行下列程序后，鼠标单击窗体，输出结果为（ ）。 Private Sub Form_Click() Print“Click”； End Sub Private Sub Form_MouseDown(Button As Integer，

13、Shift_ As Integer，X As Single，Y As Single) Print “Donw” End Sub Private Sub Form_MouseUp(Button As Integer，Shift_ As Integer，X As Single，Y As Single) Print“Up” End Sub （分数：70.00）A.J2DEB.J2SEC.J2MED.Y2EE51.下列程序段的执行结果为( )。 m=1 n=1 Select Case m Case 1 Select Case n Case 0 Print “* * 0 * *“ Case 1 Prin

14、t “ * * 1 * * “ End Select Case 2 print “ * * 2 * * “ End Select （分数：70.00）A.* * 0 * *B.* * 1 * *C.* * 2 * *D.052.在用菜单编辑器设计菜单时，不可缺少的项目是（ ）。（分数：70.00）A.12B.15C.20D.6053.执行下列程序段后，输出的结果是（ ）。 For k1=0 To 4 y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3 Next k2 Next k1 Print y （分数：70.00）A.90B.60C.4

15、0D.1054.以下合法的 Visual Basic标识符是（ ）。 （分数：70.00）A.ForLoopB.ConstC.9abcD.a # x55.下面叙述不正确的是（ ）。（分数：70.00）A.对顺序文件中的数据操作只能按一定的顺序操作B.顺序文件结构简单C.顺序文件的数据以字符(ASCII 码)形式存储D.能同时对顺序文件进行读写操作56.下列操作可以打开立即窗口的是（ ）。（分数：70.00）A.一旦一个线程被创建，它就立即开始运行B.调用 start( )方法可以使一个线程成为可运行的，但是它不一定立即开始运行C.主线程不具有默认优先级D.Java中线程的优先级从低到高以整数

16、09 表示57.下列叙述中正确的是_。（分数：70.00）A.软件交付使用后还需要进行维护B.软件一旦交付使用就不需要再进行维护C.软件交付使用后其生命周期就结束D.软件维护是指修复程序中被破坏的指令58.设 a=5,b=6,c=7,d=8,执行下列语句后,X 的值为【 】 X=IIF(ab)And(Cd),10,20) （分数：70.00）A.10B.20C.TrueD.False59.在窗体上画一个命令按钮,名称为 Command1,然后编写如下代码： Option Base 0 Private Sub Commandl_Click() Dim A(4)As integer,B(4)As

17、Integer For k=0 To 2 A(k+1)=InputBox(“请输入一个整数“) B(3-k)=A(k+1) Next k Print B(k) End Sub 程序运行后,单击命令按钮,在输入对话框中分别输入 2、4、6,输出结果为【 】 （分数：70.00）A.0B.2C.3D.460.假定一个工程由一个窗体文件 Form1和两个标准模块文件 Model1及 Model2组成。 Model1 代码如下：Public x As Integer Public y As Integer Sub S1( ) x=1 S2 End Sub Sub S2( ) y=10 Form1Sho

18、w End Sub Model2的代码如下： Sub Main( ) S1 End Sub 其中 Sub Main被设置为启动过程。程序运行后，各模块的执行顺序是（ ）。 （分数：70.00）A.Form1Model1Model2B.Model1Model2Form1C.Model2Model1Form1D.Model2Form1Model1二、填空题（每空 2分，共 30分）(总题数：20，分数：30.00)61.在 Visual Basic 的立即窗口内输入以下语句 X=97 ? Chr (X) 在窗门中显示的结果是 1。 （分数：1.50）填空项 1:_62.下面程序是由鼠标事件在窗体上

19、画图，如果按下鼠标将可以画图，双击窗体可以清除所画图形。补充完整下面的程序。 首先在窗体层定义如下变量： Dim PaintStart As Boolean 编写如下事件过程： Private Sub Form_Load1 DrawWidth=2 ForeColor=vbGreen End Sub Private Sub Form_MouseDown(Button As Integer，Shift As Integer，_ X As Single，Y As Single) 2 End Sub Private Sub Form_MouseMove(Button As Integer，Shift

20、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) 3 End Sub Private Sub Form_Db1Click4 5 End Sub （分数：1.50）填空项 1:_63.以下语句输出结果是 1。Print Int(12345.6789 * 100 + 0.5) / 100（分数：1.50）填空项 1

21、:_64.在窗体上有一个“背景色变换”按钮和一个“结束”按钮。单击“背景色变换”按钮，背景色变为红色；再单击，背景色变为绿色；再单击，背景色变为蓝色；再单击背景色变为红色 如此循环。单击“结束”按钮，程序运行结束。请填空。 Private Sub cmdChange_Click1 If Mark=0 Then 2 Mark=1 ElseIf 3Then FormlBackColor=vbGreen Mark=2 ElseIf Mark=2 Then Form1BackColor；vbBlue 4 End If End Sub Private Sub cmdExit_Click5 End End

22、 Sub （分数：1.50）填空项 1:_填空项 1:_填空项 1:_65.下面是用冒泡法将 5个整数按升序排列，请将程序补充完整。 Sub GASR1 Dim m m=Array(10，1，5，6，7) For i=0 To 3 For j= 2 If m(i) =m(j) Then 3 m(i) =m(j) m(j) =t End If Next j 4 For i=0 To 4 Print m(i) Next i End Sub （分数：1.50）填空项 1:_66.下面程序的作用是用 InputBox函数输入一个整数，然后判断能否同时被 2，5 和 7整除， 果能则输出该数及平方值。请

23、填空。 Private Sub Command1_Click1 Dim numX As Integer numX = Val (InputBox(“请输入一个整数“) If 2Then Form1Print 3 End If End Sub （分数：1.50）填空项 1:_67.有下面一个程序段，从文本框中输入数据，如果该数据满足条件，除以 4余 1，除以 5余 2则输出，否则，将焦点定位在文本框中，并清除文本框的内容。 Private Sub Command1_Click( ) x=Val(Text1Text) If 1 Then Print x Else Text1Text=“ 2 End

24、 If End Sub （分数：1.50）填空项 1:_68.已知 B的 ASCII码为 66，以下程序统计由键盘输入的字符串中各英文字母的使用次数 Dim 1 For i=65 To 90 pp(i) =0 Next x$=InputBox(“Enter a string“，x$) x$=UCase$(x$) For i=1 To 2 n=Asc(Mid$(x$，i，1) If n =65 And n =90 Then 3 End If Next i For i=65 To 90 If pp(i) 0 Then Print Chr$(i)；pp(i) End If Next （分数：1.50

25、）填空项 1:_填空项 1:_填空项 1:_69.下面程序的功能是产生 10个小于 100(不含 100)的随机正整数，并统计其中 5的倍数所占比例，但程序不完整，请补充完整。 Sub PR1 Randomize Dim a For j=1 To 10 a(i)=Int( 2 ) If 3Then k=k+1 Print a(j) Next j Print Print k/10 End Sub （分数：1.50）填空项 1:_70.在数据库系统中,实现各种数据管理功能的核心软件称为 1。 （分数：1.50）填空项 1:_71. 1的任务是诊断和改正程序中的错误。（分数：1.50）填空项 1:_

26、72.下面运行程序后，单击命令按钮，输出的结果是 1。 Private Sub Command1_Click2 Dim a%(1 To 4)，b%(3 To 6)，i%，s1#，s2# For i=1 To 4 a(i) =i Next i For i=3 To 6 b(i) =i Next i s1=YAS(A) s2=YAS(B) Print“s1=“；s1；“s2=“；s2 End Sub Function YAS(a3As Integer) Dim t#，i% t=1 For i=LBound(A) To UBound(A) t=t * a(i) Next i YAS=t End Fu

27、nction （分数：1.50）填空项 1:_73.下列程序是判断一个整数(=3)是否为素数，请补充完整。 Dim n As Integer n=InputBox(“请输入一个整数(=3)“) k=Int(Sqr(n) i=2 swit=0 While i10，000，-100) fShow fCaption=y End Sub 运行以上程序，正确的结果是（ ）。 （分数：70.00）A.Form1的 Capdon属性值为 100B.Form2的 Caption属性值为-100 C.Form1的 Caption属性值为-100D.Form2的 Capdon属性值为 100解析：24.在窗体上画

28、一个命令按钮，然后编写下列程序： Private Sub Command3_Click( ) Tcl 2 Tcl 3 Tel 4 End Sub Sub Tcl(a As Integer) Static x As Integer x=x + a Print x； End Sub 程序运行后，单击命令按钮，输出结果为（ ）。 （分数：70.00）A.2 3 4B.2 5 9 C.3 5 4D.2 4 3解析：在过程 TCL中，将 Integer型变量 x定义为静态变量(Static)，Static 语句的格式与 Dim语句完全一样，但 Static语句只能出现在事件过程，Sub 过程或 Func

29、- tion过程中，在过程中的 Static变量只有局部的作用域，即只能在本过程中可见，但可以和模块级变量传递，即使过程结束后，其值仍能保留。Tcl过程是将变量 a的值加上 x赋给 x，然后输出 x的值；第一次调用 Tcl过程时，x 未赋值，默认为 0，所以输出结果为 2，第二次调用 Tcl过程时，因为 x为静态变量，所以它的值为上次调用后的值，即为2，加上 a后，x 的值变为 5，输出结果为 5，同理，第三次调用后输出结果为 9。25.可以在常量的后面加上类型说明符以显示常量的类型，可以表示整型常量的是（ ）。（分数：70.00）A.对象的可见性可设为 True或 False B.标题的属性

30、值不可设为任何文本C.属性窗口中属性只能按字母顺序排列D.某些属性的值可以跳过不设置，自动设为空值解析：在 Visual Basic中，因为“菜单编辑器”命令是在“工具”菜单下，所以只有当某个窗体为当前活动窗体时，才能从“工 具”菜单中选择“菜单编辑器”选项，打开菜单编辑器。26.属性 BorderColor 的作用是（ ）。（分数：70.00）A.Sub Submit(ByVal n，ByVal m)B.Sub Submit(n，ByVal m)C.Sub Submit(n，m) D.Sub Submit(ByVal n，m)解析：C+语言中默认小数的输出位一共是 6位，fixed 的意义是

31、在小数点后保留 6位。27.当双击窗体 Form1时，要将窗体 Form1隐藏起来、将窗体 Form2以模式方式显示出来的事件过程，正确的是( )。 （分数：70.00）A.B.C.D. 解析：ALL，REST，NEXT 和 RECORD都可以用来表示记录“范围”，TOP 和 BOTTOM表示表中固定的位置，FOR和 WHILE 都是表示条件的短语。28.设有如下过程： Sub ff(x，y，z，) x=y+z End Sub 以下所有参数的虚实结合都是传址方式的调用语句是（ ）。 （分数：70.00）A.12B.13C.14D.15 解析：语句 r= unc (func(x，y)，z)；中，

32、fun(x，y)是一次调用函数，它的值作为 func另一次调用的实参。注意本题调用两次函数。29.关于货币型数据的说明，正确的是（ ）。（分数：70.00）A.宏操作对象B.宏条件表达式 C.窗体或报表控件属性D.宏操作目标解析：在 Visual FoxPro中，如果要在同一时刻打开多个表，只需要利用 SELECT命令选择不同的工作区并打开不同的表即可。最小的工作区号是 1，最大的是 32767，即可以同时打开 32767个表。30.下列数组定义语句错误的是( )。（分数：70.00）A.k=10 Dim Arr(k) B.Const k=10 Dim Arr(k)C.Dim Arrl(10)

33、 As Integer Dim Arr2(10)D.Dim Arrl(1 To 10) Dim Arr2(1 To 10，2 To 11)解析：数组使用前要先定义，定义数组是为了给数组分配存储空间，所以定义 数组维的界不能是变量，但可以是符号常量。注意：选项 A)错误，定义数组 Arr语句中，维的界用了变量 k选项 B)正确，定 义数组 Arr语句中，维的界 k是符号常量；选项 C)正确，用 As Integer说明数组 Arrl是整 型数组，数组Arr2没有指明类型，则隐含数组为 Variant类型；选项 D)正确。维的界用 “ To ”的形式定义是正确的。31.以下叙述中错误的是（ ）。

34、（分数：70.00）A.一个工程可以包括多种类型的文件B.Visual Basic应用程序既能以编译方式执行，也能以解释方式执行C.程序运行后，在内存中只能驻留一个窗体 D.对于事件驱动型应用程序，每次运行时的执行顺序可以不一样解析：32.以下叙述中错误的是（ ）。 （分数：70.00）A.事件过程是响应特定事件的一段程序B.不同的对象可以具有相同名称的方法C.对象的方法是执行指定操作的过程D.对象事件的名称可以由编程者指定 解析：33.下列程序的执行结果为( )。 Ptivate Sub Commandl_Click() Dim FirStr As String FirStr=“abcdef

35、“ Print Pct (FirStr) End Sub Private Function Pct(xStr As String)As String Dim tempStr As String,strLen As Integer tempStr=“ strLen=Len(xStr) i=1 Do While i=Len(xStr)-3 tempStr=tempStr + Mid(xStr，i，l) + Mid(xStr，strLen - i+i ，1) i=i + 1 Loop Pct=tempStr End FunCtion （分数：70.00）A.voidB.intC.new D.long

36、解析：在 Visual Basic中，PictureBox 和 Frame可作为其他控件的容器，PictureBox 用于显示，包括图片或者文本，并可以装入位图、田标等各种格式的图形文件或者作为其他控件的容器；Frame 可组合相关的对象，将性质相同的控件集中在一起其他控件均不能作为容器容纳其他控件的容器使用。34.要获得当前驱动器应使用驱动器列表框的属性是（ ）。（分数：70.00）A.schoolB.生日快乐C.helloc D./注释解析：字段命名规则为：长度 164 个字符；可以包含字母、汉字、数字、空格和其他字符；不能包括句号(.)、感叹号(!)、方括号()和重音符号()。35.单击

37、命令按钮时，下列程序的执行结果为（ ）。 Private Sub Command1 Click() Dim x As Integer，y As Integer x=12：y=32 Call PCS(x，y) Print x；y End Sub Public Sub PCS(ByVal n As Integer，ByVal m As Integer) n=n Mod 10 m=m Mod 10 End Sub （分数：70.00）A.1232 B.232C.23D.123解析：此题是函数过程的调用。 在调用过程时，一般主调与被调过程之间有数据传递，即将主调过程的实参传递给被调用的过程，完成实参与

38、形参的结合，然后执行被调过程，在 Visual Basic中，实参与形参的结合有两种方式，即传址与传值。这两种方法的特点如下： 传址的结合过程是，当调用一个过程时，它将实参的地址传给形参，因此在被调用的过程中，对形参的任何操作都变成了对相应实参的操作，因此实参的值会随形参的改变而改变。 传值的结合过程时：当调用一个过程时，系统将实参的值复制给形参并断开了联系，被调用过程中的操作时在形参自己的存储单元中进行的，当过程调用结束时，这些形参所占用的存储单元也同时被释放，因此在过程中对形参的任何操作不会影响实参。而题中被调过程 PCS中有两个形参，两者均为传值方式。主调过程分别把实参 x、y 传递给

39、PCS，所以当过程调用结束后，实参x、y 的值都没有改变，最后输出的值应为 1232。36.在窗体上画四个文本框（如图所示），并用这四个文本框建立一个控件数组，名称为 Text1（下标从0开始，自左至右顺序增大），然后编写如下事件过程： （分数：70.00）A.0 1 2 3 B.1 2 3 4C.0 1 3 2D.出错信息解析：37.在 Visual Basic中，要将一个窗体加载到内存进行预处理但不显示，应使用的语句是（ ）。（分数：70.00）A.关系中每一个属性对应一个值域B.关系中不同的属性可对应同一值域C.对应同一值域的属性为不同的属性 D.DOM(A)表示属性 A的取值范围解析：

40、Caption 不是只读属性，在设计阶段可以在属性窗口中改变，也可以用代码在运行时改变，不同的运行状态可以有不同的 Caption属性值，所以选项 A)是正确的；Height 和 Width的默认的单位是twip，1twip 等于 1/1440英寸，是 1点的 1/20，故选项 B)是不正确的；Icon 属性是用来设置窗体最小化图标的，所以选项 C)的表述是正确的；用来激活属性窗口的快捷键是 F4键，所以选项 D)也是正确的。38.对长度为 n的线性表进行顺序查找，在最坏情况下所需要的比较次数为_。 （分数：70.00）A.log2nB.n/2C.n D.n+1解析：在进行顺序查找过程中，如果

41、线性表中的第一个元素就是被查找元素，则只需做一次比较就查找成 功，查找效率最高；但如果被查找的元素是线性表中的最后一个元素，或者被查找的元素根本就不在线性 表中，则为了查找这个元素需要与线性表中所有的元素进行比较，这是顺序查找的最坏情况。所以对长度为 n 的线性表进行顺序查找，在最坏情况下需要比较 n 次。39.有如下事件过程： Function UNC (ByVal x As Integer，ByVal y As Integer) As Integer Do While y0 sic=x/y x=y y=sic Loop UNC=x End Function 以下是该函数的调用过程，该程序的

42、运行结果是( )。 PriVate Sub COmmand1_Click() Dim a As Integer Dim b As Integer a=12 b=2 x=UNC (a，b) Print x End Sub （分数：70.00）A.123 B.3120C.312D.3012解析：本题考查的是考生对引用的掌握，ref 实际上就是变量 num的别 名，所以 ref=ref+2时，num 已经变成了 3。40.在以下描述中正确的是（ ）。 （分数：70.00）A.标准模块中的任何过程都可以在整个工程范围内被调用B.在一个窗体模块中可以调用在其他窗体中被定义为 Public的通用过程 C.

43、如果工程中包含 Sub Main过程，则程序将首先执行该过程D.如果工程中不包含 Sub Main过程，则程序一定首先执行第一个建立的窗体解析：41.下列各控件不包含滚动条的控件是（ ）。（分数：70.00）A.x=4B.x=8 C.x=6D.x=12解析：选择查询是属于查询的种类，跟操作查询并列。操作查询包括生成表查询、删除查询、更新查询和追加 查询 4种。42.单击命令按钮时，下列程序的执行结果是（ ）。 Private Sub Book(x As Integer) x=x * 2 + l If x6 Then Call Book(x) End If X=X * 2 + 1 Print x

44、； End Sub Private Sub Command2_Click() Book2 End Sub （分数：70.00）A.package testpackage； public class Test B.import java.io.* ； package testpackage； public class Test C.import java.io.*； class Person public class Test D.import java.io.*； import java.awt.*； public class Test 解析：Java 是区分大小写的，true 是 Java的

45、保留字，而 TRUE不是。boolean， int 和 public都是 Java的保留字。43.与 List1Text 属性值相同的是（ ）。（分数：70.00）A.List1ListCountB.List1List(ListCount-1)C.List1ListIndexD.List1List(ListListIndex) 解析：题中涉及到列表框的四个属性：Text 属性、List 属性、ListCount 属性和 listIndex属性，其中List属性是一个数组。Text 属性是字符类型，List 属性是数组， ListCount 属性是数值类型，ListIndex属性也是数值类型。选

46、项 A) 和选项 C) 是数值类型，而 List1Text 是字符类型，所以这两个选项不是本题的答案；List1Text 属性表示最后一次选中项的文本，而选项 ListList(ListCount-1)表示列表框中最后一个选项的文本，二者的含义不同，所以选项 B) 不是本题的答案；ListListIndex 返回的是选中的表项的位置，与 ListText 的属性值相同。44.表达式 32 Mod l4/23的值是（ ）。（分数：70.00）A.1B.0 C.2D.3解析：在做本题之前要先了解各种运算符的优先级，只有了解了之后才能作对。幂运算符()优先级最高，其次是取负、乘、浮点除、整除、取模、加减、字符串连接等。其中，乘和浮点除是同级别的运算符，加和减是同级运算符。此外，如果表达式中有括号，则计算括号内的表达式的值。通过运算本题的结果是0。45.数据库设计的根本目标是要解决_。 （分数：70.00）A.数据共享问题 B.数据安全问题C.大量数据存储问题D.简化数据维护解析：由于数据的集成性使得数据可为多个应用所共享，特别是在网络发达的今天，数据库与网络的结合 扩大了数据关系的应用范围。数据的共享本身又可极大地减少数据冗余性，不仅减少了不必要的存储空间，更为重要的是可以避免数据的不一致性。因此，数据库设计的根本目标