计算机VB答案

计算机答案

Ⅰ选择题

1)工程文件的文件名后缀是_B____。

a) .bmp b) .vbp c) .f rm

d) .bas

2)窗体模块保存在一个扩展名为_C____的文件中。

a) bas b) cls c) f rm d) bmp

3)启动V isual Basic后，系统为用户新建的工程起一个名为__A___的临时名称。

a) 工程 1 b) 窗体 1 c) 工程

d) 窗

4)在V isual Basic设计界面中不能隐藏的窗口是_A_____。

a) 工程窗口b) 属性窗口c) 立即窗口d)窗体窗口

5)在V isual Basic环境下，当写一个新的V isual Basic 程序时，所做的第一件事是__B______。

a) 编写代码b) 新建一个工程c) 打开属性窗口d)进入V B环境

6)当一个工程含有多个窗体时，其中的启动窗体是_D____。

a) 启动VB时建立的窗体b)第一个添加的窗体

c) 最后一个添加的窗体d)在“工程属性”对话框中指定的窗体

7)双击窗体中的对象后，V isual Basic将显示的窗口是C_____。

a) 项目（工程）窗口b)工具箱c) 代码窗口d)属性窗口

8)VB应用程序的运行模式是_C____。

a) 解释运行模式b) 编译运行模式

c) 两者都有d)汇编模式

9)V isual Basic共有设计、运行和中断三种模式，要使用调试工具应该_C____。

a) 进入设计b)进入运行c) 进入中断d)不用进入

10)运行VB程序的快捷键为_B______。

a) F4 b) F5 c) F6 d) F7

11)OOP的含义是_A_____。

a) 面向对象的程序设计方法b) 开放数据库接口

c) 图形设备接口d)图形用户界面

12)“对象”是计算机系统运行的_D_____。

a) 程序单位b)逻辑单位c) 物理实体d)基本实体

13)V isual Basic 是一种面向对象的程序设计语言，构成对象的三要素是__A______。

a) 属性、事件、方法b) 控件、属性、事件c) 窗体、

控件、过程d)窗体、控件、模块

14)在V isual Basic 中，称对象的功能为__B____。

a) 属性b) 方法c) 事件d)

封装

15)_C____是由V isual Basic提供的一种专门的子程

序，由对象本身所具有，反映该对象功能的内部函数

或过程。

a) 文件b) 属性c) 方法d)

窗体

16)对象可以识别和响应的某些行为称为_D___。

a) 属性b) 方法c) 继承d)

事件

17)当事件能被触发时，_B____就会对该事件作出响

应。

a) 对象b) 程序c) 控件d)

窗体

18)V isual Basic主要用于__D____。

a) 图像处理b)文字处理c) 制作

视频文件d)开发应用程序

19)下述的说法哪种是Window s的程序设计方法：

_D______。

a) 面向对象，顺序驱b) 面向过程、事件驱c) 面向过

程、顺序驱d) 面向对象、事件驱动

20)V isual basic采用了_C____编程机制。

a) 面向过程b) 面向对象c) 事件驱

动d)可视化

26)下列变量名中不合法的是_B____。

a) strname b) abc-3 c) A_one

d) vaone

21)以下不是V isual Basic特点的选项是_B____

a) 可视编程b) 算法设计c) 事件驱

动d)面向对象

22)下列叙述正确的是_C______。

a) 对象是包含数据又包含对象数据进行操作的方法

的物理实体b) 对象的属性只能在属性窗口中设置c)

不同的对象能识别不同的事件d) 事件过程都要由

用户点击对象来触发

23)下列变量名中合法的是_A_____

a) name1 b) 6a c) a+b d) For

24)对变量名说法不正确的是__C____。

a) 必须是字母开头，不能是数字或其他字符

b) 不能是V isual Basic的保留字

c) 可以包含字母、数字、下划线和标点符号d)

不能超过255个字符

25)下列符号是V isual Basic中合法变量名的是

_D____。

a) IF b) 7AB c) A[B]7 d) GH_R56

27)下列字符串不能作为VB的变量名是_C_____。

a) ABCDEFG b) P000000 c)

89TWDDFF d) XYZ

28)下列哪一个是正确的变量名__D____。

a) $abc b) abs c)141abc d)

abcf

29)Integer类型的数据由_C____个字节组成。

a) 21 b) 4 c) 2 d) 16

30)字节型变量占用的字节数为_A_____。

a) 1个字节b) 3个字节c) 4个字节

d) 5个字节

31)整型变量未赋值时，数值型变量的值为_A____。

a) 0 b) 空c) 1 d) 0.1

32)下列各项不是V isual Basic的基本数据类型的是

__A___。

a) Char b) String c) Integer d)

Double

33)整型数的取值范围为__D____。

a) –32767～+32767 b) 0～65535 c) –32768～

+32768 d)–32768～+32767

34)下列类型的变量中占用字节数最小的是__A___。

a) Integer b) Single c) Date d)

Double

35)Boolean 类型的数据由几个字节组成__B_____。

a) 1 b) 2 c) 3 d) 4

36)单精度浮点数占用的字节数为__C____。

a) 2个字节b) 3个字节c) 4个字节

d) 8个字节

37)变量A!的类型是_B___。

a) Integer b) Single c) String

d) Boolean

38)在VB中，常量12#的数据类型是__B___。

a) 整型b) 双精度浮点型c) 长整型

d) 字符串

39)变量X=32767，则变量声明时最好将其声明为

__A___。

a) Integer b) V ariant c) Long

d) Single

40)___A____关键字声明的过程级变量在整个程序运

行中一直存在。

a) Static b) Private c) Dim d)

Public

41)声明全局变量的位置是_C_____。

a) 事件过程b) 函数过程c) 标准模块通用声明段d)

窗体模块通用声明段

42)Inputbox()函数的返回值类型为__B___。

a) 数值型b) 字符型c) 逻辑型

d) 变体型

43)设x=-18，则Abs(5*x)=_B____

a) -90 b) 90 c) 18 d) 5

44)Msgbox 函数返回值的类型是__A____。

a) 数值b) 字符串c) 变体

d) 数值或字符串(视输入情况而定)

45)str函数返回值类型是__B___。

a) 整型b) 字符串c) 变体

d) 双精度浮点型

46)用于获取字符串长度的函数是____A___。

a) Len() b) Length() c) Strlen()

d) Lof o()

47)Strc=Mid("V isual Basic",10,3)，则Strc的值__D___。

a) V is b) sua c) Bas d) sic

48)Rnd函数不可能产生的值是_B____。

a) 0.1 b) 1 c) 0.1234 d)

0.00005

49)函数int(10*rnd)是在_D____范围内的整数。

a) [0, 1) b) [1, 10) c) [1, 9) d) [0,9]

50)Rnd函数可能产生的值是_C____。

a) 2 b) 1 c) 0.1234 d)

1.00005

51)INT(100*RND(1))产生的随机整数的闭区间是_A____。

a) [0，99] b) [1，100] c) [0，100]

d) [1，99]

52)函数int(abs(99-100)/2)的值为_B_____。

a) 1 b) 0 c) 3 d) 4

53)下列能正确产生[1-30]之间的随机整数的表达式是_D_____。

a) 1+rnd(30) b) 1+30*rnd() c) rnd(1+30) d) int(rnd()*30)+1

54)Inputbox函数的参数中，必选参数Prompt的作用是__B___。a) 输出信息b) 定义提示信息c) 定义隐

含信息d)定义输入的位置

55)把InputBox 的返回值转换为数值应该使用的函

数是_D_____。

a) Log b) Str c) Len d) V al

56)设有如下语句：str1=inputbox("输入","","练习")从

键盘上输入字符串“你好”后，str1的值是_D__。

a) 输入b) c) 练习d)你

好

57)RGB(x,y,z)函数中x,y,z的取值范围__C____。

a) [0,255) b) (0,255]c) [0,255]

d) (0,255)

58)数学式子sin45°写成V isual Basic表达式是

__C___。

a) sin45 b) Sin(45) c) Sin(45*3.14/180)

d) sin(45°)

59)下列__B____语句可以将变量A、B的值互换。

a) A=B:B=A b)t=A:A=B:B=t c)

A=t:t=B:t=A d) B=A:A=B

60)下列_B_____语句可以将整型变量A、B的值互换。

a) A=B:B=A b) A=A+B:B=A-B:A=A-Bc)

A=C:C=B:C=A d) A=(A+B)/2:B=(A-B)/2

61)下面的运算符中，哪个是算术运算符_A______。

a) Mod b) = c) And d) Xo

62)下面的运算符中，哪个是关系运算符__C____。

a) Not b) mod c) <> d) &

63)下面的运算符中，哪个是逻辑运算符_A_____。

a) And b) Mod c) >= d) &

64)逻辑运算符Xor、Or、Eqv、And中，级别最高的

运算符是__D____。

a) Xor b) Or c) Eqv d) And

65)17 mod 3的运算结果是__D___。

a) 0.5 b) 1 c) 1.5 d) 2

66)下列表达式不合法的是_D______。

a) 123+abc b) 123&"abc" c) 1+2/3

d) [3*(4+5)-6]/7

67)语句Print 6*5/5的输出结果是__A______。

a) 6 b) 30 c) 0 d) 6*5/5

68)表达式25.28 Mod 10的值是( B )

a) 1 b) 5 c) 4 d) 出错

69)下列各赋值语句，语法不正确的是_A____。

a) x+y=5 b)Number=15 c)

Labell.caption="time" d) Length=x+y

70)表达式X+1>X是__D___。

a) 算术表达式b) 非法表达式c) 字

符串表达式d)关系表达式

71)x是小于100的非负数，用vb表达式正确的是

_D_____。

a) 0 b) 0<=x<100 c) x>=0 Or x<100

d) x>=0 AND x<100

72)若x=45,y=46,则表达式x+y=91的值是_C____。

a) x+y=11 b)11 c) False d)

True

73)a和b中有且只有一个为0，可以用以下表达式来

表示_B____。

a) a=0 or b=0 b) a=0 Xor b=0 c)

a*b=0 Xor a+b<>0 d) a=0 And b=0

74)写在一行上的多条语句，应以__C___为分隔符。

a) 分号b)逗号c) 冒号d)

空格

75)Print方法可以输出多个表达式值，若使用标准格

式输出，各表达式的分割符应是_B_____。

a) 空格b)逗号c) 冒号d)

分号

76)程序的基本控制结构是_C_____。

a) 顺序结构、多分支结构和单分支结构b)

For…Next结构、Do…loop结构

c) 顺序结构、选择结构和循环结构d) 单行

结构和多行结构

77)下列结构中不属于循环结构的是_C_____。

a) f or/next b) while/wend c) With/end

with d) do/loop

78)下列程序的执行结果为__A___。

A=100:b=50

If a>b Then

a=a-b

Else b=b+a

End if

Print a a) 50 b) 100 c) 200 d) 10

79)循环结构f or i=1 to 10 step 1.5的执行次数是

_B____。

a) 6 b) 7 c) 9 d) 10

80)当执行以下程序时，在名为label1的标签框内将

显示__A___。

Private Sub command1_click()

s=0

For I=1 To 5 Step 1

s=s+I

Next I

label1.Caption=s

End Sub

a) 15 b) 18 c) 8 d) 9

81)窗体设计器是用来设计__B____ a) 应用程序的代码段b) 应用程序的界面c)对象的属性d)对象的事件

82)决定一个窗体有无控制菜单的属性是_D____。

a) Minbutton b) Caption c) Maxbutton d) Controlbox

83)若要在窗体中绘制一个圆，使用的方法是_A_____。

a) Circle b) line c) point d) pset

84)若要将窗体从内存中卸载出去，应该使用的方法是__B____。

a) Show b)UnLoad c) Load

d) Hide

85)要使窗体Form1关闭,错误的是__D____。

a) Unload Form1 b) Unload me c) End d) Form1.V isiable=False

86)下列各种窗体事件中，不能由用户触发的事件是_D_____。

a) Load事件和Unload事件b) Click事件和Unload事件

c) Click事件和Dbclick事件d) Load事件和Initialize事件

87)窗体的Enable属性的属性值是_C____类型的数据。

a) 整型b) 字符型c) 逻辑型

d) 实型

88)如果要改变窗体的标题,需要设置窗体对象的___B_____属性。

a) Name b)Caption c) BackColor

d) BorderStyle

89)下列哪项是窗体对象的方法而不是属性（B）

a) Name b) Print c) Caption

d) Enabled

90)若要取消窗体的最大化功能，则可设置_C_____属性为False来实现。

a) ControlBox b) MinButton c) MaxButton d) Enabeld

91)窗体能响应的事件是__C_____。

a) ActiveFrom b) Drive c) Load

d) Change

92)对话框在关闭前，不能继续执行应用程序的其他部分，这种对话框称为__C_____。

a) 输入对话框b) 输出对话框c)模态对话框d)非模态对话框

