1、计算机二级(VB)36 及答案解析(总分:100.00,做题时间:120 分钟)一、选择题(每小题 2 分,共 70 分) 下列各(总题数:35,分数:70.00)1.下列程和序段的执行结果为( )。 x=Int(Rnd()+9) Select Case X Case 10 Print “excellent“ Case 9 Print “good“ Case 8 Print “pass“ Case Else Print “fail“ End Select (分数:2.00)A.派生类一般都用公有派生B.对基类成员的访问必须是无两义性的C.赋值兼容规则也适用于多重继承的组合D.基类的公有成员在派
2、生类中仍然是公有的2.当一个命令按钮的 Default 属性为 True 时,按何键与单击该命令按钮作用相同( )。(分数:2.00)A.100B.80C.64D.323.下列程序段的执行结果为( )。 I=4 x=5 Do I=I+1 x=x+2 Loop Until I=7 Print“I=“;I Print“X=“;x (分数:2.00)A.I=4 x=5B.I=7 x=15C.I=6 x=8D.I=7 x=114.在窗体上画一个通用对话框图,其 Name 属性为 Cont,瑞画一个命令按钮,Name 属性为 Command1,然后编写如下事件过程: Privute Sub Comman
3、d1_Click( ) ContFileName=“ “ ContFlags=vbOFNFileMustExist ContFilter=“All Files| * . *“ ContFilterIndes_3 ContDialogTitle=“Open File“ ContAction=1 If ContFileName=“ “ Then MsgBox “No file selected“ Else Open ContFileName For Input As #1 Do While Not EOF(1) Input #1. b$ Print b$ Loop End If End Sub 以
4、下各选项,对上述事件过程描述错误的是( )。 (分数:2.00)A.+i;B.D-;C.c+;D.-f;5.设有声明语句 Dim b(-1 To 10,2 To 9,20)As Integer 则数组 b 中全部元素的个数是( )。(分数:2.00)A.“设计”视图B.“打印预览”视图C.“报表预览”视图D.“版面预览”视图6.数据库技术的根本目标是要解决数据的【 】(分数:2.00)A.存储问题B.共享问题C.安全问题D.保护问题7.设窗体上有 1 个滚动条,要求单击滚动条右端的鬻按钮一次,滚动块移动一定的刻度值,决定此刻度值的属性是【 】(分数:2.00)A.MaxB.MinC.Small
5、hangeD.Large Change8.标签控件能够显示文本信息,决定其文本内容的属性是( )。(分数:2.00)A.运算符重载不能改变操作数的个数、运算符的优先级、运算符的结合性和运算符的语法结构B.不是所有的运算符都可以进行重载C.运算符函数的调用必须使用关键字 operatorD.在 C+语言中不可通过运算符重载创造出新的运算符9.下列说法不正确的是( )。(分数:2.00)A.创建一个 Socket,并使用该套接字来创建一个输入流B.创建一个 URL,并使用该 URL 来创建一个 URL ConnectionC.使用 Applet 小程序的 showDocument()方法来装载D.
6、上述方法没有什么区别,所以也就没有哪个最佳10.以下叙述中错误的是【 】(分数:2.00)A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Public 定义的通用过程不能被其他窗体调用C.窗体和标准模块需要分别保存为不同类型的磁盘文件D.用 Dim 定义的窗体层变量只能在该窗本中使用11.表达式(3/2+1)*(5/2+2)的值是( )。(分数:2.00)A.11.25B.3C.6.125D.412.若在某窗体模块中有如下事件过程 Private Sub Command1_Click(Index As Integer) End Sub 则以下叙述中正确的是【 】 (分数:2.00)A
7、.此事件过程与不带参数的事件过程没有区别B.有 1 个名称为 Command1 的窗体,单击此窗体则执行此事件过程C.有 1 个名称为 Command1 的控件数组,数组中有多个不同类型控件D.有 1 个名称为 Command1 的控件数组,数组中有多个相同类型控件13.新建一个列表框,要实现对列表项可以复选,应设置的属性是( )。(分数:2.00)A.ScrollBarsB.MultiSelectC.DataFieldD.Stretch14.以下叙述中错误的是( )。 (分数:2.00)A.在 KeyPress 事件过程中不能识别键盘的按下与释放B.在 KeyPress 事件过程中不能识别回
8、车键C.在 KeyDown 和 KeyUp 事件过程中,将键盘输入的“A”和“a”视作相同的字母D.在 KeyDown 和 KeyUp 事件过程中,从大键盘上输出的“1”和从右侧小键盘上输入的“1”被视作不同的字符15.属性 BorderColor 的作用是( )。(分数:2.00)A.设置直线颜色和形状边界颜色B.设置直线或形状背景颜色C.设置直线或形状边界线的线型D.设置形状的内部颜色16.下列过程定义语句中,参数不是对象的定义语句是( )。(分数:2.00)A.Sub Pro4 (x As Form)B.Sub Pro4 (y As Control)C.Sub Pro4 (Forml A
9、s Form,Labell As Control)D.Sub Pro4 (x As Currency)17.下面叙述不正确的是( )。(分数:2.00)A.98B.67xC.x394D.0X29218.下面程序段,运行后的结果是( )。 Private Sub Commandl_Click( ) Dim b%(1 To 4),i%,t# For i=1 To 4 b(i)=i Next i t=Tof(b( ) ) Print“t=“;t, End Sub Function Tof(a() As Integer) Dim t#,i% t=1 For i=2 To UBound(a) t=t *
10、 a(i) Next i Tof=t End Function (分数:2.00)A.t=18B.t=24C.t=30D.t=3219.设有如下通用过程: Public Sub Fun(a() As Integer, x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。然后编写如 下的事件过程: Private Sub Command1_Click() Dim arr(5) As Integer, n As Integer For i = 1 To 5
11、 arr(i) = i + i Next Fun arr, n Text1.Text = Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是_。 (分数:2.00)A.30B.25C.20D.1520.下列程序段的执行结果为( )。 a=1 b=0 Select Case a Case 1 Select Case b Case 0 Print“*0*“ Case 1 Print“*1*“ End Select Case 2 Print“*2*“ End Select (分数:2.00)A.a=2,b=1B.a=1,b=1C.a=1,b=0D.a=2,b=221.下
12、列程序的执行结果为( )。 Private Sub Command1_Click() Dim FirStr As String FirSt=“abcdef“ Print Pat(FirStr) End Sub Private Function Pat(xStr As String)As String Dim tempStr As String,strLen As Integer tempStr=“ “ strLen=Len(xStr) i=1 Do While i=y Then z=x:z=yB.If x=y Then z=x Else z=yC.z=y:If x=y Then z=xD.If
13、 x=7 的值为 True 时才停止。所以当程序结束运行后 I=7 ,x=11。4.在窗体上画一个通用对话框图,其 Name 属性为 Cont,瑞画一个命令按钮,Name 属性为 Command1,然后编写如下事件过程: Privute Sub Command1_Click( ) ContFileName=“ “ ContFlags=vbOFNFileMustExist ContFilter=“All Files| * . *“ ContFilterIndes_3 ContDialogTitle=“Open File“ ContAction=1 If ContFileName=“ “ Then
14、 MsgBox “No file selected“ Else Open ContFileName For Input As #1 Do While Not EOF(1) Input #1. b$ Print b$ Loop End If End Sub 以下各选项,对上述事件过程描述错误的是( )。 (分数:2.00)A.+i;B.D-; C.c+;D.-f;解析: 此题考核了 Show 方法的使用,Show 方法的格式为: 窗体名称Show模式 Show 方法用来显示一个窗体。如果省略“窗体名称”,则显示当前窗体。参数”模式”用来确定窗体的状态,可以取两种值,即 0 和 1(不是 Fals
15、e 和 True)。当“模式”值为 1(或常量 vbModal)时,表示窗体是“模态型”窗体,在这种情况下,鼠标只在此窗体内起作用,不能到其他窗口内操作,只有关闭该窗口才能对其他窗口进行操作;当“模式”值为 0(或省略参数“模式”值)时,表示窗体为“非模态型”窗体,不用关闭该窗体就可以对其他窗体进行操作;Show 方法兼有装入和显示窗体的双重功能,也就是说,在执行Show 时,如果窗体不在内存中,则 Show 自动把窗体装入内存,然后显示出来。 5.设有声明语句 Dim b(-1 To 10,2 To 9,20)As Integer 则数组 b 中全部元素的个数是( )。(分数:2.00)A.
16、“设计”视图B.“打印预览”视图 C.“报表预览”视图D.“版面预览”视图解析:3 种报表视图分别为“设计”、“打印预览”和“版面预览”,没有“报 表预览”。“打印预览”用于查看报表的页面数据输出形态。6.数据库技术的根本目标是要解决数据的【 】(分数:2.00)A.存储问题B.共享问题 C.安全问题D.保护问题解析:由于数据的集成性使得数据可被多个应用程序所共享,特别是在网络发达的今天,数据库与网络的结合扩大了数据库的应用范围,所以数据库技术的根本目标是解决数据的共享问题。7.设窗体上有 1 个滚动条,要求单击滚动条右端的鬻按钮一次,滚动块移动一定的刻度值,决定此刻度值的属性是【 】(分数:
17、2.00)A.MaxB.MinC.Smallhange D.Large Change解析:在一般情况下,垂直滚动条的值由上往下递增,最上端代表最小值(Min),最下端代表最大值(Max);水平滚动条的值从左到右递增,最左端代表最小值(Min),最右端代表最大值(Max),其取值范围为-3276832768;因此选项 A)和选项 B)不正确滚动条有两个属性是设置滚动步长的,为 Iarge Chang 和SmallChange,而 Iarge Change 表示单击滚动条中滚动框前面或后面的部位时,Value 增加或减少的增量值Small Change 表示单击滚动条两端的箭头时,Value 属性
18、增加或减少的增量值,即滚动块移动的刻度值。8.标签控件能够显示文本信息,决定其文本内容的属性是( )。(分数:2.00)A.运算符重载不能改变操作数的个数、运算符的优先级、运算符的结合性和运算符的语法结构B.不是所有的运算符都可以进行重载C.运算符函数的调用必须使用关键字 operator D.在 C+语言中不可通过运算符重载创造出新的运算符解析:基类中说明的虚函数,在派生类中自然就是虚函数,对于纯虚函数 必须在后面继承的派生类中给出具体的实现;静态成员函数不能进行动态联编,所以虚 函数不能是静态的。9.下列说法不正确的是( )。(分数:2.00)A.创建一个 Socket,并使用该套接字来创
19、建一个输入流B.创建一个 URL,并使用该 URL 来创建一个 URL Connection C.使用 Applet 小程序的 showDocument()方法来装载D.上述方法没有什么区别,所以也就没有哪个最佳解析:A)选项为返回数值表达式值的绝对值,C)选项为平方根值,D)选项为数值表达式的符号值。10.以下叙述中错误的是【 】(分数:2.00)A.一个工程中可以包含多个窗体文件B.在一个窗体文件中用 Public 定义的通用过程不能被其他窗体调用 C.窗体和标准模块需要分别保存为不同类型的磁盘文件D.用 Dim 定义的窗体层变量只能在该窗本中使用解析:一个工程文件由若干个窗体和模块组成,
20、每个窗体或模块都对应有一个不同的文件。对于用 Dim 和蹦 vate 声明的窗体层变量,其作用范围都是在所声明的窗体范围内;用 Public 声明的窗体层变量作为窗体公用数据成员,可以在其他窗体或模块中以“窗体名.变量“方式引用,其作用可以大于当前窗体范围。11.表达式(3/2+1)*(5/2+2)的值是( )。(分数:2.00)A.11.25 B.3C.6.125D.4解析:本题主要考查了运算符“/”的使用,在 Visual Basic 中符号“/”为浮点数除法运算符,执行标准的除法操作,运算结果的为浮点数,通过运算本题的结果为 1125;计算结果为选项 A)。12.若在某窗体模块中有如下事
21、件过程 Private Sub Command1_Click(Index As Integer) End Sub 则以下叙述中正确的是【 】 (分数:2.00)A.此事件过程与不带参数的事件过程没有区别B.有 1 个名称为 Command1 的窗体,单击此窗体则执行此事件过程C.有 1 个名称为 Command1 的控件数组,数组中有多个不同类型控件D.有 1 个名称为 Command1 的控件数组,数组中有多个相同类型控件 解析:根据题意,该段代码应为命令按钮数组的单击过程代码,它与单个命令按钮的事件过程是不同的,它根据索引值的不同来执行不同的代码,所以选项 A)和选项 B)都不正确;控件数
22、组是由一组相同类型的控件组成,这些控件共用一个相同的控件名字,具有相同的属性设置,因此,选项 C)错误,选项 D)正确。13.新建一个列表框,要实现对列表项可以复选,应设置的属性是( )。(分数:2.00)A.ScrollBarsB.MultiSelect C.DataFieldD.Stretch解析:在列表框的属性中,可以通过设置 MultiSelect 属性来实现是否可以进行列表项的多选,属性值为0,不可以多选列表;属性为 1,无需要用 Ctrl 或者 Shift 就可进行多选;属性值为 2 时,要利用 Ctrl或者 Shift 键,所以选项 B) 是正确的。而选项 A) 是设置滚动条的,
23、与此无关;选项 C) DataField 是用来设置数据的,也无关;选项 D) Strech 不是列表框的属性,所以也不正确。14.以下叙述中错误的是( )。 (分数:2.00)A.在 KeyPress 事件过程中不能识别键盘的按下与释放B.在 KeyPress 事件过程中不能识别回车键 C.在 KeyDown 和 KeyUp 事件过程中,将键盘输入的“A”和“a”视作相同的字母D.在 KeyDown 和 KeyUp 事件过程中,从大键盘上输出的“1”和从右侧小键盘上输入的“1”被视作不同的字符解析:15.属性 BorderColor 的作用是( )。(分数:2.00)A.设置直线颜色和形状边
24、界颜色 B.设置直线或形状背景颜色C.设置直线或形状边界线的线型D.设置形状的内部颜色解析:在 Visual Basic 中,BorderColor 属性的作用是设置直线的颜色或形状边界线的颜色,所以选项 A)是正确的。直线或形状的背景颜色通过 BackColor 属性来设置,线型通过 BorderStyle 属性设置;形状内部颜色通过 FillColor 属性设置。16.下列过程定义语句中,参数不是对象的定义语句是( )。(分数:2.00)A.Sub Pro4 (x As Form)B.Sub Pro4 (y As Control)C.Sub Pro4 (Forml As Form,Labe
25、ll As Control)D.Sub Pro4 (x As Currency) 解析:在形参表中,As 关键字用于定义形参的类型:AsForm 定义形参为窗体类 型;AsComtrol 定义形参为控件类型;AsCurrency 定义形参为货币类型。17.下面叙述不正确的是( )。(分数:2.00)A.98B.67xC.x394D.0X292 解析:C+中只能用成员函数重载的运算符是=,(),- ,只能用友元函数重载的是。18.下面程序段,运行后的结果是( )。 Private Sub Commandl_Click( ) Dim b%(1 To 4),i%,t# For i=1 To 4 b(
26、i)=i Next i t=Tof(b( ) ) Print“t=“;t, End Sub Function Tof(a() As Integer) Dim t#,i% t=1 For i=2 To UBound(a) t=t * a(i) Next i Tof=t End Function (分数:2.00)A.t=18B.t=24 C.t=30D.t=32解析:程序开始调用循环语句对数组 b()赋值,b(i)=I,且数组 b 的上下界分别为 1 和 4;接着将数组 b()作为对象,调用 Tof 过程,在 Tof 过程中,定义了两个变量 t 和 I,I 作为 For 循环的循环变量,初始值为
27、2,终值为数组 b 的上界;循环体为“t= t *a(i)”,即将 b(i)的值乘以 t,然后在赋给 t,当循环结束后,程序返回的就是数组 b 中除第一个元素以外所有元素值的乘积,此题的结果为 234=24,输出结果为 t=24。19.设有如下通用过程: Public Sub Fun(a() As Integer, x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为 Text1 的文本框和一个名称为 Command1 的命令按钮。然后编写如 下的事件过程: Private Sub Command1_Click()
28、Dim arr(5) As Integer, n As Integer For i = 1 To 5 arr(i) = i + i Next Fun arr, n Text1.Text = Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是_。 (分数:2.00)A.30 B.25C.20D.15解析:参数的传送分为两种:一种是按值传送(ByVal),一种是按地址传送(ByRef),而 ByRef 是默认的 传送方式。按值传送时,不影响实参的值,而按地址传送则影响实参的值。本题中的参数都是按默认方式 来传送的,即按地址传送,所以调用过程 Fun 后 n 的值被改变
29、。而在 Command1 的 Click 事件中,数组被 赋值为 2、4、6、8、10,故 n=2+4+6+8+10=30。20.下列程序段的执行结果为( )。 a=1 b=0 Select Case a Case 1 Select Case b Case 0 Print“*0*“ Case 1 Print“*1*“ End Select Case 2 Print“*2*“ End Select (分数:2.00)A.a=2,b=1 B.a=1,b=1C.a=1,b=0D.a=2,b=2解析:本题考查关于 switch 语句。该题目的关键是要搞清楚该程序执行了哪几条语句。由于 x 的值等于 1
30、,所以 switch 结构中,程序从 case 1 后面的语句开始执行,又因为 case 1 后面的语句没有以 break 结束,所以程序要继续往下执行 case 2 后面的语句。所以,该程序共执行了这三条语句:a+;a+;b+;,因此,变量 a 和 b 最后的值应该为 2 和 1。21.下列程序的执行结果为( )。 Private Sub Command1_Click() Dim FirStr As String FirSt=“abcdef“ Print Pat(FirStr) End Sub Private Function Pat(xStr As String)As String Dim
31、 tempStr As String,strLen As Integer tempStr=“ “ strLen=Len(xStr) i=1 Do While i=y Then z=x:z=y B.If x=y Then z=x Else z=yC.z=y:If x=y Then z=xD.If x=y Then z=y Else z=x解析:选项 A)中的语句行有两条语句,执行 If 语句后,执行 z=y 语句,所以不管 x 是否大于 y,最终 x的值都等于 y。25.下列程序的执行结果为( )。 Ptivate Sub Commandl_Click() Dim FirStr As Strin
32、g FirStr=“abcdef“ 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 (分数:2.00)A.abcdef
33、B.afbecd C.fedcbaD.defabc解析: 主调函数最终输出值是 Pct(FirStr)过程的返回值,这就得调用函数过程 Pct。 被调过程Pct 的参数 xStr 从主调函数中收到实参 FirStr 传来的值“abcdef”,过程 Pct 开始声明了两个变量,一个是 String 型的 tempStr,一个是 Integer 型的 strLen。语句 tempStr = “ “ 和 strLen = Len(xStr)的功能是,为变量 tempStr 赋空值,变量 strLen 的值就是 xstr 的长度,此题为 6。程序执行 Do WhileLoop 的循环语句的过程如下:
34、第一次循环,I=l,I= 3 成立,执行语句 tempStr + Mid(xStr,i,1) + Mid(xStr, strLen - i+1,1); 第二次循环,1=2,I=3 成立,继续执行循环体,tempStr=“afbe”; 第三次循环,I=3,I=3 成立,继续执行循环体,tempStr=“afbecd”;第四次循环,I=4,I=3 不成立,则跳出循环体,执行语句 Pct = tempStr。所以最终 Pct(FirStr)=“ afbecd “。 26.下列日期型数据正确的是( )。(分数:2.00)A.January 10,1979B.#January 10,1997# C.“J
35、anuary 10,1997“D.&January 10,1997&解析:用“#”括起来的部分表示日期。用双引号括起来的部分表示字符串常量。VisualBasic 中用“&”括起来的部分表示八进制长整型数。27.有如下事件过程: Sub ABD(x,y,z) z=X +y End Sub Private Sub Command1 _ Click( ) a=30:b=40 Call ABD(a,b,c) Print c End Sub 运行上面的程序,单击命令按钮,输出结果为( )。 (分数:2.00)A./B./“C./ D./解析:根据字段的命名规则:字段名可以由字母、汉字、数字、下划线组成
36、;字段名可以是汉字或合法的西文标识符,字段名必须以字母或汉字开头;字段名中不能包含空格或句点。28.在 Visual Basic 中,下列两个变量名相同的是( )。(分数:2.00)A.属性的一般格式为对象名_属性名称,可以在设计阶段赋予初值,也可以在运行阶段通 过代码来更改对象的属性B.对象是有特殊属性和行为方法的实体 C.属性是对象的特性,所有的对象都有相同的属性D.属性值的设置只可以属性窗口中设置解析:在 Visual Basic 中,对象具有 Visible 属性,它有两个值:True 和 False,决定对象是否可见,如果设置为 True,则可见,如果设置为 False,则是不可见的
37、,所以选项 A)是正确的;标题,即 Caption属性可设为任何文本,包括空字符串,所以选项 B) 是不正确的;属性的值可以不设置,但是系统会设为默认值,而不是空值,所以选项 D)不正确;属性窗口除按字母排列外,还可以分类排列,所以选项 C)是不正确的。29.如果将文本框的 MaxLength 属性设置为 0,则文本框中的字符不能超过( )。(分数:2.00)A.SELECT FROM 教师表 IF(性别=男)B.SELECT 性别 FROM 教师表 IF(性别=男)C.SELECT * FROM 教师表 WHERE(性别=男) D.SELECT * FROM 性别 WHERE(性别=男)解析
38、:该段语法为 SELECT*|FROMWHERE。30.有如下事件过程: Private Sub Commaild1_Click( ) Dim i As Integer For i =1 To 2 DC Next i End Sub Sub DC( ) Dim x As Integer,m As String Static y,n x=x + 1 y=y + 1 m=m&“*“:n=n &“#“ Print x,y,m,n End Sub 程序运行后,输出的结果是( )。 (分数:2.00)A.1 1 * # 1 1 * #B.1 1 * # 1 2 * #C.1 1 * # 1 1 * #D
39、.1 1 * # 1 2 * # 解析:本题考查函数调用和输出格式的语句。当 I=1 时,调用函数过程 DC,由于 y,n 为静态变量值保存,执行 x=x+1;y=y+1 后 x=1,y=1;执行 m=m&“*“:n=n&“#“后,m=“*“,n=“#“;当 I=2 时同上,只是y=2,n=“#“。31.关于 Visual Basic“方法“的概念错误的是( )。(分数:2.00)A.方法是对象的一部分B.方法是预先定义好的操作C.方法是对事件的响应 D.方法用于完成某些特定的功能解析:对象是属性、方法和事件的集成,所以选项 A)说法正确;例如 Print 方法是用来输出字符串、变量和表达式的
40、值,也就是完成输出的这一功能,所以选项 D)的说法正确;在执行方法时,不必考虑实现输出的具体步骤,方法的步骤是系统预先规定好的,所以选项 B)说法正确。32.单击按钮时,以下程序运行后的输出结果是( )。 Private Sub proc1(x As Integer,y As Integer,z As Integer) x=3*z y=2*z z=x+y End Sub Private Sub Command1_Click() Dim x As Integer,y As Integer,Z As Integer x=1:y=2:z=3 Call proc1(x,x,z) Print x;x;z
41、 Call proc1(x,y,y) Print x;y;y End Sub (分数:2.00)A.Dim NewArray(10)As IntegerB.Dim NewArray(1 T0 10)As Integer C.Dim NewArray(10)IntegerD.Dim NewArray(1 To 10)Integer解析:A)选项定义了 11 个整型数构成的数组,C)选项和 D)选项语法错误。33.下面说法不正确的是( )。(分数:2.00)A.Float.MIN_VALUEB.1.8e-6FC.2.0 D.abcd解析:此题主要考查 RMI 命令,RMI 命令包括 rmic 命令
42、,为对象生成 stub 和 skeleton;rmiregistry 命令在当前主机的指定端口上启动远程对象注册服务程序;rmid 命令,激活系统守候进程;serialver 命令,返回 serialVersionUID。34.在窗体上建立通用对话框需要添加的控件是( )。(分数:2.00)A.在 Java 中,常量 null 和 true 都需要小写B.浮点型数据小数位数 bit 越多,表示数的精度越高C.布尔型数据在内存中占两位 D.Unicode 字符集要比 ASCII 集更丰富,它们是 16 位无符号数据解析:数组使用前要先定义,定义数组是为了给数组分配存储空间,所以定义 数组维的界不
43、能是变量,但可以是符号常量。注意:选项 A)错误,定义数组 Arr 语句中,维的界用了变量 k 选项 B)正确,定 义数组 Arr 语句中,维的界 k 是符号常量;选项 C)正确,用 As Integer 说明数组 Arrl 是整 型数组,数组Arr2 没有指明类型,则隐含数组为 Variant 类型;选项 D)正确。维的界用 “ To ”的形式定义是正确的。35.下列叙述中正确的是【 】(分数:2.00)A.算法的效率只与问题的规模有关,而与数据的存储结构无关B.算法的时间复杂度是指执行算法所需要的计算工作量 C.数据的逻辑结构与存储结构是一一对应的D.算法的时间复杂度与空间复杂度一定相关解
44、析:根据时间复杂度和空间复杂度的定义可知,算法的时间复杂度与空间复杂度并不相关。数据的逻辑结构就是数据元素之间的逻辑关系,它是从逻辑上描述数据元素之间关系的,是独立于计算机中的,数据的存储结构是研究数据元素和数据元素之间的关系如何在计算机中表示,它们并非一一对应。算法的执行效率不仅与问题的规模有关,还与数据的存储结构有关。二、填空题(每空 2 分,共 30 分)(总题数:15,分数:30.00)36.如果要将形状控件的内部设置为水平线,应将 Fillstyle 属性设置为 1。(分数:2.00)填空项 1:_ (正确答案:2)解析:在 Visual Basic 中,FillStyle 属性用来
45、设置形状控件内部的填充图案,可以取 8 种值: 0 - Solid:表示填充图案为实心的; 1 - Transparent:表示填充的图案时透明的; 2 - Horizontal Line:表示填充图案为水平线; 3 - Vertical Line:表示填充图案为垂直线; 4 - Upward Diagonal:表示填充图案为向上对角线; 5 - Downward Diagonal:表示填充图案为向下对角线; 6 - Cross:表示填充图案为交叉线; 所以本题的正确答案应该是:2。 37.下列程序的功能是:将数据 1,2,10 写入顺序文件 Basetxt 中,请填空。 Private Su
46、b Form_Click1 Dim i As Integer Open 2 As #1 For i=1 To 10 3 Next i Close #1 End Sub (分数:2.00)填空项 1:_ (正确答案:“Basetxt”For)填空项 1:_ (正确答案:Output)解析:本题中以输出方式来打开文件,故要用“Open“Basetxt“For Output As# 1“语句;向文件中写入数据用 Print 语句。38.表达式 32 Mod 36/ 25 的值是 1(分数:2.00)填空项 1:_ (正确答案:0)解析:在做本题之前要先了解各种运算符的优先级,只有了解了之后才能做对。
47、幂运算符()优先级最高,其次是取负、乘、浮点除、整除、取模、加减、字符串连接等。其中,乘和浮点除是同级别的运算符,加和减是同级运算符。此外,如果表达式中有 括号,则计算括号内的表达式的值。通过运算本题的结果是0。 39.在窗体上添加一个文本框控件 Info,画一个命令按钮,当单击命令按钮显示“保存文件”对话框,设置该对话框可用于保存文本文件(默认)和可执行文件(exe),然后在文本控件中显示保存的文件名。 Private Sub Command1_Click1 CommonDialog1Filter= 2 CommonDialog1FilterIndex= 3 CommonDialog1ShowSave InfoText= 4 End Sub (分数:2.00)填空项 1:_ (正确答案:“文本文件(*txt)|*.txt|可执行文件(exe)|*exe*”)解析:要设置通用对话框可用于保存文本文件和 Word 文档,需要设置通用对话框的 Filter 属性值,在这里应该填写的是“文本文件(*txt)|*txt|可执行文件(exe)| *.exe”;在文件类型栏内通过下拉列表选择要显示的文件类型,而最初默认显示的文件类型(过滤器)可以由 FilterIndex 属性来指定,该属性是一个整数。用 Filter 属性设置多个过滤器后,每个过滤器都有一个值,第一个过滤器的值为 1,