VB试题库（全国）

一、 选择题

1．以下叙述中错误的是____B____。

A．.vbp文件是工程文件，一个工程可以包含.bas文件 B．.frm文件是窗体文件，一个窗体可以包含.bas文件

C．.vbp文件是工程文件，一个工程可以由多个.frm文件组成

D．.vbg文件是工程组文件，一个工程组可以由多个工程组成 2．以下合法的VB变量名是____C____。

A．Case B．t-name C．name10 D．x*y 3．以下描述中错误的是____B____。

A．窗体的标题通过其Caption属性设置

B．窗体的名称(Name属性)可以在运行期间修改 C．窗体的背景图形通过其Picture属性设置 D．窗体最小化时的图标通过其Icon属性设置

4．在Visual Basic集成环境中，可以列出工程中所有模块名称的窗口是____A____。

A．工程资源管理器窗口 B．窗体设计窗口 C．属性窗口 D．代码窗口

5．在Visual Basic集成环境中，要添加一个窗体，可以单击工具栏上的一个按钮，这个按钮是_____A___。

A．

B．

C．

D．

6．在Visual Basic集成环境中，要结束一个正在运行的工程,可单击工具栏上的一个按钮,这个按钮是_____D___。

A．

B．

C．

D．

7．以下变量名中合法的是__C______。

A．x2-1 B．print C．str_n D．2x 8．执行语句Dim X，Y As Integer后，___D_____。

A．X和Y均被定义为整型变量 B．X和Y均被定义为变体类型变量

C．X被定义为整型变量，Y被定义为变体类型变量 D．X被定义为变体类型变量，Y被定义为整型变量

9．在设计窗体时双击窗体的任何地方，可以打开的窗口是___A_____。

A．代码窗口 B．属性窗口

C．工程资源管理器窗口 D．工具箱窗口 10．以下叙述中错误的是___D_____。

A．标准模块文件的扩展名是.bas B．标准模块文件是纯代码文件

C．在标准模块中声明的全局变量可以在整个工程中使用

D．在标准模块中不能定义过程 11．以下叙述中错误的是_____C____。

A．在Visual Basic的窗体中，一个命令按钮是一个对象 B．事件是能够被对象识别的状态变化或动作

C．事件都是由用户的键盘操作或鼠标操作触发的 D．不同的对象可以具有相同的方法

12．设x是小于10的非负数。对此陈述，以下正确的VB表达式是___C____。

A．0≤x<10 B．0<=x<10 C．x>=0 And x<10 D．x>=0Orx<=10

13．在设计阶段，当按Ctrl＋R键时，所打开的窗口是_B______。 A．代码窗口 B．工程资源管理器窗口 C．工具箱窗口 D．属性窗口

14．在设计阶段，当按下F4键时，所打开的窗口是____D___。 A．代码窗口 B．工具箱窗口 C．工程资源管理器窗口 D．属性窗口

15．在Visual Basic集成环境的设计模式下，用鼠标双击窗体上的某个控件打开的窗口是____D___。 A．工程资源管理器窗口 B．属性窗口 C．工具箱窗口 D．代码窗口

16．设x是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是___B____。 A．|x| B．-|x| C．x D．-x 17．把数学表达式

5x?32y?6表示为正确的VB表达式应该是___D____。

A．(5x＋3)/(2y－6) B．x*5＋3/2*y-6 C．(5*x＋3)(2*y-6) D．(x*5＋3)/(y*2－6)

18．以下关系表达式中，其值为True的是_____B__。 Ascii码 A 65 a 97

A．\ B．\ C．\=\ D．\

19．若变量a未事先定义而直接使用(例如：a=0)，则变量a的类型是___D____。

A．Integer B．String C．Boolean D．Variant 20．在Visual Basic中，表达式3*2\\5 Mod 3的值是____A_____。

A．1 B．0 C．3 D．出现错误提示

21．设x=3.3,y=4.5，表达式x-Int(x)+Fix(y)的值是____C____。Int(n):取<=n的最大整数；Fix(n)：取n的整数部分

A．3.5 B．4.8 C．4.3 D．4.7 22．以下关于窗体的叙述中，错误的是____D____。

A．窗体的Name属性用于标识一个窗体

B．运行程序时改变窗体大小，能够触发窗体的Resize事件 C．窗体的Enabled属性为False时，不能响应单击窗体的事件 D．程序运行期间，可以改变Name属性值 23．设有如下变量声明语句： Dim a,b As Boolean

