万里学院VB期末考试题库

更新时间：2024-05-01 06:02:01 阅读量：综合文库文档下载

说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。

vb程序设计期末考试题及答案推荐度：
相关推荐

一、单选题（每题1分，共76题）

1.要改变控件显示的大小，可以采取的通用方法是（ C ） A. 修改控件的Left或Top属性 B. 调用控件的Move方法

C. 修改控件的Width或Height属性 D. 以上都可以

2.Viaual Basic主要用于开发哪种系统下的文件（ B ） A. DOS

B. Windows

C. DOS和Windows D. UNIX

3. 在用户的应用程序执行期间发生，比如单击鼠标或按键盘中的键（ C） A. 方法 B. 属性 C. 事件 D. 工程

4.下面变量名是错误的（D ） A. 姓名 B. a C. a123 D. a.1

5.以下叙述中错误的是（ A ）

A. 工程文件中除了窗体文件是可选的外，其他文件都是必需的 B. 以.bas为扩展名的文件是标准模块文件 C. 一个工程中可以包含多个标准模块文件 D. 一个工程中可以包含多种类型的文件

6.一个对象可执行的动作与可被一个对象所识别的动作分别是（A ） A. 事件、方法 B. 方法、事件 C. 属性、方法 D. 过程、事件

7.工程文件的扩展名是（ D ） A. .vbg B. .vbw C. .frm D. .vbp

8.在默认情况下，InputBox函数返回值的类型为（ A ） A. 字符串 B. 变体 C. 数值

D. 数值或字符串

9.对象是将数据和操作起来的逻辑实体（A ） A. 封装 B. 串接

C. 连接 D. 伪装

10.下面属性用于显示对象的标题（ B ） A. Text B. Caption

C. Name(名称) D. ForeColor

11.执行多窗体应用程序时，（ B ）

A. 打开一个窗体后，其他窗体都会被关闭 B. 允许同时打开多个窗体

C. 打开一个窗体后，其他窗体都会被隐藏起来 D. 在某一时刻只能打开一个窗体

12.窗体最小化的示意图标可用属性来设置（ C ） A. Picture B. Image C. Icon

D. MouseIcon

13.下面的运算符中优先级最高的是（ D ） A. Not B. \\ C. < D.*

14.想要显示一个输入框，它的标题栏上显示“示例”，提示信息是“请输入一个正整数”，输入框内默认内容为“1”，其语句是（ A ）

A. A=InputBox(“请输入一个正整数”,”示例”,”1”) B. A=InputBox(”示例”,“请输入一个正整数”,”1”) C. A=InputBox(”1”,”示例”,“请输入一个正整数”) D. A=InputBox(“请输入一个正整数” ,”1”,”示例”) 15.语句Form1.Hide中，Hide是Form1对象的一个（） A. 方法 B. 参数 C. 属性 D. 事件

16.以下窗口中可用来在设计时修改窗体的默认运行位置（ D ） A. 本地窗口 B. 立即窗口 C. 窗体布局窗口

D. 工程资源管理器窗口

17.当一个工程中含有多个窗体时，其中的启动窗体是（ D ） A. 启动VB时建立的窗体 B. 第一个添加的窗体 C. 最后一个添加的窗体

D. 在工程属性窗口中指定的窗体

18.根据“属性窗口”中的属性来区分窗体中的控件（ B ）

A.Text B.Name(名称) C.Caption D.Index

19.在程序代码中，如果要更改一个窗体的背景图，下面正确（ A ） A. Set Form1.Pictrue=LoadPicture(文件名) B. Set Form1.picture=Load(文件名)

C. Set Form1.picture=SavePicture(文件名) D. Set Form1.Picture=文件名

20.能显示窗体的方法是（ B ） A. Visual B. Show C. Hide D. Open

21.MsgBox()的正确语法是（ B ）

A. MsgBox( 标题 [, 提示信息] [, 按钮类型] ) B. MsgBox( 提示信息 [, 标题] [, 按钮类型] ) C. MsgBox( 标题 [, 按钮类型] [, 提示信息] ) D. MsgBox( 提示信息 [, 按钮类型] [, 标题] )

22.让命令按钮控件在程序过程中不可用,可修改控件的属性。（ C ） A. Appearance B. Caption C. Enabled D. Visible

23.阅读下面程序，选择正确结果。 Dim i As Integer,j As Integer Dim Sum As Integer For i=1 to 17 step 2 For j=1 to 3 step 2 Sum=Sum+j Next j Next i Print Sum

上面程序运行后窗口输出结果是（） A. 9 B. 18 C. 27 D. 36

24.下面变量名是错误的（ D ） A. 姓名 B. a C. a123 D. a.1

25.在窗体中放置一个命令按钮Command1和一个文本框Text1，并编写如下程序：

Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1

If i>10 Then Exit For Next i

Text1.Text=Str(n) End Sub

单击按钮后，文本框显示的结果是（） A. 2 B. 3 C. 4 D. 5

26.下列程序执行后，整型变量C的值为 A=328 B=24

Select Case B\\100 Case 0 C=A+B Case 1

C=A*10+B Case 2

C=A*100+B Case 3

C=A*1000+B End Select（） A. 24 B. 328 C. 568 D. 352

27.执行语句s=Len(Mid(\，1,6))后，s的值为A. Visual B. Basic C. 6 D. 11

28.运行下面程序： Private Sub Form_Click() a = 1 b = 1