93)将当前窗体中显示的文字及绘制的图形全部清除，可以用方法_B____。

a) Me.Clear b)Me.Cls c) Me=" "

d) Me.Delete 94)改变控件在窗体中的上下位置应修改控件的

_A____属性。

a) Top b) Lef t c) Width d)

Height

95)窗体的BackColor 属性用于设置窗体的

___C___。

a) 高度b)亮度c) 背景色

d) 前景色

96)确定一个窗体大小的属性是_A____。

a) Width和Height b) Width和Top

c) Top和Lef t d) Top和Height

97)能够改变窗体边框线类型的属性是_B____

a) FontStyle b) BorderStyle c)

BackStyle d) Border

98)设置文本控件的文本内容时，应改变的属性是

__A____。

a) text b)Name c) Caption

d) Width

99)命令f orm1.Cirle(500,800),800能够在窗体上中画

出的图形是_D______。

a) 半径为800的椭圆b)细而高的椭圆c) 扁而平的

椭圆d) 圆心在（500，800）的一个圆弧

100)控件是__A_____。

a) 建立对象的工具b)设置对象属性的工

具c) 编写程序的编辑器d)建立

图形界面的编辑窗口

101)要改变Label控件中背景的颜色，可以设置

Label控件的_D____属性。

a) FontColor b) FillColor c)

ForeColor d) BackColor

102)若要使标签的大小自动适应所显示的文本，可

通过设置__A____属性的值来实现。

a) AutoSize b) Alignment c)

Enabled d) V isble

103)在V isual Basic中通过_B_____属性设置字体颜

色。

a) Fontcolor b) Forecolor c)

Backcolor d) Showcolor

104)在V isual Basic中，要设置菜单项的快捷访问

键，应使用哪个符号：_A_____。

a) & b) * c) $ d) @

105)在V isual Basic中，下列____C____控件可以包

含其他控件

a) Label b) Commandbutton c)

Form d) Checkbox

106)若要使标签透明，则可使用的属性是__B_____。

a) BackColor b) BackStyle c)

BorderStyle d) ForeColor

107)设置标签边框的属性是_A_____。

a) BorderStyle b) BackStyle c)

AutoSize d) Alignment

108)当窗体大小改变时，要使其中的控件也按比例

发生变化，应使用窗体的___B___。

a) AutoSize属性b) Resize事件c)

AutoRedraw属性d) Stretch方法

109)标准工具箱中的控件__B_____。

a) 数目是固定不变的b)数目可以增加或

减少

c) 包含了V isual Basic所有控件d) 用户可

以删除工具箱中的按钮控件

110)要改变控件的宽度，应修改该控件的_C____属

性。

a) Top b) Lef t c) Width d)

Height

111)大部分控件都没有的属性是__D_____。

a) Top b) Name c) V isible

d) Interval

112)若要在列表框中显示多列数据，可用列表框的

_C_____属性来实现。

a) MultiSelec b) Index c) Columns

d) List

113)复选框控件其V alue属性的可取值是___C____。

a) Trut和False b) 0和1 c) 0、1、2

d) 1、2、3

114)所有控件都有的属性是__D_____，在程序中作

为对象的标识引用

a) Caption b) V alue c) Text

d) name

115)要使一个命令按钮成为图形命令按钮，则应首

先设置__B___属性值

a) Picture b)Style c) Downpicture

d) Disabledpicture

121)如果要在文本框中输入字符时，只显示某个字

符，如星号(*)，应设置文本框的_B______属性。

a) Caption b)PasswordChar c) Text

d) Char

122)为使文本框显示滚动条，必须先设置文本框的

属性是_C____。

a) AutoSize b) Alignment c)

Multiline d) ScrollBars

123)若要以代码方式设置在文本框中显示文本的字

体大小，则可用文本框的__C____属性来实现。

a) FontName b)Font c) FontSize d) FontBold

124)设定当鼠标移动到文本框控件上时给用户提示文本的属性是_B____。

a) HideSelection b)ToolTipText c) Aligmment d) WordWrap

125)若要设置文本框中所显示的文本颜色，使用的属性是__C__。

a) BackColor b) FillColor c) ForeColor d) BackStyle

126)设定文本框中是否可以接受多行文本用_C____属性。

a) MaxLength b) ToolTipText c) Multiline d) Tag

127)下列控件中可自动设置滚动条的是_C_______。

a) 复选框b) 框架c) 列表框d) 标签框

128)文本框控件最多能处理_A_____个字节。

a) 32k b) 64K c) 128K d) 16k

129)用于设定文本框中最多可接受的字符数的属性是_D_____。

a) AutoSize属性b) PasswordChar属性c) SelLength 属性d) MaxLength属性

130)要禁用计时器控件、需要将_A___属性设置为false。

a) Enable b) V isibale c) Timer d) Interval

131)若要设置定时器控件的定时时间，需设置的属性是_A____

a) interval b) value c) enabl ed d) text

132)为使计时器控件每隔5秒钟产生一个计时器事件(timer 事件)，则应将其Int erval属性值设置为__D____。

a) 5 b) 500 c) 300 d) 5000 133)如果要求设置定时器时间间隔为0.5秒钟，那么它的Interval属性值应该等于__B_____。

a) 5000 b) 500 c) 50 d) 5 134)将定时器的时间间隔设置为1秒，那么定时器的Interval属性应设置为_A_____。

a) 1000 b) 1 c) 100 d) 10 135)通用对话框中能打开“颜色对话框”的方法是_B_____。

a) ShowOpen b) ShowColor c) ShowSave d) Show Printer 136)以下控件中没有Caption属性的控件是

__B____。

a) 标签框b) 文本框c) 框架

d) 命令按钮

137)任何控件都具有的属性是__C_____。

a) TEX T b)CAPTION c) NAME

d) FORECOLOR

138)以下不具有Picture属性的对象是___D___。

a) 窗体b) 图片框c) 图像框

d) 文本框

139)若要使某命令按钮获得控制焦点，可使用的方

法是__B___。

a) lostf ocus b) setf ocus c) point

d) value

140)下列那些控件不可能包含其它控件__D____。

a) Picturebox b)Frame c) Toolbar

d) Image

141)下面四个选项，不是事件的是_B_____。

a) Click b) V isibale c) Unload

d) Change

142)决定控件上文字的字体、字形、大小及效果的

属性是_D_____。

a) TEX T b)CAPTION c) NAME

d) FONT

143)以下__B____控件不能触发Dbclick()事件。

a) Label b) Commandbutton c)

PictureBox d) Image

144)没有Caption属性的控件是__D___。

a) Label b) Command c) Frame

d) Textbox

145)一个可执行的vb运行程序至少包括一个

__B____。

a) 标准模块b)窗体模块c) 类模

块d)资源文件模块

146)对象是一个逻辑实体，它是_C_____的集合。

a) 数据b)代码c) 数据与代码

d) 属性

147)V isual Basic应用程序的运行模式是_C_____。

a) 解释运行模式b) 编译运行模式

c) 既有解释运行模式，又有编译运行模式

d) 汇编运行模式

148)下列数据类型不可能占8个字节的是_B____数

据类型。

a) Date b) Long c) Double

d) Currency

149)如果x是一个正实数，对x的第二位小数四舍

五入的表达式是__B___。

a) 0.1*Int(x+0.05) b)0.1*Int(10*(x+0.05))

c) 0.1*Int(100*(x+0.5))

d) 0.1*Int(x+0.5)

150)下列声明语句中存在变体变量的是__A____。

a) Dim a,b As Integer b)Dim a As String c) Static

a As Integer d) Public a As Currenency

151)表达式25.26 MOD 6.98的值是__C___。

a) 1 b) 5 c) 4 d) 提示错误

信息

152)下面的运算符中，优先级别最高的是_B____。

a) AND b) * c) 〉= d) &

153)已知变量A、B、C中C的值最小，则判断A、

B、C可否构成三角形的逻辑表达式是__B__。

a) A>=B AND B>=C AND C>0 b) A+C>B

AND B+C>A AND C>0

c) (A+B)>=C OR A-B<=C AND C>0 d)

A+B>C AND A-B<=C AND C>0

154)下面程序执行的结果是_C___。

Private Sub Form_Click()

A$="123":B$="456"

C=V al(A$)+V al(B$)

Print C\100

End Sub

a) 123 b) 3 c) 5 d) 579

155)以下哪个是合法的变量名__D_____。

a) Len b) Test@qw c) 6cost_1

d) count2s

156)表达式2+3*4^5-SIN(X+1)/2中最先进行的运算

是? C

a) 4^5 b) 3*4 c) x+1 d)

SIN

157)VB 6.0中，执行下面的四个语句时出现错误的

是__C___。

a) x=SGN(0) b) x=SQR(0) c)

x=LOG(0) d) x=SIN(0)

158)设A、B、C表示三角形的3条边，表示条件“任

意两边之和大于第三边”的布尔表达式可以用

___B_____表示。

a) A+B>=C Or A+C>=B Or B+C>=A b)

Not(A+B<=C Or A+C<=B Or B+C<=A)

c) A+B>C And A+C>B Or B+C>A d)

A+B>=C And A+C>=B Or B+C>=A

159)Datetime是Date类型的变量，以下赋值语句中

错误的是：_D______。

a) Datetime=#4/14/97# b) Datetime=#May

1,1997#

c) Datetime=#12:15:00AM# d) Datetime="8\8\99"

160)15.5\2的结果是_D____。

a) 1 b) 1.5 c) 7 d) 8 161)19.5 Mod 2*2的运算结果是_D____。

a) 3.5 b) 1 c) 3 d) 0 162)a=5,b=8,则int((b-a)*rnd+a)的结果是介于_A____之间的整数。

a) [5,8) b)(0,5) c) [3,5)d) (0,3]

163)要声明一个长度为256个字符的定长字符串变量str，以下语句正确的是_D______。

a) Dim str As String b) Dim str As String[256]

c) Dim str As String(256)

d) Dim str As String*256

164)下列选项中，合法的变量是__B____。

a) c%aaa b) sum_3 c) Else d) 5persons

165)在程序中使用日期型数据时，必须用符号_D___将日期型数据括起来。

a) @ b) $ c) % d) # 166)下列选项中，为字符串常量的是_B_____。

a) 6/12/2001 b) 6/12/2001 c) #6,12,2001# d) 6,12,2001#

167)下列表达式中，__C___的值为False。

a) BCD b) 12345<>12345 & ABC c) Not 2*5=10 d) 4=4 and 5>2+2

168)下列数据中哪一个是布尔常量_C______。

a) 123 b) not c) TRUE d) xyz

169)以下程序段的输出结果是_D_____。

A=Sqr(3)

b=Sqr(2)

c=a>b

Print c

a) -1 b) 0 c) False d) Ture 170)8.6787E+8写成普通的十进制数是__B_____。

a) 86787000 b)867870000 c) 8678700 d) 8678700000 171)假设变量BOOLV AR是一个布尔型变量，则下

面正确的赋值语句是D

a) BOOLV AR=…TRUE?b)BOOLV AR=.TRUEc)

BOOLV AR=#TRUE# d) BOOLV AR=3<4

172)将任意一个正的两数N的个位数与十位数对换

的表达式为?A

a) (N-INT(N/10)*10)*10+INT(N/10) b)

N-?INT(N/10)*10)*10+INT(N)/10?

c) INT(N/10)+(N-INT(N/10) d)

(N-?INT(N/10)*10)*10+INT(N/10)

173)表达式5\2*3的值__B___。

a) 7.5 b) 0 c) 1 d) 2

174)表达式Fix(-23.87)+int (24.56)的值为_C____。

a) -1 b) 0 c) 1 d) 2

175)下列运算结果中，值最大的是__D____。

a) 3\4 b) 3/4 c) 4 mod 3 d)

3 mod 4

176)在VB6.0中，12345678是下列类型中的

__B____。

a) 整数型b) 长整数型c)字符串

型d)日期型

177)表达式val(-17.8)+Abs(17.8)的值是__A____。

a) 0 b) 0.8 c) -0.2 d) -34.8

178)表达式Int(-17.8)+Sgn(17.8)的值是_B_____。

a) 18 b) -17 c) -18 d) -16

179)表达式2*3^2+2*8/4+3^2的值为_B____。

a) 64 b) 31 c) 49 d) 22

180)下列赋值语句正确的是__A_____。

a) Text1.text=Text.text+Text2.text? b)

https://www.wendangku.net/doc/1010179188.html,=https://www.wendangku.net/doc/1010179188.html,+https://www.wendangku.net/doc/1010179188.html,?

181)如果X是一个正的实数，将千分位四舍五入，

保留两位小数的表达式是B

a) 0.01*int(x+0.05)b)

0.01*int(100*(x+0.005))

182)Dim b1,b2 as boolean语句显式声明变量

__C___。

c) b1是变体型(可变型)，b2是布尔型d) b1