则下面叙述中正确的是___B_____。

A．a和b都是布尔型变量

B．a是变体型变量，b是布尔型变量 C．a是整型变量，b是布尔型变量 D．a和b都是变体型变量

24．为了使标签具“透明”的显示效果，需要设置的属性是____C____。

A．Caption B．Alignment C．BackStyle D．AutoSize 25．下列叙述中错误的是_____D___。

A．列表框与组合框都有List属性

B．列表框有Selected属性，而组合框没有 C．列表框和组合框都有Style属性 D．组合框有Text属性，而列表框没有 26．设窗体文件中有下面的事件过程：

Private Sub Commandl_Click()

Dim s a%=100 Print a End Sub

其中变量a和s的数据类型分别是_____C___。

A．整型,整型 B．变体型,变体型 C．整型,变体型 D．变体型,整型

27．下面有关标准模块的叙述中，错误的是____A____。

A．标准模块不完全由代码组成，还可以有窗体

B．标准模块中的Private过程不能被工程中的其他模块调用 C．标准模块的文件扩展名为.bas

D．标准模块中的全局变量可以被工程中的任何模块引用 28．执行以下程序段

a$=\ b$=\++\

c$=UCase(Left$(a$,7))& b$&Right$(a$,12) 后，变量c$的值为_____B___。

A．Visual BASIC Programming B．VISUAL C++Programming C．Visual C++Programming

D．VISUAL BASIC Programming

29．为把圆周率的近似值3.14159存放在变量pi中，应该把变量pi定义为___C_____。

A．Dim pi As Integer B．Dim pi(7)As Integer C．Dim pi As Single D．Dim pi As Long

30．以下选项中，不合法的Visual Basic的变量名是____B____。 A．a5b B．_xyz C．a_b D．andif

31．窗体上有一个名称为Command1的命令按钮，其中部分代码如下：

Private Sub Command1_Click() Dim a(10)As Integer Dim n As Integer …… Call calc(a,n) …… End Sub

calc过程的首行应该是____A_____。

A．Sub calc(x() As Integer, n As Integer)

B．Public Sub calc(x() As Integer)

C．Private Sub calc(a(n) As Integer, n As Integer) D．Public Sub calc(a As Integer, n As Integer)

32．下面定义窗体级变量a的语句中错误的是___D_____。

A．Dim a% B．Private a% C．Private a As Integer D．Static a% 33．下列可作为Visual Basic变量名的是____D____。

A．A#A B．4ABC C．?xy D．Print_Text

34．下面可以产生20～30(含20和30)的随机整数的表达式是_____B___。

A．Int(Rnd*10+20) B．Int(Rnd*11+20) C．Int(Rnd*20+30) D．Int(Rnd*30+20)

35．设窗体上有一个命令按钮数组，能够区分数组中各个按钮的属性是____B____。

A．Name B．Index C．Caption D．Left 36．下面哪个属性肯定不是框架控件的属性____A____。

A．Text B．Caption C．Left D．Enabled 37．下面控件中，没有Caption属性的是___C_____。

A．复选框 B．单选按钮 C．组合框 D．框架 38．下列叙述中正确的是______C__。

A．MsgBox语句的返回值是一个整数

B．执行MsgBox语句并出现信息框后，不用关闭信息框即可执行其他操作

C．MsgBox语句的第一个参数不能省略 Msgbox(提示，【，按钮】【，标题】) D．如果省略MsgBox语句的第三个参数(Title)，则信息框的标题为空 39．表达式2*3^2 +4*2/2 + 3^2的值是____B____。

A．30 B．31 C．49 D．48 40．以下数组定义语句中，错误的是____C_____。

A．Static a(10)As Integer B．Dim c(3,1 To 4)

C．Dim d(-10) 若省略下界时，默认为0 D．Dim b(0 To 5,1 To 3)As Integer 41．设有如下程序：

Sub f(x As Integer, ByVal y As Integer) x=2*x y=y+x End Sub

Private Sub Command1_Click() Dim a As Integer, b As Integer a=6:b=35 Call f(a, b) Print a, b End Sub

程序运行后，单击命令按钮Command1，输出结果为____D____。

A．647 B．1247 C．635 D．1235 例：Sub s1(ByVal x As Integer, ByVal y As Integer) Dim t As Integer t = x