N = InputBox(\For I = 2 To N Step 1 c = a + b a = b

C ）（ b = c Next

Form1.Cls Print b End Sub

单击窗体输入3后，窗体上的显示结果为：（） A. 1 B. 3 C. 5 D. 7

29.运算符“\\”两边的操作数若类型不同，则先再运算（ C ） A. 取整数为Byte类型 B. 取整数为Integer类型 C. 四舍五入为整型

D. 四舍五入为Byte类型

30.表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是（ D ） A. SIN B. 4^5 C. 3*4 D. X+1

31.函数Int(Rnd*20)是在范围内的整数（） A. (0,2） B. (1,20） C. (0,19） D. (1,9）

32.Private Sub Form_Click() a = 1 b = 1

N = InputBox(\For I = 2 To N Step 1 c = a + b a = b b = c Next

Form1.Cls Print b End Sub

单击窗体输入5后，窗体上的显示结果为：（） A. 2 B. 7 C. 8 D. 6

33.在窗体中放置一个命令按钮Command1和一个文本框Text1，并编写如下程序： Private Sub Command1_Click()

x=”A” : y=”B” : z=”C” For i =1 To 2 x=y : y=z : z=x Next i

Text1.Text=x+y+z End Sub

单击按钮后，文本框显示的结果是（） A. ABC B. BCA C. BCB D. CBC

34.表示条件“身高T超过1.7米且体重W小于62.5千克”的逻辑表达式是（ C ） A. T>=1.7 And W<=62.5 B. T<=1.7 Or W>=62.5 C. T>1.7 And W<62.5 D. T>1.7 Or W<62.5

35.要强制显式声明变量，可在窗体模块或标准模块的通用声明段中加入语句（ B ） A. Option Base B. Option Explicit C. Option Base 1 D. Option Compare

36.下列数据中是Boolean型常量（ C ） A. 123 B. And C. True D. Or

37.阅读下面程序，选择正确的结果。 Private Sub Command1_Click() Dim A

For J=1 to 10 A=J^2 Next J Print A;J^2 End Sub

上面程序执行后，输出J^2的值为（） A. 0 B. 1 C. 100 D. 121

38.程序在运行循环For i=1 to 14 Step 3结束后，i的值等于（ B ） A. 16 B. 13 C. 14 D. 15

39.下面的运算符中优先级最高的是（ D ） A. Not B. \\ C. < D. *

40.当VB执行下面语句后，A的值为 A=1

If A>0 Then A=A+1 If A>1 Then A=0（） A. 0 B. 1 C. 2 D. 3

41.如果希望用变量X来存放数据1234.5678912，应将X定义为类型（ B ） A. 单精度型 B. 双精度型 C. 长整型 D. 字符型

42.运行下面程序，单击窗体后在窗体上显示的内容是 Private Sub Form_Click() Dim x As Integer, y As Integer x = 1: y = 0 Do While x < 3 x = x + 1 y = x + y Loop Print x; y End Sub（） A. 1 0 B. 3 3 C. 5 3 D. 3 5

43.下面程序段的执行结果为。 Dim M(10),N(10) i=3

For t= 1 to 5 M(t)=t N(i)=2*i+t Next t

Print N(i);M(i) （） A.3 11 B.3 15 C.11 3 D.15 3

44.系统默认的参数传递方式是传递。（ A ） A.按地址 B.按值 C.按形参 D.按实参

45.以下叙述中正确的是。（ A ） A.组合框包含了列表框的功能 B.列表框包含了组合框的功能

C.列表框和组合框的功能无相近之处 D.列表框和组合框的功能完全相同

46.建立一个俱乐部会员信息输入界面，要求选择会员的性别、职业(工程师、公务员、教师、医生、其他)及爱好(共10种，如一个人既喜欢足球，又喜欢旅游)。应如何在窗体上如何实现。（ D ）

A.用一组17个复选框来实现

B.将10种爱好用一组10个复选框来实现，性别和职业用7个单选按钮来实现 C.将10种爱好用一组10个单选按钮来实现，性别和职业用7个复选框来实现

D.将10种爱好用一组10个复选框来实现，性别用2个单选按钮来实现，职业用一个框架和5个单选按钮来实现

47.要使控件和框架捆绑在一起，以下操作正确的是。（ C ）

A.在窗体不同位置上分别画一个框架和控件，再将控件拖动到框架上 B.在窗体上画好控件，再画框架将控件框起来 C.在窗体上画好框架，再在框架上画控件

D.在窗体上画好框架，再双击工具箱中的控件

48.应用列表框List1最后一个选项应使用表达式。（ B ） A.List1.List(List1.ListCount) B.List1.List(List1.ListCount-1) C.List1.List(ListCount) D.List1.List(ListCount-1)

49.设置一个单选按钮所代表选项的选中状态，应当在属性窗口中改变的属性是。（ C ） A.Caption B.Text C.Value D.Name

50.为了使图片框和图像框的大小适应图片的大小，下面设置中正确的是。（ A ） A.AutoSize=True Stretch=True B.AutoSize=True Stretch=False C.AutoSize=False Stretch=True D.AutoSize=False Stretch=False

51.当滚动滚动滑块时，将触发滚动框的事件。（ B ） A.Move B.Change C.Scroll D.Getfocus

52.将数据项“China”添加到列表框(List1)中成为第一项应使用。（A ）

A.List1.Additem “China”,0 B.List1.Additem “China”,1 C.List1.Additem 0, “China” D.List1.Additem 1, “China”

53.在窗体上用复制、粘贴的方法建立一个命令按钮数组，数组名为M1，设窗体Form1标题为“MyForm1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码： Private Sub M1_Click(Index As Integer) Form1.Caption=”Myform2” End Sub

运行时，单击控件数组中的第一个按钮，则窗体标题为。（） A.Form1 B.M1

C.Myform1 D.Myform2

54.下列属性决定了水平滚动条产生的数值范围。（ B ） A.Height B.Max C.Width D.Top

55.要使每次单击滚动条两端滚动按钮时变化值为10，应设置属性。（ A ） A.SmallChange B.MinChange C.MaxChange D.LargeChange

56.课用于设置系统当前时间的语句是。（ C ） A.Date B.Year C.Time D.Timer

57.SetFocus方法是把焦点移到指定对象上，使对象获得焦点，该方法适用于所有控件。（ B ） A.对 B.错

58.在程序运行中，标签和文本框都可以用来输入数据。（ B ） A.对 B.错

59.组合框和列表框一样，都可以在运行时输入文本。（ A ） A.对 B.错

60.方法是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。（ A ） A.对 B.错

61.将定时器的时间间隔设置为1秒，那么定时器的Interval属性值应设为1。（ A ） A.对

B.错

62.要从Function过程中退出，使用 Exit Do语句。（ B ） A.对 B.错

63.一个VB工程文件包含窗体文件、标准模块文件、类模块文件等。（ A ） A.对 B.错

64.在Visual Basic中通过Forecolor 属性来设置字体颜色。（ A ） A.对 B.错

65.复选框的Value属性用于决定该复选框是否被选中。（ A ） A.对 B.错

66.列表框的ListIndex返回当前选项的索引号，索引号从1开始。如果没有选项被选中，该属性为2。（ B ） A.对 B.错

67.将命令按钮Command1设置为不可见，应修改该命令按钮的Visible 属性。（ A ） A.对 B.错

68.声明形参时以缺省传递方式声明，则为按值传递(Byval)。（ B ） A.对 B.错

69.标签(Label)控件的AutoSize属性值为True时，标签的宽度、高度会自动调整以显示标签中所有的内容。（ A ） A.对 B.错

70.决定对象是否可见的属性是Enabled属性，决定对象可用性的属性是Visible属性。（ B ） A.对 B.错

71.组合框和文本框一样均没有Caption属性，但都具有Text属性。（ A ） A.对 B.错

72.函数MsgBox的3个参数分别是输入对话框的提示信息、默认值以及标题。（ A ） A.对 B.错

73.在循环体内，循环变量的值不能被改变。（ A ） A.对 B.错

74.子程序定义时使用Private表示此子程序只可以被本工程中的其他过程调用。（ B ） A.对 B.错

75.使用a=b:b=a 语句可以将变量A和B的值互换。（ B ） A.对

B.错

76.Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性。（ B ） A.对 B.错

一、单选题（每题1分，共76题） 1.下面变量名是错误的（ D） A. 姓名 B. a C. a123 D. a.1

2.表达式为4+5\\6*7/8 mod 9的值是（ B ） A. 4 B. 5 C. 6 D. 7

3.要将输入焦点放在某个控件上，可以采取的方法（ D ） A. 使用鼠标直接单击该控件

B. 使用【Tab】键将焦点移到该控件上 C. 调用该控件的SetFocus方法获得焦点 D. 以上都可以

4.MsgBox函数中有四个参数，其中必须写明的参数是（ D ） A. 指定对话框中显示按钮的数目 B. 设置对话框标题 C. 所有参数都是可选的 D. 提示信息

5.运行时当用户在文本框中输入新的内容，或在程序代码中对文本框的Text属性进行赋值从而改变了文本框的Text属性时，将触发文本框的事件（D ） A. Click B. DblClick C. GotFocus D. Change

6.以下窗口中可用来在设计时修改窗体的默认运行位置（ C ） A. 本地窗口 B. 立即窗口 C. 窗体布局窗口

D. 工程资源管理器窗口

7.关于标签和文本框的区别，以下叙述中错误的是（ B ） A. 在程序运行中，标签和文本框都可以用来输出数据 B. 在程序运行中，标签和文本框都可以用来输入数据 C. 在程序运行中，可以改变标签的内容 D. 文本框控件不设有Caption属性

8.窗体最小化的示意图标可用属性来设置（C ） A. Picture

B. Image C. Icon

D. MouseIcon

9.当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的属性为True（ A ） A. AutoSize B. WordWrap C. Enabled D. Visible

10.设置标签边框的属性是（ A ） A. BorderStyle B. BackStyle C. AutoSize D. Alignment

11.下列数据中是Boolean型常量（ D ） A. 123 B. And C. True D. Or

12.一个对象可执行的动作与可被一个对象所识别的动作分别是（A ） A. 事件、方法 B. 方法、事件 C. 属性、方法 D. 过程、事件

13.将文本框的属性设置为True时，文本框可以输入或显示多行文本，且会在输入的内容超出文本框的宽度时自动换行（ A ） A. MultiLine B. ScrollBars C. Text D. Enabled

14.只有一个对象的Visible和Enabled属性均为时，它才能接收焦点（D ） A. 0 B. 1 C. False D. True

15.启动Visual Basic后，就意味着要建立一个新的（C ） A. 窗体 B. 程序 C. 工程 D. 文件

16.想要显示一个输入框，它的标题栏上显示“示例”，提示信息是“请输入一个正整数”，输入框内默认内容为“1”，其语句是（ A ）

A. A=InputBox(“请输入一个正整数”,”示例”,”1”) B. A=InputBox(”示例”,“请输入一个正整数”,”1”)

C. A=InputBox(”1”,”示例”,“请输入一个正整数”) D. A=InputBox(“请输入一个正整数” ,”1”,”示例”) 17.下面的运算符中优先级最高的是（ D ） A. Not B. \\ C. < D. *

18.定义【查找】按钮的访问键为【F】键，正确的设置方法是（C ） A. 设置按钮的Default属性为“F”

B. 设置按钮的Caption属性为“查找F” C. 设置按钮的Caption属性为“查找&F” D. 设置按钮的属性为“查找&F”

19.I被j整除的逻辑表达式是（ D ） A. I/j=0 B. I\\j=0 C. I<>j

D. I mod j=0

20.让命令按钮控件在程序过程中不可用,可修改控件的属性。（） A. Appearance B. Caption C. Enabled D. Visible

21.语句Form1.Hide中，Hide是Form1对象的一个（） A. 方法 B. 参数 C. 属性 D. 事件

22.以下关于窗体的描述中错误的是（ B）

A. 在VB中每次运行时可以指定不同的启动窗体

B. 要让窗体以最大化方式打开，应设置MaxButton属性值为True C. 窗体第一次显示时也会发生Resize事件

D. 第一次显示时窗体的位置可以不是设计时所指定的位置 23.以下语句可以跳出Do Until?Loop循环（ C ） A. End

B. Exit Loop C. Exit Do D. Exit For

24.在窗体中放置一个命令按钮Command1和一个文本框Text1，并编写如下程序： Private Sub Command1_Click() x=”A” : y=”B” : z=”C” For i =1 To 2 x=y : y=z : z=x Next i

Text1.Text=x+y+z

End Sub

单击按钮后，文本框显示的结果是（ D ） A. ABC B. BCA C. BCB D. CBC

25.表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是（ D ） A. SIN B. 4^5 C. 3*4 D. X+1

26.下列逻辑运算结果为\的是（） A. false or not true B. false and not true C. true or not true D. true and not true

27.Private Sub Form_Click() a = 1 b = 1

N = InputBox(\For I = 2 To N Step 1 c = a + b a = b b = c Next

Form1.Cls Print b End Sub

单击窗体输入5后，窗体上的显示结果为： A. 2 B. 7 C. 8 D. 6

28.下面变量名称正确的是（） A. x.1 B. integer C. x_1_y D. x,y

29.阅读下面程序，选择正确的结果。 Private Sub Command1_Click() Dim A

For J=1 to 10 A=J^2 Next J

）（ Print A;J^2 End Sub

上面程序执行后，输出A的值为（） A. 0 B. 1 C. 100 D. 121

30.在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的标签，然后编写如下事件过程：

Private Sub Command1_Click() S=0

For i=1 To 15 x=2*i-1

If x Mod 3=0 Then s=s+1 Next i

Label1.Caption=s End Sub

程序运行后，单击命令按钮，则标签中显示的内容是（B ） A. 1 B. 5 C. 27 D. 45

31.运行下面程序，单击窗体后在窗体上显示的内容是 Private Sub Form_Click() Dim x As Integer, y As Integer x = 1: y = 0 Do While x < 3 x = x + 1 y = x + y Loop Print x; y

End Sub（） A. 1 0 B. 3 3 C. 5 3 D. 3 5

32.在窗体中放置一个命令按钮Command1和一个文本框Text1，并编写如下程序： Private Sub Command1_Click() Dim i As Integer,n As Integer For i=0 To 50 i=i+3 n=n+1

If i>10 Then Exit For Next i

Text1.Text=Str(n) End Sub

单击按钮后，文本框显示的结果是（B ） A. 2 B. 3 C. 4 D. 5

33.以下的程序运行后，窗体中显示的结果是 Private Sub Form_Click() a = 360

b = a \\ 100 + a Mod 100 + (a Mod 10) *100 Print b End Sub（） A. 63 B. 063 C. 360 D. 36

34.语句X=X+1的正确含义是（C ） A. 变量X的值与X+1的值相等 B. 将变量X的值存到X+1中去 C. 将变量X的值加1后赋给变量X D. 变量X的值为1

35.下列关于Select Case的叙述中，错误的是（） A. Case 10 To 100 表示判断Is是否介于10与100之间

B. Case \表示判断Is是否和\、\两个字符中的一个相同 C. Case \表示判断Is是否为大写字母X

D. Case –7,0,100 表示判断Is是否等于字符串\36.阅读下面程序，选择正确的结果。 Private Sub Command1_Click() Dim A

For J=1 to 10 A=J^2 Next J Print A;J^2 End Sub

上面程序执行后，输出J^2的值为（） A. 0 B. 1 C. 100 D. 121

37.在窗体中放置一个命令按钮Command1和一个文本框Text1，并编写如下程序： Private Sub Command1_Click() Dim i As Integer For i=0 To 50

i=i+3

If i>10 Then Exit For Next i Print i End Sub

单击按钮后，窗体上显示的是（） A. 9 B. 10 C. 11 D.12

38.把字符串\转换为数值123时应该使用的函数是（ B ） A. St B. Val C. Len D. Rnd

39.函数Int(Rnd*20)是在范围内的整数（B ） A. (0,2） B. (1,20） C. (0,19） D. (1,9）

40.运行下面程序： Private Sub Form_Click() a = 1 b = 1

N = InputBox(\For I = 2 To N Step 1 c = a + b a = b b = c Next

Form1.Cls Print b End Sub

单击窗体输入3后，窗体上的显示结果为：（） A. 1 B. 3 C. 5 D. 7

41.关于多分支结构的Case语句，下列写法中错误的是。（C ） A. Case 1,5,Is>10 B. Case 0 to 10

C. Case Is>10 And Is <50 D. Case Is>10

42.下列是日期常量（C ）

A. “2/1/02” B. 2/1/02 C. #2/1/02# D. {2/1/02}

43.下列控件中，没有Caption属性的是。（ B ） A.框架 B.列表框 C.复选框 D.单选按钮

44.语句Print Sgn(-3^2)+Abs(-3^2)+Int(-3^2)运行时输出的结果为。（ D） A.17 B.27 C.1 D.-1

45.要使控件和框架捆绑在一起，以下操作正确的是。（C ）

D.在窗体上画好框架，再双击工具箱中的控件

46.为了使图片框和图像框的大小适应图片的大小，下面设置中正确的是。（A A.AutoSize=True Stretch=True B.AutoSize=True Stretch=False C.AutoSize=False Stretch=True D.AutoSize=False Stretch=False

47.要访问数组中的所有元素，通常会使用。（ D ） A.For…Next

B.Do…While Loop C.For Each…Next D.A和C

48.阅读下面的程序，选择运行结果。 Option Base 1

Private Sub Form1_Load()

Dim a(10) As Integer, p(3) As Integer Dim i As Integer, k As Integer K=5

For i=1 to 10 a(i)=i Next

For i=1 to 3 P(i)=a(i*i) Next

For i=1 to 3 K=k+p(i)*2 Next

） Print k

End Sub（ C ） A.35 B.28 C.33 D.37

49.在窗体上用复制、粘贴的方法建立一个命令按钮数组，数组名为M1，设窗体Form1标题为“MyForm1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码： Private Sub M1_Click(Index As Integer) Form1.Caption=”Myform2” End Sub

运行时，单击控件数组中的第一个按钮，则窗体标题为。（ D ） A.Form1 B.M1

C.Myform1 D.Myform2

50. 控件的行为具有Boolean类型。（ C） A.单选按钮、命令按钮 B.复选框、标签 C.单选按钮、复选框 D.列表框、组合框

51.以下叙述中正确的是。（A ） A.组合框包含了列表框的功能 B.列表框包含了组合框的功能

C.列表框和组合框的功能无相近之处 D.列表框和组合框的功能完全相同 52.下面程序段的执行结果为。 Dim M(10),N(10) i=3

For t= 1 to 5 M(t)=t N(i)=2*i+t Next t 你 A.3 11 B.3 15 C.11 3 D.15 3

53.下面语句声明的数组不是动态数组。（ B ） A.Dim X() B.Dim X(5) C.ReDim X(10) D.以上都不是

54.把字符串“123”转换成数值123时应该使用的函数是。（ C ）

A.Str B.Len C.Val D.Rnd

55.当组合框的Style属性设置为2时，其表现形式是。（B ） A.下拉列表框 B.下拉组合框 C.简单组合框 D.文本框

56.以下关于单选按钮的说法，正确的是。（ B ）

A.一个窗体上包括其他容器中的所有单选按钮一次只能有一个被选中 B.一个窗体上不包括其他容器中的所有单选按钮一次只能有一个被选中 C.在一个容器中的单选按钮可以同时有多个被选中

D.所有容器多于一个的单选按钮一次只能有一个被选中 57.用关键字Public声明的过程可以被其他模块调用。（ A ） A.对 B.错

58.For/Next语句中，循环控制变量只能是整形变量。（） A.对 B.错

59.在Do循环结构中，While和Until关键字的作用是相反的。（） A.对 B.错

60.用窗体的Caption属性可以设置窗体的标题。（ A ） A.对 B.错

61.用DIM定义数值变量时，该数值变量自动赋初值为0。（ B ） A.对 B.错

62.在行If语句中，关键字End If 是必不可少的。（ B ） A.对 B.错

63.用Do循环既能设计出预先知道循环次数的循环，也能设计出预先不知道循环次数的循环。（） A.对 B.错

64.一个表达式中若有多种运算，在同一层括号内，计算机按函数运算→关系运算→逻辑运算→算术运算的顺序对表达式求值。（ B ） A.对 B.错

65.让复选框不可用，可设置其Enabled属性为False或设置Value属性为2。（ A ） A.对 B.错

66.不能用Do循环设计出预先知道循环次数的循环。（ B ）

A.对 B.错

67.用面向对象的编程思想观点来看，一只黑色的台球被打进袋内，则台球是对象、黑色是方法。（ B ） A.对 B.错

68.在执行Select Case语句时，所有的Case子句都按出现的次序被顺序执行。（ A ） A.对 B.错

69.Visual Basic 中认为A1和a1是同一个变量。（ A ） A.对 B.错

70.控件的属性值不可以在程序运行时动态地修改。（ B ） A.对 B.错

71.属性是Visual Basic对象性质的描述，对象的数据就保存在属性中。（ A ） A.对 B.错

72.在块If语句中，关键字End If 是必不可少的。（ B ） A.对 B.错

73.For I=5 to 10 ? Next I循环体中没有Exit For语句，也没有更改I值，循环结束后，控制变量I的当前值等于终值10。（） A.对 B.错

74.使用单选按钮控件数组时，它们响应同一个Click事件，由Index值来区分不同的按钮。（ A ） A.对 B.错

75.函数MsgBox的3个参数分别是输入对话框的提示信息、默认值以及标题。（ A ） A.对 B.错

76.用户可拖动滚动条的滚动滑块来改变滚动条的Value值，在移动滚动滑块时，发生Change事件。（ B ） A.对 B.错

一、单选题（每题1分，共76题）

1.下列选项中，不属于Visual Basic特点的是（ B ） A. 可视化程序设计 B. 面向图形对象

C. Visual Basic窗口中包含菜单栏和工具栏 D. 事件驱动编程机制

2.要将输入焦点放在某个控件上，可以采取的方法（ D ）

A. 使用鼠标直接单击该控件

B. 使用【Tab】键将焦点移到该控件上 C. 调用该控件的SetFocus方法获得焦点 D. 以上都可以

3.以下关于窗体的描述中错误的是（B ）

A. 在VB中每次运行时可以指定不同的启动窗体

B. 要让窗体以最大化方式打开，应设置MaxButton属性值为True C. 窗体第一次显示时也会发生Resize事件

D. 第一次显示时窗体的位置可以不是设计时所指定的位置 4.对象是将数据和操作起来的逻辑实体（A ） A. 封装 B. 串接 C. 连接 D. 伪装

5.启动窗体在程序运行后，不进行任何操作的情况下会发生事件（D ） A. Initialize和Load B. Show C. Activate D. A和C

6.设置颜色属性：Form1.BackColor=vbRed中，vbRed表示的是（C ） A. 一个字符串 B. 255

C. 代表颜色值的常量 D. 用户定义的变量

7.I被j整除的逻辑表达式是（D ） A. I/j=0 B. I\\j=0 C. I<>j

D. I mod j=0

8.决定控件上文字的字体、字形、大小、效果的属性是（ D ） A. Text B. Caption C. Name(名称) D. Font

9.当新建一个工程并启动Visual Basic后，工具箱中的控件是（A ） A. 内部控件 B. Active X控件

C. 内部控件和Active X控件 D. 内部控件或Active X控件

10.Visual Basic窗体在整个生命周期中有四种状态，它们依次是（A ） A. 创建(Initialize)、加载(Load)、可见(Activate等)和卸载(Unload等) B. 加载(Load)、创建(Initialize)、可见(Activate等)和卸载(Unload等) C. 加载(Load)、可见(Activate等)、创建(Initialize)和卸载(Unload等)

D. 创建(Initialize)、可见(Activate等)、加载(Load)和卸载(Unload等) 11.以下选项中，不属于标签的属性是（ C ） A. Enabled B. Caption C. MaxLength D. WordWrap

12.启动Visual Basic后，就意味着要建立一个新的（ C） A. 窗体 B. 程序 C. 工程 D. 文件

13.程序中要在文本框文本中插入一段文字，应当使用的属性是（ C ） A. SelText B. Name C. Text D. Caption

14.下列关于窗体的叙述中错误的是（ C ） A. 窗体是Visual Basic的一种对象 B. 各种控件对象必须建立在窗体上

C. 可以用鼠标改变窗体的大小，所以窗体没有属性 D. 可以把窗体看作是一个对象的容器

15.假定一个VB应用程序由一个窗体模块和一个标准模块构成，为了保存该应用程序，以下正确的操作是（ B ） A. 只保存窗体模块文件

B. 分别保存窗体模块、标准模块和工程文件 C. 只保存窗体模块和标准模块文件 D. 只保存工程文

16.定义【查找】按钮的访问键为【F】键，正确的设置方法是（C ） A. 设置按钮的Default属性为“F”

B. 设置按钮的Caption属性为“查找F” C. 设置按钮的Caption属性为“查找&F” D. 设置按钮的属性为“查找&F”

17.一个对象可执行的动作与可被一个对象所识别的动作分别是（ A ） A. 事件、方法 B. 方法、事件 C. 属性、方法 D. 过程、事件

18.窗体Form1的Caption属性为frm，它的Load事件过程名为（ A ） A. Form_Load B. Form1_Load C. frm_Load D. Me_Load

19.以下关于对象属性的说法中正确的是（ D ） A. 对象所有的属性都罗列在属性窗口列表中

B. 不同对象不可能有同名属性

C. 不同对象的同名属性取值一定相同

D. 对象的某些属性既可在属性窗口中设置，也可通过程序代码设置或改变

20.窗体上有一个名为Txt1的文本框，为了使该文本框的内容能够换行，并且具有水平和垂直滚动条，正确的属性设置为（ B ） A. Txt1.MultiLine=True Txt1.ScrollBars=0 B. Txt1.MultiLine=True Txt1.ScrollBars=3 C. Txt1.MultiLine=False Txt1.ScrollBars=0 D. Txt1.MultiLine=False Txt1.ScrollBars=3

21.表达式为4+5\\6*7/8 mod 9的值是（ B ） A. 4 B. 5 C. 6 D. 7

22.提供控件的窗口是（ C ） A. 对象窗口 B. 对象浏览器 C. 工具箱 D. 工具栏

23.表示条件“身高T超过1.7米且体重W小于62.5千克”的逻辑表达式是A. T>=1.7 And W<=62.5 B. T<=1.7 Or W>=62.5 C. T>1.7 And W<62.5 D. T>1.7 Or W<62.5

24.下列程序段执行结果为 X=2 Y=1

IF X*Y<1 THEN Y=Y-1 ELSE Y=-1 Print Y-X>0（ B ） A. True B. False C. -1 D. 1

25.阅读下面程序，选择正确结果。 Dim i As Integer,j As Integer Dim Sum As Integer For i=1 to 17 step 2 For j=1 to 3 step 2 Sum=Sum+j Next j

C ）（Next i Print Sub

上面程序运行后窗口输出结果是（） A. 9 B. 18 C. 27 D. 36

26.把字符串\转换为数值123时应该使用的函数是（b ） A. St B. Val C. Len D. Rnd

27.下面是字符串数据的类型声明字符d） A. % B. $ C. & D. !

28.以下的程序运行后，窗体中显示的结果是 Private Sub Form_Click() a = 360

b = a \\ 100 + a Mod 100 + (a Mod 10) *100 Print b End Sub（） A. 63 B. 063 C. 360 D. 36

29.表达式15 Mod 4 + 13 \\ 5 * 2的值是（ D ） A. 7 B. 0 C. 2 D. 4

30.执行语句s=Len(Mid(\，1,6))后，s的值为A. Visual B. Basic C. 6 D. 11

31.I被j整除的逻辑表达式是（D ） A. I/j=0 B. I\\j=0 C. I<>j

D. I mod j=0

32.要声明一个全局变量，应该这样做（B ）

A. 将变量声明放在某个过程中，并使用Public关键字

c）（

B. 将变量声明放在任何一个模块的通用声明段，并使用Public关键字 C. 将变量声明放在标准模块的通用声明段，并使用Private关键字 D. 将变量声明放在标准模块的通用声明段，并使用Public关键字 33.设a=6，则执行下面的语句后，x的值是 x=IIf (a>5,-1,0) （B ） A. 5 B. -1 C. 0 D. 4

34.运算符“\\”两边的操作数若类型不同，则先再运算（ C ） A. 取整数为Byte类型 B. 取整数为Integer类型 C. 四舍五入为整型

D. 四舍五入为Byte类型

35.函数Int(Rnd*20)是在范围内的整数（ C ） A. (0,2） B. (1,20） C. (0,19） D. (1,9）

36.如果希望用变量X来存放数据1234.5678912，应将X定义为类型（ B ） A. 单精度型 B. 双精度型 C. 长整型 D. 字符型

37.下面变量名是错误的（ D） A. 姓名 B. a C. a123 D. a.1

38.在默认情况下，InputBox函数返回值的类型为（A ） A. 字符串 B. 变体 C. 数值

D. 数值或字符串

39.程序在运行循环For i=1 to 14 Step 3结束后，i的值等于（ A ） A. 16 B. 13 C. 14 D. 15

40.下列数据中是Boolean型常量（ A ） A. 123 B. And C. True D. Or

41.在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的标签，然后编写如下事件过程：

Private Sub Command1_Click() S=0

For i=1 To 15 x=2*i-1

If x Mod 3=0 Then s=s+1 Next i

Label1.Caption=s End Sub

程序运行后，单击命令按钮，则标签中显示的内容是（B ） A. 1 B. 5 C. 27 D. 45

42.下列逻辑运算结果为\的是（ C ） A. false or not true B. false and not true C. true or not true D. true and not true

43.对于Dim X(1 to 4,4 to 5),数组X中可以存放个元素。（ C ） A.6 B.8 C.10 D.20

44.子程序定义时使用Private表示。（ B ） A.此子程序可以被其他过程调用

B.此子程序只可以被本窗体模块中的其他过程调用 C.此子程序不可以被其他任何过程调用

D.此子程序只可以被本工程中的其他过程调用 45.以下关于单选按钮的说法，正确的是。（B ）

D.所有容器多于一个的单选按钮一次只能有一个被选中 46. 控件的行为具有Boolean类型。（ D ） A.单选按钮、命令按钮 B.复选框、标签 C.单选按钮、复选框 D.列表框、组合框

47.当组合框的Style属性设置为2时，其表现形式是。（ C ） A.下拉列表框 B.下拉组合框 C.简单组合框

D.文本框

48.当组合框的Style属性设置为1时，其表现形式是。（ D ） A.下拉列表框 B.下拉组合框 C.简单组合框 D.文本框

49.关于复选框和单选按钮的比较正确的是。（ D ） A.复选框和单选按钮都只能在多个选项中选定一项

B.复选框和单选按钮的Click事件能让Value属性变成True C.单选按钮和复选框都支持DblClick事件

D.让复选框不可用，可设置其Enabled属性为False或设置Value属性为3 50.函数Int(Rnd*20)是在范围内的整数。（A ） A.(0,20) B.(1,20) C.(1,19) D.(0,19)

51.当滚动滚动滑块时，将处罚滚动框的事件。（C ） A.Move B.Change C.Scroll D.Getfocus

52.在以下的For Each?Next循环中，A只能是。 Dim X(15) ??

For Each A In X Print A;

Next A（ A ）

A.已经声明的静态数组 B.已经声明的动态数组 C.Variant类型的变量 D.整形变量

53.以下叙述中正确的是。（A ） A.组合框包含了列表框的功能 B.列表框包含了组合框的功能

C.列表框和组合框的功能无相近之处 D.列表框和组合框的功能完全相同

54.阅读以下程序，执行该程序后，数组A和数组B的值分别是。 Private Sub Form_Click() Dim A(100),B(100) For i=1 to 100 A(i)=i Next i

For i=1 to 100 B(i)=A(i)+A(i-1)

Next i

End Sub（ C ）

A.数组A和数组B各存储1—100的自然数

B.数组A存储1—100的自然数，数组B存储101—200的自然数 C.数组A存储1—100的自然数，数组B存储1—199的奇数 D.数组A存储1—100的自然数，数组B存储2—200的偶数 55.在窗体上放置一个按钮Command1，程序如下： Private Sub Command1_Click() Dim a(1 To 4) As Integer Dim i As Integer

a(1) = 5 : a(2) = 6 : a(3) = 7 : a(4) = 8 subp a() For i = 1 To 4 Print a(i) Next i End Sub

Sub subp(b() As Integer) Dim i As Integer For i = 1 To 4 b(i) = 2 * i Next i End Sub

运行程序，单击按钮在窗体上显示。（A ） A.2回车4回车6回车8 B.5回车6回车7回车8

C.10回车12回车14回车16 D.出错

56.在窗体上画一个名称为Command1的命令按钮，再画两个名称分别为Label1和Label2的标签，然后编写如下程序代码： Private X As Integer

Private Sub Command1_Click() X=15 Y=25

Call Proc(X,Y) Label1.Caption=X Label2.Caption=Y End Sub

Private Sub Proc(ByVal A As Integer, ByVal B As Integer) X=A+A Y=B*B End Sub

程序运行后，单击命令按钮，则两个标签中现实的内容分别是。（A ） A.30和25 B.25和30

C.25和15 D.15和25

57.函数过程与SUB过程必须用关键字Private或Public声明。（ B ） A.对 B.错

58.要让窗体以最大化方式打开，应设置MaxButton属性值为True。（ B ） A.对 B.错

59.让复选框不可用，可设置其Enabled属性为False或设置Value属性为2。（ A ） A.对 B.错

60.在Do循环结构中，While和Until关键字的作用是相反的。（） A.对 B.错

61.属性是Visual Basic对象性质的描述，对象的数据就保存在属性中。（ A ） A.对 B.错

62.将命令按钮Command1设置为不可见，应修改该命令按钮的Visible 属性。（） A.对 B.错

63.设置框架时，可先在窗体上画好框架，再往框架内添置控件；也可以先设置控件，再建立框架，然后将已有控件拖动到框架中。（ B ） A.对 B.错

64.决定对象是否可见的属性是Visible属性，决定对象可用性的属性是Enabled属性。（ B ） A.对 B.错

65.一个应用程序可以有多个窗体，使用工程菜单下的添加窗体命令，可以添加一个新的窗体。（） A.对 B.错

66.用户可拖动滚动条的滚动滑块来改变滚动条的Value值，在移动滚动滑块时，发生Scroll事件。（ B ） A.对 B.错

67.在块If语句中，关键字End If 是必不可少的。（ B ） A.对 B.错

68.控件的属性值可以在程序运行时动态地修改。（ B ） A.对 B.错

69.Visual Basic工具箱中的所有控件都具有宽度(Width)和高度(Height)属性。（） A.对 B.错

70.用DIM定义数值变量时，该数值变量自动赋初值为0。（） A.对 B.错

71.不能用Do循环设计出预先知道循环次数的循环。（） A.对 B.错

72.在For/Next循环语句中，\可以省略。（） A.对 B.错

73.文本框控件常用事件有Change事件、KeyPress事件等，但它不支持鼠标的Click事件和DblClick事件。（） A.对 B.错

74.在行If语句中，关键字End If 是必不可少的。（） A.对 B.错

75.使用复制、粘贴的方法建立一个命令按钮数组Command1，所有命令按钮的Caption属性都是Command1。（ A ） A.对 B.错

76.事件是由Visual Basic预先定义的对象能够识别的动作。（ A ） A.对 B.错

一、单选题（每题1分，共76题）

1.想要显示一个输入框，它的标题栏上显示“示例”，提示信息是“请输入一个正整数”，输入框内默认内容为“1”，其语句是（ A ）

A. A=InputBox(“请输入一个正整数”,”示例”,”1”) B. A=InputBox(”示例”,“请输入一个正整数”,”1”) C. A=InputBox(”1”,”示例”,“请输入一个正整数”) D. A=InputBox(“请输入一个正整数” ,”1”,”示例”)

2.若要使标签控件显示时不覆盖其背景内容，应设置标签控件的属性（A ） A. BackColor B. BorderStyle C. ForeColor D. BackStyle

3.下面变量名是错误的（ D ） A. 姓名 B. a C. a123 D. a.1

4.启动窗体在程序运行后，不进行任何操作的情况下会发生事件（ D ） A. Initialize和Load B. Show

C. Activate

D. A和C

5.当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的属性为True（A ） A. AutoSize B. WordWrap C. Enabled D. Visible

6.语句Form1.Hide中，Hide是Form1对象的一个（ D ） A. 方法 B. 参数 C. 属性 D. 事件

7.对象窗口是用来设计（B ） A. 应用程序的代码段 B. 应用程序的界面 C. 对象的属性 D. 对象的事件

8.如果变量赋值为str1=”练习”，var1=5，则语句Print ”第”& var1 &”次” & str1 输出的结果为（ A ） A. 第5次练习 B. 第5次str1 C. 第var1次练习 D. 第var1次str1

9.假定一个VB应用程序由一个窗体模块和一个标准模块构成，为了保存该应用程序，以下正确的操作是（B ） A. 只保存窗体模块文件

B. 分别保存窗体模块、标准模块和工程文件 C. 只保存窗体模块和标准模块文件 D. 只保存工程文件

10.下列是窗体对象的方法而不是属性（ B ） A. Name B. Move C. Caption D. Enabled

11.窗体Form1的Caption属性为frm，它的Load事件过程名为（A ） A. Form_Load B. Form1_Load C. frm_Load D. Me_Load

12.在VB程序中，语句的续行符是（A ） A. & B. _ C. ;

D. :

13. 在用户的应用程序执行期间发生，比如单击鼠标或按键盘中的键（C ） A. 方法 B. 属性 C. 事件 D. 工程

14.控件中最适合做标题的控件是。（B ） A. 文本框 B. 标签框 C. 命令按钮 D. 窗体

15.如果希望一个按钮仅显示图片，正确的设置是（ D ） A. 将按钮的Style属性设置为1-Graphical B. 设置按钮的Caption属性为空

C. 将按钮的Picture属性指定为一个图片文件 D. 以上都必须设置

16.如果要改变窗体的标题，需要设置窗体对象的属性（A ） A. caption B. Name

C. BorderStyle D. Title

17.窗体上有一个名为Txt1的文本框，为了使该文本框的内容能够换行，并且具有水平和垂直滚动条，正确的属性设置为（ B ） A. Txt1.MultiLine=True Txt1.ScrollBars=0 B. Txt1.MultiLine=True Txt1.ScrollBars=3 C. Txt1.MultiLine=False Txt1.ScrollBars=0 D. Txt1.MultiLine=False Txt1.ScrollBars=3

18.如果希望一个窗体在显示的时候没有边框，应该（C ） A. 将窗体的Caption属性设置成空字符 B. 将窗体的Enabled属性设置成False C. 将窗体的BorderStyle属性设置成None D. 将窗体的ControlBox属性设置成False 19.若要求在文本框中输入密码时只显示“#”号，则应在此文本框的属性窗口中设置（ C ） A. Text属性值为# B. Caption属性值为#

C. Passwordchar属性值为# D. Password属性值为True

20.将命令按钮的属性设置为True，当用户按【Esc】键时可以激发该命令按钮的Click事件（ D ） A. Name

B. Enable C. Default D. Cancel

21.I被j整除的逻辑表达式是（ D ） A. I/j=0 B. I\\j=0 C. I<>j

D. I mod j=0

22.根据“属性窗口”中的属性来区分窗体中的控件（ B） A.Text B.Name(名称) C.Caption D.Index

23.Visual Basic 认为下面组变量是同一个变量（ A ） A. A1 和a1

B. SUM 和 SUMMARY C. AVER 和 AVERAGE\\ D. A1 和 A-1

24.x是小于100的非负数，用vb表达式正确的是（ B ） A. 0

B. 0<=x<100

C. x>=0 AND x<100 D. 0<=x OR x<100

25.表达式为4+5\\6*7/8 mod 9的值是（B ） A. 4 B. 5 C. 6 D. 7

26.下列程序执行后，整型变量C的值为 A=24 B=328

Select Case B\\100 Case 0 C=A+B Case 1

C=A*10+B Case 2

C=A*100+B Case 3

C=A*1000+B

End Select（ C ） A. 537 B. 2427 C. 24328

D. 240328

27.赋值语句A=123 + Mid( “123456”,3,2 )执行后，A的值是（） A. 157 B. 12334 C. 123 D. “12334”

28.运行下面程序，单击窗体后在窗体上显示的内容是 Private Sub Form_Click() Dim x As Integer, y As Integer x = 1: y = 0 Do While x < 3 x = x + 1 y = x + y Loop Print x; y

End Sub（） A. 1 0 B. 3 3 C. 5 3 D. 3 5

29.下列程序段执行结果为 A=75

If A>60 Then I=1 If A>70 Then I=2 If A>80 Then I=3 If A>90 Then I=4

Print “I=” ; I（ B ） A. I=1 B. I=2 C. I=3 D. I=4

30.设a=6，则执行下面的语句后，x的值是 x=IIf (a>5,-1,0) （ B ） A. 5 B. -1 C. 0 D. 4

31.执行语句s=Len(Mid(\，1,6))后，s的值为 A. Visual B. Basic C. 6 D. 11

32.语句X=X+1的正确含义是（ C ） A. 变量X的值与X+1的值相等

C ）（

B. 将变量X的值存到X+1中去 C. 将变量X的值加1后赋给变量X D. 变量X的值为1

33.在窗体上放置一个命令按钮Command1和一个文本框Text1，把Text1的Text属性设置为空，运行下面的事件过程代码： Private Sub Command1_Click() Dim a,b

A=InputBox(“输入一个整数”) B=Text1.Text Text1.Text=a+b End Sub

运行程序，在Text1文本框中输入456，单击按钮Command1，然后在出现的输入框中输入123，单击【确定】按钮，在Text1中显示的内容是（C ） A. 579 B. 123 C. 123456 D. 456

34.以下的程序运行后，窗体中显示的结果是 Private Sub Form_Click() a = 360

b = a \\ 100 + a Mod 100 + (a Mod 10) *100 Print b End Sub（） A. 63 B. 063 C. 360 D. 36

35.以下叙述中正确的是（ B ）

A. Select Case语句中的测试表达式可以是任何形式的表达式

B. Select Case语句中的测试表达式只能是数值表达式或字符表达式

C. 在执行Select Case语句时，所有的Case子句都按出现的次序被顺序执行 D. Select Case的测试表达式会多次计算

36.在默认情况下，InputBox函数返回值的类型为（ A A. 字符串 B. 变体 C. 数值

D. 数值或字符串

37.Private Sub Form_Click() a = 1 b = 1

N = InputBox(\For I = 2 To N Step 1 c = a + b a = b

b = c Next

Form1.Cls Print b End Sub

单击窗体输入4后，窗体上的显示结果为：（D ） A. 3 B. 4 C. 7 D. 5

38.如果变量赋值为str1=”练习”，var1=5，则语句Print ”第”& var1 &”次” & str1 输出的结果为（A ） A. 第5次练习 B. 第5次str1 C. 第var1次练习 D. 第var1次str1

39.对Do循环结构的作用说明正确的是（ D ） A. 不能用Do循环设计出预先知道循环次数的循环 B. While和Until关键字必须选择其中之一 C. While和Until关键字可以同时使用 D.While和Until关键字的作用相反

40.表示条件“身高T超过1.7米且体重W小于62.5千克”的逻辑表达式是（C ） A. T>=1.7 And W<=62.5 B. T<=1.7 Or W>=62.5 C. T>1.7 And W<62.5 D. T>1.7 Or W<62.5

41.下列是日期常量（C ） A. “2/1/02” B. 2/1/02 C. #2/1/02# D. {2/1/02}

42.下列程序段执行后，S的值是 S=5

For I=2.6 To 4.9 Step 2 s=s+1

Next I（） A. 5 B. 2.6 C. 6 D. 7

43.将数据项“China”添加到列表框(List1)中成为第一项应使用。（） A.List1.Additem “China”,0 B.List1.Additem “China”,1 C.List1.Additem 0, “China”

D.List1.Additem 1, “China”

44.当组合框的Style属性设置为2时，其表现形式是。（） A.下拉列表框 B.下拉组合框 C.简单组合框 D.文本框

45.在以下的For Each?Next循环中，A只能是。 Dim X(15)

For Each A In X Print A;

Next A（ A）

A.已经声明的静态数组 B.已经声明的动态数组 C.Variant类型的变量 D.整形变量

46.子程序定义时使用Private表示。（ B ） A.此子程序可以被其他过程调用

B.此子程序只可以被本窗体模块中的其他过程调用 C.此子程序不可以被其他任何过程调用

D.此子程序只可以被本工程中的其他过程调用

47.当组合框的Style属性设置为0时，其表现形式是。（ B） A.下拉列表框 B.下拉组合框 C.简单组合框 D.文本框

48.有关列表框使用属性的正确描述是。（） A.列表框的内容由属性ItemDate来确定

B.当多选属性(MultiSelect)为True时，可通过Text属性获得所有内容 C.选中的内容无法通过List属性来访问

D.只有MultiSelect属性为True时，才可通过Text属性获得选中内容 49.有关组合框使用的属性和方法的正确描述是。（A ） A.组合框使用Additem方法可以增加列表项 B.Text属性就是组合框的文本框中显示的内容

C.当Style属性为1—Simple Combo时，组合框仅用于选择，不允许输入 D.组合框不允许多选

50.关于复选框和单选按钮的比较正确的是。（） A.复选框和单选按钮都只能在多个选项中选定一项

B.复选框和单选按钮的Click事件能让Value属性变成True C.单选按钮和复选框都支持DblClick事件

D.让复选框不可用，可设置其Enabled属性为False或设置Value属性为3 51. 控件的行为具有Boolean类型。（ C ） A.单选按钮、命令按钮 B.复选框、标签

C.单选按钮、复选框 D.列表框、组合框

52.在窗体上用复制、粘贴的方法建立一个命令按钮数组，数组名为M1，设窗体Form1标题为“MyForm1”，双击控件数组中的第三个按钮，打开代码编辑器，写下如下代码： Private Sub M1_Click(Index As Integer) Form1.Caption=”Myform2” End Sub

运行时，单击控件数组中的第一个按钮，则窗体标题为。（D ） A.Form1 B.M1

C.Myform1 D.Myform2

53.下面语句声明的数组不是动态数组。（ D ） A.Dim X() B.Dim X(5) C.ReDim X(10)

D.以上都不是

54.建立一个俱乐部会员信息输入界面，要求选择会员的性别、职业(工程师、公务员、教师、医生、其他)及爱好(共10种，如一个人既喜欢足球，又喜欢旅游)。应如何在窗体上如何实现。（D ）

A.用一组17个复选框来实现

B.将10种爱好用一组10个复选框来实现，性别和职业用7个单选按钮来实现 C.将10种爱好用一组10个单选按钮来实现，性别和职业用7个复选框来实现

D.将10种爱好用一组10个复选框来实现，性别用2个单选按钮来实现，职业用一个框架和5个单选按钮来实现

55.可以同时删除字符串前导和尾部空白的函数是。（ C ） A.LTrim B.RTrim C.Trim D.A和C

56.A=”Visual Basic”,下面是B=“Basic”的语句是。（ B ） A.B=Left(A,8,12) B.B=Mid(A,8,5) C.B=Right(A,5,8) D.B=Left(A,8,5)

57.For/Next语句中，循环控制变量只能是整形变量。（） A.对 B.错

58.For I=5 to 10 ? Next I循环体中没有Exit For语句，也没有更改I值，循环结束后，控制变量I的当前值等于终值10。（） A.对 B.错