和b2都是变体型(可变型)

183)逻辑表达式Not"a">"b"And 9<3 Or 9>3的值为

__A____。

a) True b) False c) 表达式有错

d) 条件不足

184)Double类型的数据由_C____个字节组成。

a) 21 b) 4 c) 8 d) 16

185)如果A为一boolean型数据，则下列赋值语句

正确的是_D____。

a) A="true" b)A=.true c)

A=#TURE# d) A=3<4

186)若x是一个正实数，对x的第3位小数四舍五

入的表达式是__C___。

c) 0.01*Int(100*(x+0.005)) d)

0.01*Int(x+0.05)

187)下列逻辑运算结果为"true"的是__C______。

a) false or not true b)f alse and not true c)

true or not true d) true and not true

188)表达式25.28 Mod 6.99的值是_C___

a) 1 b) 5 c) 4 d) 出错

189)下面___D___不是V isualBasic的数据类型。

a) Single b) Object c) Integer

d) Boo1

190)表达式(7\3+1)*(18\5-1)的值是__C_____

a) 8.76 b) 7.8 c) 6 d) 6.67

191)Int(-5.1)的值是__B____。

a) -5 b) -6 c) 5 d) 4

192)设a=2,b=3,c=4,d=5,下列表达式a=b<>c=d的值

是__C____。

a) 1 b) Ture c) False d) -1

193)如果将布尔常量值True赋给一个整型变量，则

整型变量的值为____B__。

a) 0 b) -1 c) TRUE d)

FALSE

194)有如下程序：

For I=1 To 3

For j=5 To 1 Step-1

Print I+j

Next j,I

其循环执行的次数为_D_____。

a) 12 b) 13 c) 14 d) 15

195)下列程序段的执行结果为_A__。

X=5

y=-20

if not x>0 then

x=y-3

else

y=x+3

print x-y;y-x

end if end if

a) -3 3 b) 5 -8 c) 3 -3 d) 25

-25

196)以下程序段执行后整型变量n 的值为_B____。

N=0

f or I=1 to 20 step 5

n=n+1

next I

a) 3 b) 4 c) 5 d) 2

197)下列程序运行后，输出的结果为__A____。

B=1

Do while (b<40)

b=b*(b+1)

Loop

Print b

a) 42 b) 39 c) 6 d) 1 198)下列程序段的执行结果是_A____。

N=10

For k=n To 1 Step-1

x=Sqr(k)

x=x-2

Next k

Print x-2

a) -3 b) -1 c) 1 d) 1.16 199)下列程序运行后，变量s的值为__A____。

J=0:s=0

For I=1 To 4

j=j+I

s=s+j

Next I

a) 20 b) 10 c) 5 d) 15 200)以下程序输出的结果为__A____。

X=1

y=4

Do Until y>4

x=x*y

y=y+1

Loop

Print x

a) 4 b) 8 c) 12 d) 16 201)以下程序段的执行结果是__B___。

X=2:y=1

If x*y<1 Then

y=y-1

Else

y=-1

Print y-x>0

End If

a) Ture b) False c) -1 d) 1 202)下列循环语句将执行_D_____次。

A=100

Do

Print a

a=a+1

Loop until a<=10

a) 1 b) 10 c) 100 d) 死循环

203)下列程序执行后，变量s的值为___B___。

Dim s As long ,x As Integer

s=0:x=1

Do While (x<10)

s=s+x

x=x+2

Loop

Print s

a) 10 b) 25 c) 50 d) 100

204)当变量x=2,y=5时，以下程序的输出结果为

_C___。

Do until y>5

x=x*y

y=y+1

loop

print x

a) 2 b) 5 c) 10 d) 20

205)当执行以下程序时，在名为lblResult的标签框

内将显示___A__。

Private Sub cmdlt_click()

Dim I,R

R=0

For I=1 To 5 Step 1

R=R+I

Next I

lblResult.Caption=Str(R)

End Sub

End Sub

a) 字符串15 b)整数15 c) 字符

串5 d)整数5

206)如下有一段不完整的程序段，如果要求该程序

执行3次循环，则应在程序中的括号里输入

__A____。

X=1

do

x=x+3

print x

loop until(___)

a) x>=8 b) x<=8 c) x>=7 d)

x<=7

207)若整型变量a的值为2、b的值为3，则下列程

序段执行后整型变量c的值为_A_____。

If a>5 then

if b<4 then

c=a-b

else

c=b-a

End if

elseif b>3 then c=a*b

else

c=a mod b

End if

elseif b>3 then c=a*b

else

c=a mod b

End if

a) 2 b) -1 c) 1 d) 6

208)下列程序的运行后s的值是__C___。

S=0

For x=99 to 1 Step-2

s=s+x

Next x

Print s

a) 100 b)500 c) 2500 d)

5000

209)下列程序的执行结果是_A___。

K=0

For I=1 To 3

a=I^I^K

print a;

Next I

a) 1 1 1 b) 1 2 3 c) 0 0 0 d)

1 4 9

210)下列程序的执行结果为___C__。

Dim intsum As Integer

Dim I As Integer

intsum=0

For I=20.2 To 5 Step -4.7

intsum=intsum +I

Next I

Print intsum

a) 150 b) 200 c) 50 d) 0

211)下列程序的执行结果为__A___。

Dim S As Integer,n As Integer

S=0:n=1

Do While n<=100

S=S+n

n=n+1

Loop

Print S

a) 5050 b) 2500 c) 3000 d)

4000

212)要输出简单信息，可以使用_B____。

a) InputBox函数b) Msg Box函数c) ShowFont方法d) Show Printer方法

213)要使循环体至少执行一次，应使用_C____循环。

a) For-next b)While-wend c) Do--Loop while|until d) do[while|until]-loop

214)执行下列程序后，变量a的值为_C___。

Dim I as integer

dim a as integer

a=0

f or I=0 to 100 step 2

a=a+1

next I

a) 1 b) 10 c) 51 d) 100 215)下面程序执行后，X的结果为__C___。

X=0

For I =1 to 5

For j=I to 5

X=X+1

Next j

Next I

Print X

a) 5 b) 10 c) 15 d) 20 216)下列的程序段执行后，X的值为_B___。

X=0

f or I=1 to 10

f or j=I to 10

x=x+1

next j

next I

a) 50 b) 55 c) 100 d) 105 217)下面程序段的循环结构执行后，的输出值是_C____。

For I=1 to 10 step 2

y=y+I

Next I

print I;

a) 25 b) 10 c) 11 d) 因为Y的初值不知道，所以不确定

218)以下语句输出结果是(在立即窗口中)__C___。

A="Beijing"

b="ShangHai"

Print a;b

a) Beijing ShangHai b) Abeijing ShangHai c) BeijingShangHai d) Abeijing 219)有如下程序段，该程序执行后，变量a的值为

_C_____。

For I=1 To 2

For J=I To 2

For K=1 To J

a=a+2

Next K

Next J

Next I

a) 2 b) 8 c) 10 d) 20

220)执行下列程序后，X的值为__C____。

X=3

y=6

Do While y<=6

x=x*y

y=y+1

Loop

a) 3 b) 6 c) 18 d) 20

221)执行下列程序段后，整型变量c的值为_C__。

A=24

b=328

select case b\10

case 0

c=a*10+b

case 1 to 9

c=a*100+b

case 10 to 99

c=a*1000+b

end select

case 10 to 99

c=a*1000+b

end select

a) 537 b) 2427 c) 24328 d)

240328

222)执行完下面的程序段后，循环将执行_C___次。

For I=1.7 To 5.9 Step 0.9

a=a+1

Print a

Next I

a) 3 b) 4 c) 5 d) 6

223)有如下语句，执行后该段语句的循环次数是

_A____。

Dim s,I,j as integer

For I =1 to 3

For j=3 To 1 Step-1

S=I*j

Next j

Next I

a) 9 b) 10 c) 3 d) 4

224)有如下程序，该程序将__A____。

For I=1 to 10 step 0

K=k+2

Next I

a) 形成无限循环。b)循环体执行一此后

结束循环。

225)有如下程序段，该程序段执行完毕后，共循环

了___D_____。

For I=1 To 5

For j=1 To I

For k=j To 4

Print "a"

Next k

Next j

Next I

a) 4 b) 5 c) 38 d) 40

226)有如下程序，该程序的运行结果为__C____。

Dim k As Integer

n=5:m=1:k=1

Do While k<=n

m=m*2

k=k+1

Loop

Print m

a) 1 b) 5 c) 32 d) 40

227)以下程序输出1到1000之间所有的偶数之和，

请补充完该程序。

Private Sub Command_Click()

Dim x As Double

For I=0 To 1000

If _A___ Then

x=x+I

End If

Next I

Print x

End Sub

End Sub

a) i Mod 2 = 0 b)x Mod 2 = 0 c) I

Mod 2 <> 0 d) x Mod 2 <> 0

228)以下是计算10的阶乘的程序，请补充该程序。

Dim t as single

Dim k as Integer

k=0:t=1

While__A_____

k=k+1

t=t*k

Wend

Print t

a) k<10 b)k>10 c) k=10 d) k>=10

229)下列程序的执行结果为____A____。

Dim intsum As Integer

Dim I As Integer

intsum=0

For I=0 To 50 Step 10

intsum=intsum+I

Next I

Print intsum

a) 150 b) 200 c) 50 d) 0 230)下列命令按钮事件过程执行后，输出结果是__C___。

For m=1 to 1000 step 2

a=10

f or n=1 to 20 step 2

a=a+2

next n

next m

print a

a) 1200 b)1000 c) 30 d)

20

231)语句PRINT“SGN(-26)=”；SGN(-26)的输出结果为D

a) SGN(-26)=26 b) SGN(-26)=-26 c) SGN(-26)=+1 d) SGN(-26)=-1

232)在一个语句行内写多条语句时，语句之间应该用__D______分隔

a) 逗号b) 分号c) 顿号d) 冒号

233)Print方法不允许在_B___对象上输出数据。

a) 窗体b) 代码窗口c)立即窗口d) 图片框

234)Round(1.512)的值是__C____。

a) 1.5 b) 1.51 c) 2 d) 1.50 235)执行语句Print f ormat(5459.478,"#,##0.00")，正确的输出是__B____。

a) 5459.48 b) 5，459.48 c) 5，459，478 d) 5，459。47

236)下列是一个循环结构的程序，循环体内的语句将执行__D___次。

K=0

For I=1 to 10

For j=1 to 100

K=K+1

Next j

Next I

a) 0 b) 10 c) 100 d) 1000

237)下列程序的运行结果为__A______。

For I=1 to 3

d(I)=2*I-1

?d(I)

Next I

a) 1 3 5 b) 2 4 6 c) 1 4 6 d)

5 6 7

238)下列程序共执行了___D_____循环。

Dim intsum As Integer

Dim I As Integer

Dim j As Integer

For I=1 To 10 Step 2

For j=1 To 5 Step 2

intsum=intsum+j

Next j

Next I

a) 10 b) 20 c) 25 d) 15

239)下列程序段运行后，输出结果是_C___。

B=1

Do until b>7

b=b*(b+1)

Loop

Print b

a) 7 b) 39 c) 42 d) 1

240)下列程序段的执行结果为__B_____。

M=0

For I=1 To 3

For J =5 To 1 Step-1

N = N+1

Next J,I

Print N;J;I

a) 12 0 4 b) 15 0 4 c) 12 3 1

d) 15 3 1

241)下列程序段的执行结果为__C____。

K=0

For J=1 to 2

For I = 1 to 3

K =I+1

Next I

For I = 1 to 7

K = K+1

Next I

Next J

Print K

Next I

Next J

Print K

a) 10 b) 6 c) 11 d) 16

242)下列程序段的执行结果为__C____。

X=6

For K=1 To 10 Step -2

X=X+K

Next K

Print K;X

a) -1 6 b) -1 16 c) 1 6 d)

11 31

243)下列程序段的执行结果为__C____。

N=0:J=1

Do Until N>2

N=N+1

J=J+N*(N+1)

Loop

Print N;J

a) 0 1 b)3 7 c) 3 21 d) 3

13

244)下列输出语句中，错误的是_D_____。

a) ? X,y b)Print x,y c) Debug.Print

x,y d) Print.Form x,y

245)用InputBox函数可帮助生成__C_____。

a) 消息框b)“保存”对话框c) 简

单输入框d)“颜色”对话框

246)如果有数组声明Dim a(10) As Integer，则该数

组共有__B____个元素。

a) 10 b) 11 c) 9 d)不确定

247)表达式Right("Beijing",4)的值是_B_____。

a) Beijing b) jing c) eiji d)

ijin

248)删除字符串前导和尾随空格的函数是__C____。

a) Ltrim() b) Rtrim() c) Trim()

d) Lcase()

249)函数lef t("Hello", 2)的值为___A__。

a) He b) el c) lo d) true

250)设执行以下程序段时依次输入1、3、5，执行

结果为_A____。

Dim a(4) As Integer

Dim b(4) As Integer

For K =0 To 2

a(K+1) =V al(InputBox(“请输入数据："))

b(3-K) =a(K+1)

Next K

Print b(K)

a) 1 b) 3 c) 5 d) 0

251)用以下语句Dim b(-2 to 4)as string 所定义的数组的元素个数是_D_____个。

a) 2 b) 4 c) 6 d) 7

252)如果有声明Option base 1 dim arr(3,3),则该数组共有__B___个元素。

a) 16 b) 9 c) 4 d) 6

253)用于获得字符串S最左边4个字符的函数是：

__A_____。

a) Lef t(S,4) b) Lef t(1,4) c)

Lef tstr(S) d) Lef tstr(3,4)

254)用于获得字符串S从第4个字符开始的4个字

符的函数是___A___。a)

Mid(S,4,4) b) Middle(S,4,4) c)

Midstr(S,4,4)d) MiddleStr(S,4,4)

255)下列程序段的执行结果为__C___。

Dim M(10),N(10)

I=3

f or T=1 To 5

M(T)=T

N(I)=2*I+T

Next T

print N(I);M(I)

a) 3 11 b) 3 1 c) 11 3 d)

15 3

256)如果有声明Option base 1 dim array(15)，则该数

组共有__B___个元素。

a) 16 b) 15 c) 13 d) 14 257)如果有声明Dim a(5) As Integer，则该数组共占用___D___个字节内存。

a) 5 b) 6 c) 10 d) 12 258)数组的下标可取的变量类型是___C__。

a) 日期型b)字符型c) 数值型d)可变型

259)如果有声明Option base 1 dim arr(-8 to -2,4)，则

该数组共有____B_个元素。

a) 36 b) 28 c) 34 d) 35

260)表达式Abs(-5)+Len("ABCDE")的值是_C____

a)5ABCDE b) -5ABCDE c) 10

d) 0

261)如下数组声明语句，正确的是___B___。

a) dim a[3,4]as integer b) dim a(3,4)as string c) dim a(n,n) as single d ) dim a(3 4) as integer

262)设A=”abcdef ghijklm”，下面___A____的函数值为”jklm”。

a) Mid(A,10,4d b) Ringht(A,?5 c) Ringht(A,1,4)d) Lef t(A,10,4)

263)写列程序段的执行结果___C_。

A="abbacddcba"

f or I=6 to 2 step -2

x=mid(a,I,I)

y=lef t(a,I)

z=right(a,I)

z=x & y & z

next I

print Ucase(z)

print Ucase(z)

a) ABA b)AABAAB c) BBABBA

d) ABBABA

264)如有数组声明语句Dim a(2,-3 to 2,4)，则数组a

包含元素的个数是_D____。

a) 40 b) 75 c) 12 d) 90

265)下列程序的执行结果是__A___。

Dim a(5) As String

Dim b As Integer

Dim I As Integer

For I =0 To 5

a(I)=I+1

Print a(I);

Next I

a) 1 2 3 4 5 6 b) 6 c) 654321 d) 0

266)dim a(-3 to 3)所定义的数组元素个数是___B__。

a) 6 b) 7 c) 8 d) 9

267)数组Dim D(3, 1 To 10, 1 To 15)共有元素

___B_____。

a) 100 b) 600 c) 30 d) 450

268)表达式Lef t("how are you ",3)的值是____A_。

a) how b) are c) you d) ho

269)在V isual Basic程序设计中，过程名称的长度不

能超过___B____个字符。

a) 8 b) 40 c) 255 d) 11

270)以下过程不属于Sub过程的是___A__。

a) 编译过程b) Sub通用过程c) proper属性过

程d) Event事件过程

271)编写如下事件过程：

Private Sub Form_MouseDown(Button As

Integer ,Shif t As Integer,X As

Single,Y As Single)

If Shif t=6 And Button=2 Then

Print "Hello"

End If

End Sub

程序运行后，为了在窗体上输出"Hello"，应

在窗体上执行以下____D___操作。

a) 同时按下Shif t 键和鼠标左键b) 同时按下

Shif t 键和鼠标右键

c) 同时按下Ctrl、Alt 键和鼠标左键d) 同时按下

Ctrl、Alt 键和鼠标右键

272)下列叙述中，正确的是______B___。

A)控件数组的每一个成员的Caption属性值都必须

相同

b)控件数组的每一个成员的Index属性值

都必须不相同

c) 控件数组的每一个成员都执行不同的

事件过程

d)对已经建立的多个类型相同的控件，这

些控件不能组成控件数组

273)表达式x=Sqr(a^2-5)的类型是____A_____。

a) 算术表达式b)逻辑表达式c) 关

系表达式d)字符表达式

274)以下不属于V isual Basic系统的文件类型是C

a) .f rm b) .cls c) .bat d) .vbp

275)以下面__A___那种方式打开的文件，只能

读不能写。

a) Input b) Output c) Random d)

Append

276)要在C盘当前文件夹下建立一个名为Sd.dat的

顺序文件，应先使用__C___语句。a)Open

"Sd.dat" For Output As #1 b) Open "C：Sd.dat"

For Input As #1

c)pen "C：Sd.dat" For Output As #1

277)在V isual Basic中按文件的访问方式不同，可以

将文件分为_A______。

a) 顺序文件、随机文件和二进制文件

b)文本文件和数据文件

c) 数据文件和可执行文件

d) ASCII文件和二进制文件

278)双击窗体的任何地方，可以打开的窗口是_____A___

a) 代码窗口? b) 属性窗口

279)若要将窗体隐藏起来，则实现的方法为____D___。a) Unload b) Show c) WindowsState d) Hide

280)下列关于属性设置的叙述错误的是____A___ a) 一个控件具有什么属性是VB预先设计好的，用户不能改变

b)一个控件具有什么属性是VB预先设计好的，用户可以改变?

c) 一个控件的属性即可以在属性窗口中设置，也可以用程序代码设置?

d)一个控件的属性在属性窗口中设置，还可以利

用程序代码为其设置新值?

281)能显示窗体的方法是___B___。

a) V isible b) show d) open

282)使窗体自动向下移动的语句是Move____A_。

a) Top=Top+100 b) Top+100 c) Lef t=Top+100 d) Top=Top-100

284)以下可以构成语句的一项是_____B__。

a) 对象名.属性名b)对象名.方法名c)对象名.事件名d)对象名.函数名

285)以下关于复选框的说法，正确的是_____C__。

a) 一个窗体上的所有复选框一次只能有一个被选中

b)一个容器中的所有复选框一次只能有一个被选中

c) 在一个容器中的复选框可以同时有多个被选中

d)无论是在容器中还是在窗体中，都不可以同时选中多个复选框

286)我们在一个窗体上建立两个文本框，名称分别为Text1和Text2，事件过程如下，

Private Sub Text1_change( )

Text2.text=ucase(Text1.text)

End Sub

则在Text1文本框输入“visual basic”，Text2将____B__。

a) Text2中无内容显示。b) Text2显示"VISUAL BASIC"。

c) Text2显示"visual basic" d) Text1显示"visual basic"

287)ControlBox属性只适用于窗体，当窗体的

_A_____属性设置为0-None时，则ControlBox属性

不起作用。

a) Borderstyle b) Autoredraw c)

Windowstate

288)文本框控件中将Text的内容全部显示为所定义

的字符的属性项是_A______。

A)PasswordChar b)需要编程来实现

c) Password

289)下列对象中没有焦点属性的是_____B___。

A)命令按钮控件b) 窗口控件c) 文本框

控件d)单选框控件

290)设在窗体上有两个命令按钮，其中一个命令按

钮的名称为cmda，则另一个命令按钮的名称不能是

____A__

a) cmdc b) cmdb c) cmdA

d) Command1

291)若要使标签控件显示时，不覆盖其背景内容，

应设置标签控件的___D_____属性

a) BACKCOLOR b) BORDERSTYLE c)

FORECOLOR d) BACKSTYLE

292)下列事件中，命令按钮能响应的事件是__B___。

a) DblClick b) Click c) Scroll d) Load

293)引用列表框的最后一项应使用_____A___

a) List1.List(List1.ListCount-1) b)

List1.List(List1.ListCount)

c) List1.List(ListCount) d)

List1.List(ListCount-1)

294)下列语句中正确的是A

a) a=inputbox("hello") b)

https://www.wendangku.net/doc/1010179188.html,=cmdok

c) 12label.caption=1234 d)

txt1.text+txt2.text=txt3.tex

295)下拉式组合框的Style属性值为____A_。

a) 0 b) 1 c) 2 d) 3

296)下列各组控件都具有Caption属性的是

____C__。

a) 窗体、文本框b)标签、定时器c) 窗体、标

签d)文本框、定时器

297)控件内的对齐方式由__A___属性决定。

a) Alignment b) WordWrap c) AutoSize d)

Style

298)若要获得滚动条的当前值，可访问的属性是

__B____。

a) Text b) V alue c) Max d) Min

299)可以用作其它控件容器的控件有___C_____

a) 窗体控件，列表控件，图像控件b)窗体控

件，文本框控件，框架控件

c) 窗体控件，框架控件，图片框控件d) 窗体控

件，标签控件，图片控件

300)通常，文本框的Set f ocus方法不能使用在

__B____事件中。

a) Form_click b) Form_load c) Command_click

d) Label_click

301)使图形能自动按控件大小而改变的控件是

_____D_。

a) 标签框b)框架c) 图片框d)图像框

302)_C_____属性决定了按Tab键时焦点在各个控

件之间移动的顺序。

a) Index b) TabStop c) TabIndex

303)文件列表框中用于设置或返回所选文件的文件

名的属性是__D___。

a) File b) FilePath c) Path d) FileName

304)列表框中的列表项的数目可通过以下哪个属性

的值获得B_____。

a) Count b) Listcount c) Listindex d) Index

305)下列__D_____方法是将项目添加到List控件

中。

a) List b) ListCount c) Move d) AddItem

306)以下选项中，是V isual Basic控件的是__A___。

a) 文本框b) Print c) Click d) Debug

307)以下选项中，不属于单选按扭属性的是

_D_____。

a) Enabled b) Caption c) Name

308)要使标签中显示的文本靠右显示，则应将其

Alignment属性设置为__B_______

a) 0 b) 1 c) 2 d) 3

309)不能触发滚动条Change事件的操作是

____C___。

a) 拖动滚动块b) 单击两端箭头c) 单击滚动块

d) 单击箭头与滚动块之间的滚动条

310)当程序运行时，在窗体上单击鼠标，以下

_C______事件是窗体不会接收到的。

a) MouseDown b) MouseUp c) Load d) Click

311)单击滚动条两端的滚动箭头，将触发它的

___D__事件。

a) Scroll b) SmallChange or LangeChange c)

KeyDown d) Change

C_____。

a) Print 25 b) Picture1.Print 25 c) Text1.Print 25

d) Debug.Print 25

313)___D___对象不能响应Click事件。

a) 列表框b)图片框c) 窗体d)计时器

314)在拖动滚动条的滚动块的时候，在没有松开鼠标前会触发滚动条的____C__事件。

a) Change b) keyDown c) Scroll d) DragOver 315)滚动条单击边上的箭头按钮移动的大小由__B___设定。

a) Change b) SmallChange c) Scroll d) Tabstop 316)__C___控件可以使用SetFocus()方法。

a) Frame b) Label c) TextBox d) Timer

317)RGB函数通过红、绿、蓝三基色混合产生某种颜色，其语法为RGB(红、绿、蓝)，括号中红、绿、蓝三基色的成分使用0-255之间的整数。若使用3个滚动条分别输入3种基色，为保证输入数值有效，则应设置__A___属性。

a) Max和Min b) SmallChange和LargeChange c) Scroll和Change d) V alue

318)复选对象是否被选中，是由其_B____属性决定的。

a) Checked b) V alue c) Enabled d) Selected 319)以下不属控件的一项是___D__。

a) 文本框b)标签框c) 列表框d)消息框320)刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是_C____。

a) 单选按钮b) 图片框c) 通用对话框d) 文本框

321)要在图片框P1中打印字符串“How Are Y ou”，应使用语句____C____

a) Picture1.Print=“How Are Y ou” b) P1.Picture=LoadPicture(“How Are Y ou”)

c) P1.Print“How Are Y ou” d) Print “How Are Y ou”

322)通过文本框的_B_____属性可以获得当前插入点所在的位置。

a) Position b) SelStart c) SelLength d) Lef t

323)将字符串“hello”添加到列表框的最后，可使用___D____请语句。

a) List1.AddItem“hello”,List1.ListCount-1 b) List1.AddItem“hello”,List1.ListCount+1

c) List1.AddItem“hello”,List1.ListIndex d) List1.AddItem“hello”

324)要使一个标签透明且不具有边框，则应_____B____

a) 将其BackStyle属性设置为0，BorderStyle属性设置为0

b) 将其BackStyle属性设置为0，BorderStyle属性设置为1

c) 将其BackStyle属性设置为1，BorderStyle属性

设置为0

d) 将其BackStyle属性设置为1，BorderStyle属性

设置为1

325)为了在按下回车键时执行某个按钮的事件过

程，需要把该命令按钮的一个属性设置为True，这

个属性是___D_____

a) V alue b) Cancle c) Enable d) Def ault

326)可以通过_B____来删除列表框中的选择项。

a) Enable属性b) RemoveItem方法c) AddItem方

法d) Text属性

327)下列选项中，哪一项是所有控件共有的属性

___D____。

a) Caption b) V alue c) Text

328)要清除组合框Combol中的所有内容，可以使

用_B______语句

a) Combo1.ClS b) Combo1.Clear c)

Combo1.Delete????? d) Combo1.Remove?

329)要使一个文本框具有水平和垂直流动条，则应

先将其Muliline属性设值为True,然后再将Scrollbar

属性设值为___D__。

a) 0 b) 1 c) 2 d) 3

330)当复选框设置为图片风格时，下列_B______属

性可以在复选框被选中时显示图形。

a) DisabledPicture b) DownPicture c) Picture

d) Image

331)下列_B_____属性用于设置或返回文本框中的

文本。

a) Caption b) Text c) Name d) DragIcon

332)下列控件不能改变大小的有_____C__。

a) TextBox b) Label c) Timer d) PictureBox

333)以下_D____操作不能打开属性窗口。

a) 按下F4键

b) 单击工具栏的“属性窗口”按钮

c) 执行“视窗”菜单中的“属性窗口”命令d)

双击任何一个对象

334)以下不是VB中对象属性的一项是___A__。

a) Click b) Name c) Caption d) Top

335)在visual basic中，要将一个窗体从内存中释放，

应使用__D____语句。

a) show b) hide c) load d) unload

336)某顶级菜单项的热键字母为F，以下__C___操

作等同于单击该菜单项。

a) 同时按下Ctrl+F键b) 按下F键c) 同时按

下Alt+F键d)同时按下Shif t+F键

337)菜单控件仅支持以下_A_______事件。

a) Click b) MouseDown c) KeyPress d) Load

338)下列可以把当前目录下的C形文件picl.jpg装入

图片框Picture1中的语句为_C__。

a) Picture="pic1.jpg" b)

Picture.Handle="pic1.jpg"

c) Picture1.Picture=LoadPicture("pic1.jpg")

d) Picture:LoadPicture("pic1.jpg")

339)在使用菜单编辑器设计菜单时，必须输入的项

是_B___。

a) 标题b)名称c) 索引d)快捷键

340)用于将菜单项级别提升一级的按钮为

_____A___。

a) ←b)→c) ↑d)↓

341)使用CommonDialog控件的__D_______方法可

显示“打印”对话框。

a) ShowOpen b) Show Save c) ShowColor d)

ShowPrinter

342)不能作为容器的对象是__D___。

a) 窗体b)框架c) 图片框d)图像框

343)Int(-6.6)的返回值是____C_。

a) -5 b) -6 c) -7 d) 不确定

344)V isual Basic的文件管理控件是_A____。

a) 驱动器列表框、目录列表框、文件列表框b)

驱动器列表框、文件列表框、组合框

345)要获得当前驱动器应使用驱动器列表框的

___B___属性。

a) Path b) Drive c) Dir d)

Pattern

346)使用驱动器列表框的_B____属性可以返回或设

置磁盘驱动器的名称。

a) ChDrive b)Drive c) List

d) ListIndex

347)改变驱动器列表框的Drive属性值将激活

__A___事件。

a) Change b) Scroll c) KeyDown

d) KeyUp

348)目录列表框的path属性的作用是_____A_。

a) 显示目录列表框中打开的当前目录。

b) 显示当前驱动器或指定驱动器上的某目录下的

文件名。

349)V isual Basic主要用于___D___。

a) 图像处理b)文字处理c) 制作

视频文件d)开发Window s应用程序

350)工程文件的文件名后缀是什么_B______。

a) .bmp b) .vbp c) .f rm

d) .bas

351)控件的什么内容决定事件发生时的执行代码B。

a) 属性b) 事件过程c) 函数d) 通用过程

352)V isual Basic程序设计的一般步骤是___A_____。

a) 界面设计，属性设计，代码设计b) 代码设计，界面设计，属性设计

353)一个对象可以执行的动作和可被对象识别的动作分别称为_____B_____。

a) 事件、方法b)方法、事件c) 属性、方法

354)能够被对象识别和响应的动作称为_______D__。

a) 属性b) 方法c) 过程d) 事件

355)在设计阶段，当双击窗体上的某个控件时，所打开的窗口是___A______。

a) 代码窗口b)工具箱窗口c) 工程资源管理器窗口

356)以下哪种对象没有Caption属性_____B____。

a) Form b) TextBox c) CommandButton d) Label

357)下列选项中，哪一项是所有控件共有的属性____D_____。

a) Caption b) V alue c) Text d) Name

358)当按钮的哪一种属性设置为False时，该按钮为不可见。B

a) Enable b) V isible c) Def ault d) Cancel

359)保存新建工程时，默认的路径是_______B__。

a) Windows b) V B98 c) C:\ d) My Documents

360)下列变量名中合法的是___B______。

a) name b)6a c) a+b d) Print

361)下列数据中是Boolean常量的是哪一个C

a) yes b) not c) true

362)将数学表达式Sin2（a+b）+6e2写成V isual Basic 的表达式，其正确的形式是_____A____。

a) Sin（a+b）^2+6*Exp（2）b) Sin^2（a+b）+6*Exp（2）

363)表达式6+10 Mod 4*2+1的值是____B_____。

a) 11 b) 9 c) 8 d) 12 364)条件“x是在区间（60,80）之内”，用V isual Basic

表达式表示正确的是_C________。

a) 60 b) x>60 And <80 c) x>60 And

x<80 d) x>60 Or x<80

365)x="V isual Basic"，下面使y="Basic"的语句是

___B______。

a) y=Lef t（x,8,12) b) y=Mid（x,8,5）c)

y=Right（x,5,5）d) y=Lef t（x,8,5）

366)下面的运算符中，哪个是算术运算符。B

a) Imp b)Mod c)Eqv d)

Xor

367)以下关系表达式中,其值为False的是

__A_______。

a) XYZ>XyZ b) "stu"< >"student"

c) TEACHER=Ucase（Teacher）

368)产生[20，40]之间的随机整数的V isual Basic表

达式是___B______。

a) Int（Rnd*20）+20 b) Int（Rnd*21）+20 c)

Int（Rnd*20）+21 d) Int（Rnd*21）+21

369)如果x是一个正实数，对x的第二位小数四舍

五入的表达式是____B_____。

a) 0.1*Int（x+0.05）b) 0.1*Int（10*（x+0.05））

370)当文本框的____B_____属性为True时，Scroll

属性才有效。

a) V alue b) Multiline c) Index

d) Tabindex

371)当某一按钮的____A_____属性设置为False时，

该按钮不可用

a) Enable b) V isible c) Def ault

d) Cancel

372)通常，文本框的SetFocus方法不能使用在

___B______事件中。

a) Form_Click b) Form_Load c)

Command_Click d) Label_click

373)下列哪组语句可以将变量X、Y的值互换。C

a) X=Y：Y=X b) T=X：Y=X：X=T c)

T=Y：Y=X：X=T

374)当x=-5时，下列语句执行后y的值是多少?

Y=iif（x>0,x^2+1,x-1）C

a) 8 b) -9 c) -6 d) 26

375)“x是小于50的非负数”，用VB表达式表示正

确的是：C

a) 0<=x<50 b)0<=x<50 c) 0=〈x

And x〈50 d) 0<=x Or x<50

376)下列控件中不能改变大小的的有___C______。

a) TextBox b)Label c)Timer

d) PictureBox

377)若要取消窗体的最大化功能，则可设置

___C______属性为False来实现。

a) ControlBox b) MinButton c)

MaxButton d) Enabeld

378)若要以代码方式设置在文本框中显示文本的字

体大小，则可用文本框的____C_____属性来实现。

a) FontName b)Font c) FontSize

d) FontBold

379)若要将窗体隐藏起来，则实现的方法为

___D______。

a) Unload b) Show c)

WindowsState d) Hide

380)若要使标签透明，则可使用的属性是

__A_______。

a) BackColor b) BackStyle c)

BorderStyle d) ForeColor

381)若要使标签的大小自动适应所显示的文本，可

通过设置___A______属性的值来实现。

a) AutoSize b) Enabled c)

Alignment d) V isble

382)下列哪一个属性用于设置或返回文本框中的文

本。B

a) Caption b)Text c) （名称）

d) Name

383)若要暂时关闭定时器，则可通过设置

____C_____属性来实现。

a) Interval b) V isible c) Enabled

d) Timer

384)当复选框设置为图片风格时，下列____C_____

属性可以在复选框被选中时显示图形。

a) DisabledPicture b) DownPicture

c) Picture d) Image

385)若要在列表框中显示多列数据，可用列表框的

___C_____属性来实现。

a) MultiSelect b) Index c) Columns

d) List

386)复选框控件其V alue属性的可取值是

______D___。

a) Trut和False b) 1、2、3 c) 0和1

d) 0、1、2

387)所有控件都有的属性是_____D____，在程序中

作为对象的标识引用。

a) Caption b) V alue c) Text

d) name

388)如果有声明Dim a（15）As Integer，则该数组

共有_____B____个元素。

a) 15 b) 16 c) 17 d) 不确定

389)一个数组说明为Dim a（5，1 to 5）As Integer，则该数组共有____C_____个元素。

a) 36 b) 25 c) 30 d) 不确定

390)一个数组说明为Dim a(3 to 6，-2 to 2)As Integer，则该数组共有____A_____个元素。

a) 20 b) 12 c) 24 d) 30 391)如果使用语句Dim a（3，5）As Integer，下列下标变量中不允许使用的是__D______。

a) a（1，1）b)a（1，2*2）c) a （3，1.4）d) a（-1，3）

392)以下关于数组的描述正确的是____B_____。

a) 数组的大小是固定的，但可以有不同类型的数组元素

b)数组的大小是可变的，但所有数组元素的类型必须相同

393)赋给一个数组的数据的值的类型一定要____A_____。

a) 相同b)不相同c) 两可d) 都不对

394)如果有声明Dim a（6）As Integer，则该数组共占用___D______个字节内存。

a) 5 b) 6 c) 10 d) 14 395)可变数组的各个下标变量的数据类型____A_____。

a) 相同b)不相同c) 两可d) 都不对

396)数组的下标可取的变量类型是_____A____。a) 数值型b) 字符型c) 日期型d) 可变型

397)窗体模块所对应文件的扩展名是___C______。

a) bas b) cls c) f rm d) bmp

398)过程名的长度不能超过多少个字符。C

a) 256 b) 128 c) 40 d) 64 399)声明全局变量的位置是______B___

a) 函数过程b) 标准模块通用声明段c)事件过程d)窗体模块通用声明段

400)设有如下通过Sub语句定义的Examsub过程：Sub Examsub（x As

Integer),则调用该过程正确的语句是______C___。

a) s=Examsub（16000）b) Print Examsub （16000）c) Call Examsub 16000

401)一个工程中含有窗体Form1、Form2和标准模

块Model1，如果在Form1中有语句Pubilc X As

Integer，在Model1中有语句Pubilc Y As Integer，则

叙述正确的是_C_。

c) 在Form1中可以直接使用X d) 在

Form2中可以直接使用X和Y

402)以下关于变量作用域的叙述中，正确的是

______B___

a) 窗体中凡被声明为Private的变量只能在某个指

定的过程中使用

b) 全局变量必须在标准模块中声明

403)以下关于函数过程的叙述中，正确的是

______A___。

a) 函数过程形参的类型与函数返回值的类型没有

关系

b) 在函数过程中，过程的返回值可以有多个

404)以下有关过程的说法中错误的是_____C____。

a) 在Sub或Function过程中不能再定义其

他Sub或Function过程

b)在调用过程时，与使用ByRef说明的形

参对应的实参只能按地址传递方式结合

c) 递归过程既可以是递归Function过程，

也可以是递归Sub过程

d)在调用过程时，以形参为数组的参数对

应的实参只能是数组

405)以下关于过程和过程参数的描述中错误的是

_____B____。

a) Sub过程中可以嵌套调用Sub过程b)Sub

过程中不能嵌套定义Sub过程c) 事件过程可以由

用户定义过程名d) 用数组作为过程的参数时，使

用的是“地址传递”方式

406)下列不能打开菜单编辑器的操作是

__C_______。

a) 按Ctrl+E b) alt+M c) 按Shif t +

Alt + M d) shit+M

407)假定有一个菜单项，名为MenuItem，为了在运

行时使该菜单项失效（变灰），应使用的语句为

_A________。

a) MenuItem. Enabled=False b)MenuItem.

Enabled=True

408)以下关于菜单的叙述中错误的是____B_____。

a) 在程序运行过程中可以增加或减少菜单项

b) 如果把一个菜单项的Enabled属性设置为False，

则可删除该菜单项

409)以下关于菜单的叙述中正确的是__B_______。

a) 只有当代码窗口为当前活动窗口时，才能打开菜

单编辑器

b) 只有当某个窗体为当前活动窗体时，才能打开菜

单编辑器

410)在程序运行时创建的菜单控件，若要将其删除

需使用的命令是____D_____。

a) Delete b) Exit c) End d)

Unload

411)以下关于文件系统处理的叙述正确的是

_B________。

a) Open命令的作用是打开一个已经存在的文件

b) V isual Basic提供了对顺序文件、随机文件、二进

制文件的访问方法

412)V isual Basic的文件管理控件是___A______。

a) 驱动器列表框、目录列表框、文件列表框b) 驱

动器列表框、文件列表框、组合框

413)以下面那种方式打开的文件，只能读不能写

____A_____

a) input b)Output c) Random

d) Append

414)读随机文件中的记录信息，应使用下面哪个语

句__B_______。

a) Read b)get c) input # d)

line input #

415)下面哪个不是写文件语句__D_______。

a) Put b) Print# c) Write#

d) DrawWidth属性

416)下面哪种不是V isual Basic提供的文件访问模

式___B______

a) 顺序访问b)动态访问c) 随机

访问d)二进制访问

417)以下关于文件的叙述正确的是__B_______。

a) 随机文件中每个记录的长度是固定的

b) LOF函数用于测试文件指针是否位于文件的末

尾

418)语句CommonDialog1.Action=1，代表显示

___B______。

a) 另存为对话框b) 打开对话框

c) 颜色对话框d) "打印"对话框

419)对语句Open＂Text.Dot＂For Output As #1功能

说明中错误的是___C______。

b) 如果文件＂Text.Dot＂不存在，则建立一个新文

件

c) 如果文件＂Text.Dot＂已存在，则打开该文件新

写入的数据将添加到该文件末尾

420)File1.Pattern = "*.bat"执行后，文件列表框显示

的文件是__A_______。

a) 只包含扩展名为.bat的文件b) 第一个.bat文件

421)设x=“V isual Basic”，下面使y=“Basic”的语句是 B

a) y=Lef t(x,8,12) b) y=Mid(x,8,5)c) y=Right(x,5,5) d) y=Lef t(x,8,5)

422)语句“Circle（1000，1000），500”将绘制的图形是___A______。

a) 圆b)圆弧c) 椭圆d)扇形

423)在V isual Basic中坐标轴的默认缺省刻度单位是缇，用户可以根据实际需要使用哪个属性改变刻度单位_____A____。

a) ScaleMode属性b) Scale属性c) DrawStyle属性d) DrawWidth属性

424)下面的属性和方法中，哪个可以重新定义容器对象的坐标系统___B______。

a) ScaleMode属性b) Scale方法c) DrawStyle属性d) DrawWidth属性

425)Point（x,y）的含义是___A______。

a) 画点b) 画线c) 返回指定处的颜色代码d)绘制一个圆

426)通过设置Shape控件的哪个属性可以绘制多种形状的图形____A_____。

a) Shape b) BorderStyle c) FillStyle d) Style

427) Form1.FillColor=vbBlue Form1.FillStyle=0 Line（100,100）-（500,500）,vbRed,B 的功能是___D______。

c) 在窗体上绘制一个边框为蓝色、填充色为红色的矩形

d) 在窗体上绘制一个边框为红色、填充色为蓝色的矩形

428)如果用长整数&H00FF0000&来表示颜色，它表示的颜色是_C________。

a) 红色b) 黄色c) 蓝色d) 绿色

429)某一VB工程含F1、F2两个窗体，执行“F1．Show:F2．Hide”语句后，F1、F2窗体显示的结果为___C_____。

a) 都显示b) 都不显示c)仅显示F1窗体d)仅显示F2窗体

430)在VB中，执行“Text1.Text=“0551-*******”Rem Tel=0551-*******这行语句时，Rem后面的部分为___A______。a) 注释部分，不是可执行代码b)注释部

分，但是可以执行代码

431)在VB中，执行“A=5：A=A+5”语句后，变

量A的值为___C______。

a) 5 b) 10 c) 15 d) 不一

定

432)在VB中，复选框（Check）的V alue值有三种，

分别是__B_______。

a) -1，0，1 b) 0，1，2 c) 1，2，3

d) True，False，0

433)变量L的值为－8，则－L^2的值为

____B_____。

a) 64 b) -64 c) 36 d) 不确

定

434)下面说法不正确的是______B___。

a) 变量名的长度不能超过255个字符

b) 变量名可以包含小数点或者内嵌的类型声明字

符

435)在计时器控件中，Interval属性的作用是

__C_______。

a) 决定是否响应用户的操作b) 存储程序

所需要的附加数据

c) 设置计时器事件之间的间隔d) 设置

计时器顶端和其容器之间的距离

436)使用语句Dim A(2) As Integer 声明数组A之

后，以下说法正确的是____A_____。

a) A数组中的所有元素都为0 b) A数组中

的所有元素值不确定

437)以下不属于V isual Basic系统的文件类型是

__B_______。

a) .frm b) .bat c) .vbg

d) .vbp

438).以下声明语句中错误的是___C______。

a) Const var1=123 b) Dim var2 = 'ABC' c)

Def Int a-z d) Static var3 As Integer

439)设a=10，b=5，c=1，执行语句Print a = b = c后，

窗体上显示的是___B______。

a) true b) f alse c) 1 d) 出

错信息

440)设组合框Combo1中有3个项目，则以下能删

除最后一项的语句是___B______。

a) Combo1.RemoveItem Text b)

Combo1.RemoveItem 2

441)程序运行后，在窗体上单击鼠标，此时窗体不

会接收到的事件是___C______。

a) MouseDown b) MouseUp c)

Load d) Click

442)设窗体上有一个列表框控件List1，且其中含有

若干列表项。则以下能表示当前被选中的列表项内

容的是_____D____。

a) List1.List b)List1.ListIndex c)

List1.Index d) List1. Text

443)以下程序的运行结果是__A____。

Private Sub f orm_click()

Dim a(10) as integer

For i=1 to 10

a(i)=i

Next

Print a(0)

End Sub

a) 0 b) 1 c) 2 d) 10

444)以下叙述中错误的是___A______。

a) 在工程资源管理器窗口中只能包含一个工程文

件及属于该工程的其他文件

b) 以.BA S为扩展名的文件是标准模块文件

445).要设置按钮的背景颜色，什么操作是必须的

_____A____。

a) 设置按钮的style属性为picture b) 设置

按钮的picture属性为某个bmp图片

446).使窗体能够完成重画，需设置___A____属性为

真

a) AutoRedraw b)AutoSize c)

AutoCenter d) AutoPaint

447)有一个菜单项的Caption是"Open"。若要为该菜

单命令设计访问键，即按下Alt及字母O时，能够

执行"Open"命令，则在菜单编辑器中设置"Open"命

令的方式是__A____。

a) 把Caption属性设置为&Open b) 把

Caption属性设置为O&pen

448)设x=4,y=8,z=7，表达式xz) Or

z

a) true b) f c) t d) f alse

449)表达式Max(3,1,2) 的值是___A______。

a) 3 b) 1 c) 2 d) 0

450)下面四个选项，不是属性的是___D______。

a) name b) Enabled c) Caption

d) Load

451)窗体文件的扩展名是___A______。

a) .frm b) .vbp c) .f rx

d) .bas

452)假定标签的名称(Name属性)为Label1，则把标

签的标题设置为“VB测验”的语句为___B______。

a) Label1 = "VB测验" b) Label1.Caption ="VB测验"

453)文本框(TextBox)没有____B_____属性

a) text b) Caption c) f ont d) Name

454)在VB6.0中的每一个对象都具有自己的___C______、事件和方法

a) 控件b) 函数c) 属性d) 公用过程

455)退出Do循环可使用的语句为___C______

a) Exit For b) End For c) Exit Do d) End Do

456)MsgBox函数的返回值的类型为___A______。

a) 数值型b) 变体类型c)字符串型d)日期型

457)属性BackColor的作用是____B_____。

a) 设置控件边界线的颜色b) 设置控件的背景色

458)一条语句分成多行书写时，要用某个符号续行。这个符号是___C______。

a) , b) ; c) _ d) :

459)如果要在菜单中添加一个分隔线，则应将其Caption属性设置为___D______。

a) = b) * c) & d) -

460)要使一个标签控件在运行时不可见，应该改变其____C_____属性。

a) Caption b)Enabled c) V isible d) Alignment

461)以下允许用户在程序运行时输入文字的控件是__A_______。

a) 文本框b) 标签c) 单选按钮d) 框架

462)在V isual Basic中，要使标签的标题栏靠右显示，则将其Alignment属性设置为____B_____。a) 2 b) 1 c) 3 d) 0

463)保存VB的一个工程至少应保存两个文件，这两个文件分别是( A )

a) 窗体文件和工程文件b) 文本文件和工程文件

464)为了使图像框与图片框的大小适应图片的大小，下边属性组设置正确的是( B )

a) Autosize= Ture Stretch= True b) Autosize= Ture Stretch= False

465)假设有以下程序段：

For I=1 to 3

For j=5 to 1 Step -1

Print I*j

Next j

Next I

则语句Print I*j的执行次数、循环结束后I、

j的值分别是(A)

a) 15 4 0 b) 16 3 1 c) 17 4 0

d) 18 3 1

461)以下允许用户在程序运行时输入文字的控件是

___A______。

a) 文本框b) 标签c) 单选按钮

d) 框架

462)在V isual Basic中，要使标签的标题栏靠右显

示，则将其Alignment属性设置为____B_____。

a) 2 b) 1 c) 3 d) 0

463)保存VB的一个工程至少应保存两个文件，这

两个文件分别是(A)

a) 窗体文件和工程文件b) 文本文件和工

程文件

464)为了使图像框与图片框的大小适应图片的大

小，下边属性组设置正确的是( B )

a) Autosize= Ture Stretch= True b) Autosize=

Ture Stretch= False

465)假设有以下程序段：

For I=1 to 3

For j=5 to 1 Step -1

Print I*j

Next j

Next I

则语句Print I*j的执行次数、循环结束后I、

j的值分别是( A )

a) 15 4 0 b) 16 3 1 c) 17 4 0

d) 18 3 1

466)下面说法不正确的是( D )

a) 滚动条的重要事件是Change和Scroll

b)框架的主要作用是将控件进行分组，以

完成各自相对独立的功能

c) 组合框是组合了文本框和列表框的特

性而形成的一种控件

d)计时器控件可以通过对V isible属性的

设置，在程序运行期间显示在窗体上

467)在下列关于菜单的说法中，错误的是( C )

a) 每一个菜单项都是一个控件，与其他控

件一样都有自己的属性和事件

b)除了Click事件之外，菜单项还能响应

其他的如DblClick等事件过程

c) 菜单项的快捷键不可以任意设置

d)在程序执行时，如果菜单项的Enabled

属性为False，则该菜单项变成灰色，不能被用户选

择

468)为了使命令按钮（名称为Command1）右移200，

应使用的语句是( C )

c) Command1.Lef t = Command1.Lef t + 200

d) Command1.Lef t = Command1.Lef t - 200

469)程序代码如下，则第八次单击命令按钮

Command1，程序的显示结果是（A）

Private Sub Command1_Click()

Static i As Integer

Dim n As Double

i = i + 1

If i = 1 Then n = 1

n = n * i

Print i & "!=" & n

End Sub

a) 8!=0 b) 8!= 40320 c) 1!=0

d) 1!=40320

470)f act函数的定义如下，则f act(7)等于( C)

Private Function f act(x As Integer) As Integer

If x = 3 Then

f act = 1

Else

f act = x + f act(x - 1)

End If

End Function

a) 21 b) 22 c) 23 d) 28

471)程序代码如下，则表达式i=i+1执行的次数是

（B ）。

For i = 1 To 10

For j = 1 To i

i = i + 1

Next j

Next i

Print i, j

a) 9 b) 11 c) 55 d) 100

472)执行下面的程序段后，X的值为（ C ）。

X=5

For i=1 to 11 Step 2

X=X+15

Next i

a) 80 b) 85 c) 95 d) 170

473)以下变量名中合法的是_C____。

a) x2-1 b)Print c) Str_n d)

2x

474)把数学表达式(5x+13)/(12y-6)表示为正确的VB 表达式应该是_D____。

a) (5x+13)/(12y-6) b) x*5+13/12*y-6 c) (5*x+13) d) (x*5+13)/(y*12-6)

475)下面有关标准模块的叙述中，错误的是_A___。

a) 标准模块不完全由代码组成，还可以有窗体。

b) 标准模块中的Private过程中不能被工程中的其他模块调用。

476)下面控件中，没有Caption 属性的是_C___。

a) 窗体b)标签c) 组合框d) 按钮

477)用来设置文字字体是否斜体的属性是_D____。

a) FonUnderline b) FontBold c) Fontslope d) FontItalic

478)用来设置文字字体是否加粗的属性是__B___。

a) FonUnderline b)FontBold c) Fontslope d) FontItalic

479)用来设置文字字体是否加下划线的属性是__A___。

a) FonUnderline b) FontBold c) Fontslope d) FontItalic

480)用来设置文字字体是否加删除线的属性是__D___。

a) FonUnderline b) FontBold c) Fontslope d) Fontstrikethru

481)可以产生30-50(含30和50)之间的随机整数的表达式是__A___。

a) Int (Rnd*21+30)b)Int(Rnd*20+30) c) Int(Rnd*50-Rnd*30) d) Int(Rnd*20+50)

482)在For循环结构中，要计算循环次数，可通过_C__计算。

a) Int((终值-初值)/步长) b) Int(终值-初值)+1 c) Int((终值-初值）/步长+1)

483)变量a的值为-8，则-a^2的值为_B___。

a) 64 b) -64 c) 16 d) -16 484)使用语句Dim a(29)As Integer 声明数组a之后，以下说法正确的是_A___。

a) a数组中的所有元素都为0 b) a数组中的所有元素值不确定

485)函数Int(Rnd()*90)+10的整数范围是_B_____。

a) [0,100) b) [10,100) c) (1,100) d) (10,90)

486)VB中有3个键盘事件：KeyPress、KeyDown、KeyUp，若光标在Text1文本框中，则每输入一个字母A

a) 这3个事件都会触发b) 只触发KeyPress事件

487)下面的运算符中，优先级最低的是___D__。

a) mod b) * c) > d) or

488)结构化程序设计中的基本结构有_C____种。

a) 1 b) 2 c) 3 d) 4

489)在窗体模块的通用声明段中输入Option Base

3，数组的下界为_D____。

a) 1 b) 2 c) 3 d) 出现编译

错误

490)要设置代码窗口字体的大小，可通过___D___

菜单进行设置。

a) 编辑b) 视图c) 格式

d) 工具

491)当文本框的Multiline属性为True时，_C____

属性才有效。

a) V alue b)Caption c) Scroll

d) Interval

492)以Input方式打开文件时，若文件不存在，则

_C_____。

a) 自动建立b)自动建立并读取

c) 产生错误，无法读取

493)设置文本框字体大小的属性是_B___。

a) Fontbold b) Fontsize c) Fontitalic

d) Fontstrikethru

494)V isual Basic程序设计的一般步骤是_A____。

a) 界面设计，属性设计，代码设计b) 代

码设计，界面设计，属性设计

495)控件___B___内容决定事件发生时的执行代码。

a) 属性b) 事件过程c) 函数

d) 通用过程

496)在语句Label1.Caption="欢迎"被执行之前，标

签控件Label1的Caption属性为默认值，则该语句

被执行后，标签控件的名称属性和Caption属性的

值分别为__B_____。

a) “Label”,“欢迎”b) “Label1”,“欢

迎”c) “Label”,“Label1”

497)在设计阶段，当双击窗体上的某个控件时，所

打开的窗口是__A____。

a) 代码窗口b)工具箱窗口c) 工

程资源管理器窗口d)属性窗口

498)当按钮的_A____属性设置为False时，该按钮

为不可见。

a) V isible b) Enable c) Def ault

d) Cancel

499)V isual Basic提供的程序运行方式有两种，一个

是__B___，一个是编译

a) 汇编b) 解释c) 打包

d) 连接

500)Len("计算机网络")的返回值为__D____。

a) 2 b) 3 c) 4 d) 5

Ⅱ判断对错

1)在V isual Basic程序设计中,TextBox对象没有

Caption属性。对

2)保存新建工程时，默认的路径是c:\Windows。错

3)当按钮的Enable属性设置为False时，该按钮为

不可见。错

4)在Select case结构中应至少包含一个子句。对

5)启动VB6.0时，VB6.0默认的工程类型是标准

EXE程序。对

6)当对窗体中的对象进行单击操作时，V isual Basic

就会显示该对象的代码窗口。错

7)V isual Basic的对象是窗体和控件的总称。对

8)用窗体的Caption属性可以设置窗体的标题。对

9)建立控件时系统自动给控件一个名称，第一个建

立的命令按钮名称是Command。错

10)标签框有Text属性。错

11)文本框没有Caption属性。对

12)V isual Basic 提供了列表框控件，当列表框中的

项目较多、超过了列表框的长度时，系统会自动在

列表框边上加一个滚动条。对

13)用面向对象的编程思想观点来看，一只黑色的台

球被打进袋内，则台球是对象、黑色是方法。错

14)单击滚动条的滚动箭头时，产生的事件是

Change。对

15)图片框的默认属性为Caption。错

16)在V isual Basic设计界面中,工程窗口是不能隐

藏的窗口。对

17)对象名.函数名可以构成语句。错

18)事件驱动不是V isual Basic的特点。错

19)事件是V isual Basic预先定义的对象能识别的动

作。对

20)属性是指对象的名字、大小、位置和颜色等特性。

对

21)在V isual Basic中通过FontColor属性来设置字

体颜色。错

22)窗体的Name与其Caption属性相同。错

23)方法是由V isual Basic提供的一种专门的子程

序，由对象本身所具有，反映该对象功能的内部函

数或过程。对

24)对象可以识别和响应的某些行为称为事件.对

25)Double类型的数据由 4 个字节组成。错

26)整型数的取值范围为–32768～+32768 。错

27)3abc为合法变量。错

28)过程级变量是指那些在过程中用Dim语句或Static语句声明的变量。对

29)过程级变量的作用域仅限于声明它的过程。对

30)静态局部变量是在过程中用Static语句声明的。对

26)整型数的取值范围为–32768～+32768 。错31)用Static声明的过程级变量在它声明的过程执行完毕后就被释放了。错

32)逻辑表达式Not"a">"b" And 9<3 Or 9>3的值为true 。对

33)为使文本框显示滚动条，必须首先设置ScrollBars属性。错

34)Index 属性决定了按Tab键时焦点在各个控件之间移动的顺序。错

35)改变控件在窗体中的上下位置应修改控件的Width 属性。错

36)将命令按钮Command1设置为不可见，应修改该命令按钮的Enabled 属性。错

37)要改变Label控件中文字的颜色，可以设置Label 控件的ForeColor属性。对

38)复选框对象是否被选中，是由其V alue属性决定的。对

39)将定时器的时间间隔设置为1秒，那么定时器的Interval属性值应设为1。错

40)计时器对象不能响应Click事件。对

41)框架由于是一种辅助性的控件，功能较单一，属性较少所以有name属性,没有caption属性。错42)选择框架中的多个控件，按下Shif t键点击各控件或按下Ctrl键的同时用鼠标拖拉框架内的控件。对

43)复选框的功能是独立的，如果一个窗体上有多个复选框，用户可根据需要选择一个或几个。对

44)复选框的value有2个值，即0或1。错

45)列表框(ListBox)用于返回列表框中所有选项的个数,其属性listcount只能在程序代码中调用和设置。对

46)列表框的listindex返回当前选项的索引号，索引号从0开始。如果没有选项被选中，该属性为1。错

47)列表框List属性可以得到列表中任何选项的值，它以数组的方式存在。对

48)列表框Columns属性可以用来设置列表框多列显示。对

49)组合框的属性style=0表示下拉式组合框。对50)简单组合框，它由一个文本框和一个标准列表框

组成，列表框是下拉式的。错

51)图片框和图像框的主要区别是：image除了可以

显示图形之外，还可以作为其它控件的容器。错

52)LoadPicture（）函数用于在程序的代码中对窗体、

图片框或图像框的Picture属性赋值，以便在程序的

运行阶段加载图形文件。对

53)图像框的功能较单一，可以用于显示动态图像。

错

54)计时器（Timer）的Interval属性的默认单位为毫

秒。对

55)计时器（Timer）的Interval属性的取值范围

0-65535。对

56)计时器（Timer）的Interval属性的取值为0时表

示计时器触发次数最多。错

57)计时器不只有Timer事件，interval也是计时器的

事件。错

58)滚动条通常用于浏览显示内容、确定位置，也可

以作为数据输入的工具。通过编程控制，可以为不

具备滚动能力的控件提供滚动功能。对

59)滚动条在常用工具栏是一个控件。错

60)当滚动条位于最右端或顶端时，表示其值最大，

反之为最小。错

61)滚动条上，当单击滚动箭头、单击滚动条区域或

拖动滑动块结束时将触发Change事件。对

62)当在滚动条内拖动滑动块时只触发Scroll事件。

错

63)控件中不能改变大小的只有timer。错

64)若要使标签透明，则可使用属性BackColor。错

65)滚动条的最小值、最大值、最小变动值、最大变

动值属性均可自行设计。对

66)滚动条所处的位置可由V alue属性标识。对

67)可以用剪切+复制的方法将已有控件放入框架

中。对

68)框架内所有的控件会随框架一起移动、显示、消

失和屏蔽。对

69)在一个语句行内写多条语句时，语句之间应该用

逗号分隔。错

70)在语句Label1.caption="欢迎"被执行之前，标签

控件Label1的Caption属性为默认值，则该语句被

执行后，标签控件Label1的Name属性和Caption

属性的值分别为：“label”、“欢迎”。错

71)在visual basic中，要将一个窗体从内存中释放，

应使用load语句。错

72)在V isual Basic中按文件的访问方式不同，可以

将文件分为数据文件和可执行文件。错73)在V isual

Basic 中，要使一个窗体不可见，但不从内存释放，

应使用UnLoad语句。错

74)要想改变一个窗体的标题内容，则应该设置

Name属性的值。错

75)要使窗体Form1的标题栏中显示“正在复制文

件…”，应在代码中输入：Form1.Text="正在复制文

件…”。错

76)要使文本框在程序运行时不能由用户直接输入

数据，应设置文本框的V isible属性设置为False。

错

77)要禁用计时器控件、需要将V isible属性设置为

false。错

78)要获得文件列表框中当前被选中的文件的文件

名，则应使用Filename。对

79)要获得当前驱动器应使用驱动器列表框的Dir属

性。错

80)使用a=b:b=a 语句可以将变量A和B的值互换。

错

81)将当前窗体中显示的文字及绘制的图形全部清

除，可以用方法me.cls。对

82)控件的事件过程内容决定事件发生时的执行代

码。对

83)通常，文本框的Setf ocus方法不能使用在

Form_load事件中。对

84)程序f or i=1 to 10 step 0 print "abc" next 循环次

数为无数次。对

85)程序do print "abc" loop 循环次数为无数次。对

86)计时器控件只有一个timer事件过程。对

87)Form_Dblclick()是鼠标双击事件过程。对

88)Text1_Keypress()是键盘按下并抬起事件过程。对

89)VB程序代码的基本结构有三种，分别是顺序结

构、选择结构、循环结构，理论上这三种结构可以

解决一切问题。对

90)Chr(65)函数返回值为字母"C"。错

91)case是合法的变量命名。错

92)函数ASC("A")返回值为65。对

93)InStr("abc","ab")的返回值为1。对

94)当文本框的Multiline属性为True时，文本内容

可以多行显示。对

95)滚动条控件可作为用户输入数据的一种方法。对

96)文本框控件可作为用户输入数据的一种方法。对

97)立即窗口是V isual Basic集成开发环境提供的辅

助工具，通过Debug对象的Debug.print把结果输出

到立即窗口。对

98)单精度型数据用来表示带小数的实数，在计算机

中占用4个字节（32位）存储空间。对

99)单精度型数据用来表示带小数的实数，其有效位最多可以有7位有效数字。对

100)双精度型数据用来表示带小数的实数，其有效位最多可以有15位有效数字。对

Ⅲ填空

1)假定当前日期为2002年7月12日，星期六，则执行语句Print day(now)后，输出结果是___12___（提示：不能出现符号#）。

2)语句a%=3.14156:Print a%的输出结果是____3__。

3)以下循环的执行次数是__11___。

K=0

Do While k<=10

k=k+1

Loop

4)Fix(5.8)的值是___5____。

5)下列程序段的执行后输出的结果为__ A=11___。

I=4:A=5

Do

I=I+1:A=A+2

Loop Until I>=7

Print "A=";A

6)表达式3/6*5的值是___2.5____。

7)下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。

If a

d=a:a=b:b=d

EndIf

If a

d=a:a=c:c=d

EndIf

If___ b __Then

d=b:b=c:c=d

EndIf

Print a,b,c

8)在Select case 结构中应至少包含一个___ CA SE ___子句。

9)窗体的属性可在属性窗口中设置，也可在程序中用___赋值___语句动态设置。

10)有如下Sub过程:

Sub ind(a As Integer)

Static x As Integer

x = x+a

Print x;

End Sub

以下是调用它的事件过程，程序运行后，单击命令按钮Command1，输出结果为___2___。

Private Sub Command1_Click()

Ind(2)

End Sub

11)逻辑常量值为TRUE或____ FALSE ___。

12)货币类型的数据小数点的位置是固定的，精确到

小数点后__4___位。

13)表达式（2+8*3）/2的值是___13___。

14)以下程序用来判断一个整数X是否为偶数，并

将其中的偶数在窗体上显示，请补充完该程序。

If X_ MOD __2=__0__ Then Print X

15)当对窗体中的对象进行__双击___操作时，V isual

Basic 就会显示该对象的代码窗口。

16)下列程序的执行结果是__55__。

T = O : m = 1 : Sum = 0

Do

t = t + m : Sum = Sum + t : m = m + 2

Loop While m <= 9

Print Sum

17)一组具有相同名称，不同下标的下标变量称为

___数组___。

18)给定年份，下列程序用来判断该年是否闰年，请

补充完该程序。

提示：闰年的条件是年号可以被4整除但不

能被100整除，或者能被400整除。

Private Sub Command6_Click()

Dim y As Integer

y=InputBox("请输入年号")

If(y Mod 4=0___ AND ___y Mod 100<>0)or

(y Mod 400=0) Then

Print "是闰年"

Else Print "是普通年份"

End If

End Sub

19)设a=2,b=3,c=4,d=5下列a>b and c<>d or c=a表达

式的值是__ FALSE ___。

20)表达式："1" & "2" = "12"的值是___ TRUE ____。

21)为了能自动放大或缩小图象框中的图形以与图

象框的大小相适应,必须把该图象框的Stretch属性

设置为___ TRUE ___。

22)根据变量的定义位置和所使用的变量定义语句

的不同，VB中的变量可以分为3类，即__局部变

量___、模块变量和全局变量。

23)表达式3>4 and 7=5的值是___ FALSE ___。

24)以下的程序用来输出100到2000间不能被3整

除的数字，请补充完该程序。

Private Sub Commmand1_Click()

Dim x As Integer

x = 100

Do Until x > __2000___

If x Mod 3 <> 0 Then

Print x

End If

x = x + 1

Loop

End Sub

25)下列程序段的执行时，共循环__12__次。

For a=0 To 1

For b=1 To 2

For c=1 To 3

I=I+1

Next c

Next b

next a

26)以下程序计算2到50间所有偶数的和，请补充

完该程序

Sub mult()

Dim Sum As Integer

Sum=0

Dim I as integer

For__ I=2_to 50

If I MOD 2=_0__Then_ SUM=SUM+I __

Next I

Print sum

End Sub

27)A=7,B=3,C=4,则表达式A MOD 3+B^3/C\5的值

为__2__。

28)下列循环语句，要求和数达到10既停止累加，

退出循环，请补充完程序。

For j=1 to 10

s=s+j

If s>=10 then Exit __ FOR __。

Next j

29)下列程序段的运行结果是：

Sub Form1_Click()

Dim n as Integer

I=21:n=3

Do While I>n

I=I-n

Loop

Print I

End Sub

打印结果__3___。

30)V isual Basic中的常量分为两种，一种是直接常量，一种是__符号__常量。

31)V isual Basic 提供了列表框控件，当列表框中的项目较多、超过了列表框的长度时，系统会自动在列表框边上加一个___滚动条___。

32)一个程序最多可以有___255_____窗体。

33)将一般窗体转换为MDI窗体的子窗体时要把MDIChild属性的值设置为___ TRUE ____。

34)要选择多个不相邻的控件，按住____ CTRL ___

或SHIFT键不放，再单击要选择的控件。35)表达

式："1"+"2"="3"的值是___ FALSE ____。

36)___ CAPTION ___属性用来设置窗体的标题。它

确定和改变显示在窗体的标题栏中的文本。

37)假定有一个文本框，其名称为Textl，为了使该

文本框具有焦点，应执行的语句是___

TEXT1.SETFOCUS ___。

38)执行下面的程序段后，s的值为__7__。

S=5

For I=2.6 To 4.9 Step 2

s=s+1

Next I

39)表达式“12345”<>“12345”&“ABC”的值是

__ TRUE ___。

40)下列程序用来计算1+2+3……+10的值，请补充完程序。

Dim t,k as single

K=0

DO While k<10

K=k+1:___ T=T+K ___

loop

print t

41)下列程序段的执行后输出的结果为____27___。

K = 1

For I = 1 To 3

A = I ^ I ^ K

Next I

Print

42)下列程序是用来计算1＋2＋3……＋10的程序段，请补充完该程序。

Dim I, s, k As Integer

s = 0: k = 0

For__ I=-10__To -1

k = k+1:s = s+k

Next I

Print s

43)执行inputbox函数后，会产生一个对话框，对话框上通常有两个按纽，它们是__确定___按纽和取消按钮。

44)下列程序的执行结果是__120___。

M1 = 1:m2 = 1

Do While m2<>6

m1 = m1*m2 : m2 = m2+1

Loop

Print m1

45)下列程序的执行结果是__10___。

Private Function P(N As Integer)

For I = 1 To N

SUM = SUM + 1

Next I

P = SUM

End Function

Private Sub Command1_Click()

S = P(1) + P(2) + P(3) + P(4)

Print S;

End Sub

46)货币型数据的类型标识符为___@___。

47)以下程序用来输出1到100所有奇数的和，请补

充完该程序。

Private Sub Command3_Click()

Dim s As Long

Dim x As Integer

s = 0

For x=1 to 100 step__2__

s = s + x

Next x

Print s

End Sub

48)假设有一复选框控件，名为Check1，在程序中，

我们用“check1.value=1”语句设置V alue属性的值，

则该程序执行后，复选框处于__选中__状态。

49)激活属性窗口的快捷键是___ F4___。

50)下列程序的执行结果是___1____。

A = 75

If a>60 Then

I = 1

ElseIf a>70 Then

I = 2

ElseIf a>80 Then

I = 3

ElseIf a>90 Then

I = 4

End If

Print I

51)下列程序段的运行后t的值为___0___。

Dim t,k as single

k=5 : t=1

do While k>=-1

t=t*k : K=K-1

loop

52)执行语句“a=6=5”后，变量a的值为___ FALSE

___。

53)下面程序段的输出结果是__ s=42___。

P=0:s=0

Do

p = p+2

s = s+p

Loop While p<11

Print "s="&s

54)下面程序段的输出结果是__1.5____。

For X=1.5 To 5 Step 5

Print X;

Next X

55)执行下面的程序段后，s的值为__9____。

S=5

For I=2.6 To 4.9 Step 0.6

s=s+1

Next I

56)表达式Fix(-32.68)+Int(-23.02)的值为__-56____。

57)在窗体上画一个命令按钮，然后编写如下事件过

程：

Private Sub Command1_Click()

a=InputBox("请输入一个整数")

b=InputBox("请输入一个整数")

Print a+b

End Sub

程序运行后，单击命令按钮，在输入对话框

中分别输入321和456，输出结果为_321456___。

58)执行下面的程序段后，b的值为__300___。

A=300:b=20

a=a+b:b=a-b:a=a-b 59)V isual Basic 的对象是___窗体_____和___控件

____的总称。

60)图片框的默认属性为___ PICTU RE ____（提示：

该题只填写英文，如Name事件，只写Name即可）。

61)滚动条响应的重要事件有___ CHANGE ____和

____ SCROLL ___（提示：该题只填写英文，如Click

事件，只写Click即可）。

62)下列程序段执行后x的值是___50___。

X=100 : y=50

if x>y then x=x-y else x=x+y

63)表达式32/2^3-3*2^2+4^2的值是____8___。

64)下列程序用来将变量X，Y的值互换，请补充完程序（提示：该题答案中不要出现空格）。

T=Y:___ Y=X ___:X=T

65)有如下程序，该程序的运行结果是___ TRUE ___。

A=20 : b=10

print a>b

6)表达式15+3*3/9*5\5 mod 10 的值是___16___。

67)有如下程序，该程序的运行后输出的结果是___ AAABBB ___。

Private sub Command1_Click()

I="AAAAAA"

S=Mid(I,4,3) & "BBB"

Print S

End Sub

68)有一数组定义语句：dim M(-2 to 1) as string，该语句定义的数组M中包含__4__个元素。

69)设有数组声明语句：Option base 1 dim A(3,-2 to 1)，则数组A中有__12___个元素。

70)有数组定义语句：dim I(99,99) as Integer，则数组I中共包含有___10000___个元素。

71)下面程序段执行后的结果是__5___。

X=10

For I=6.3 to 4.9 Step -0.3

x=x-1

Next

Print x

72)表达式：5\2*3的值是___0___。

73)表达式：Mid("SHANGHAI",6,3)的值是__ HAI ____。

74)表达式Int(Rnd(0)+1)+Int(Rnd(1)-1)的值是__0___。

75)VB程序设计中三种基本结构分是：___顺序____结构、选择结构和____循环___结构。76)___ 字符___是构成文件的最基本的单位。

77)顺序文件与随机文件相比较，占用内存资源较小

的文件是___随机___文件。

78)随机文件是以___记录____为单位读写，二进制

文件以____字节___为单位读写。

79)随机函数Rnd(X)，当X=__0___时返回最近一次

调用Rnd函数生成的随机数。

80)语句x=inputbox("请输入数据"),输入12345,则x

的值为______类型的数据（提示：例如整型，Int；

字符型，String）。

81)x,y中至少有一个变量小于变量z的VB表达式

为x

82)以下程序段的输出结果是__3__。

Num=0

While num<=2

num=num+1

Wend

Print num

83)如果要将某个菜单项设计为分隔线，则该菜单项

的标题应设置为___-___。

84)在V isual Basic中按文件的访问方式不同, 可以

将文件分为顺序文件、随机文件和___二进制文件

___。

85)如果有三个单选按钮直接画在窗体上，另有四个

单选按钮画在框架中，则运行时，可以同时选中

___2___个选项按钮（提示：该题答案只填写数字，

如：1，2，3，4）。

86)以下语句的执行结果是__5,459.40__。

I = Format(5459.4, "##,##0.00")

Print I

87)在VB中，关系运算符号一共有__6__种。（提示：

该题答案只填写数字，如：1，2，3，4）。

88)过程的作用域分为____模块____、___全局

_____。

89)在windows环境下，菜单分为___下拉____菜单

和___快捷____菜单

90)VB中算术表达式5+2^2 的值为9

91)VB中表达式Int(5.8)的值为__5____。

92)启动VB6.0时，VB6.0默认的工程类型是___标

准EXE ____工程。

93)在窗体上添加一个命令按钮，然后编写如下事件

过程Private Sub Command1_Click() Dim a As

Integer Dim b As Integer a = 5

b = 6 Print a * b End Sub

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

30 。

94)逻辑运算时，参与运算的两个量都是True，结果

才会是True的逻辑运算是__ AND ___运算（提示：

该题答案不能出现汉字）。

95)VB工程文件的扩展名是___ vbp ___

96)有如下程序段，该程序段的执行结果是__18__。

For I=1 To 3

For j=1 To 3

n=n+1

Next j

m=m+n

Next I

Print m

97)VB赋值语句中的“=”称为赋值号

98)设有以下的循环：

x=1

Do

x=x+2 : Print x

Loop Until__ x>=6__。

程序运行后，要求执行3次循环体，请补全

以上程序。

99)VB中算术表达式23\10 的值为 2

100)对于Commandbutton控件，Picture属性用于给

按钮加一个图形，只有当____ STYLE ___属性的属

性值设置为1时，该属性才有效。

101) 在V B中根据不同的情况做出不同的选择，执

行不同的操作，这种程序设计结构称为

结构(选择)

102)若要求从文本框中输入密码时在文本框中只显

示*号，则应当在此文本框的属性窗口中设置___

PASSWORDCHAR ____属性。

103)设置计时器事件之间的间隔要通过计时器的__

INTERV AL ___属性

104)下列程序段的执行结果是__11___。

K=0

For j=1 to 2

For I=1 to 3

k=I+1

Next I

For I=1 To 7

k=k+1

Next I

Next j

Print k

105)Private Sub Command1_Click()

x=0

Do Until x=-1

a=InputBox("请输入第一个数字a的值")

a=V al(A)

b=InputBox("请输入第二个数字b的值")

b=V al(b)

x=InputBox("请输入第三个数字x的值")

x=V al(x)

a=a + b + x