当前位置：文档库 › 选择题

选择题

第一章

1.工程文件的文件名后缀是__B___。

A..bmp

B..vbp

C..frm

D..bas

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

A.bas

B.cls

C.frm

D.bmp

3.启动Visual Basic后，系统为用户新建的工程起一个名为___A__的临时名称。

A.工程1

B.窗体1

C.工程

D.窗体

4.在Visual Basic设计界面中不能隐藏的窗口是__A____。

A.工程窗口

B.属性窗口

C.立即窗口

D.窗体窗口

5.在Visual Basic环境下，当写一个新的Visual Basic 程序时，所做的第一件事是_____B___。

A.编写代码

B.新建一个工程

C.打开属性窗口

D.进入VB环境

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

A.启动VB时建立的窗体

B.第一个添加的窗体

C.最后一个添加的窗体

D.在“工程属性”对话框中指定的窗体

7.双击窗体中的对象后，Visual Basic将显示的窗口是__C___。

A.项目（工程）窗口

B.工具箱

C.代码窗口

D.属性窗口

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

A.解释运行模式

B.编译运行模式

C.两者都有

D.汇编模式

9.Visual 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.Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是____A____。

A.属性、事件、方法

B.控件、属性、事件

C.窗体、控件、过程

D.窗体、控件、模块

14.在Visual Basic 中，称对象的功能为__B____。

A.属性

B.方法

C.事件

D.封装

15.____C_是由Visual Basic提供的一种专门的子程序，由对象本身所具有，反映该对象功能的内部函数或过程。

A.文件

B.属性

C.方法

D.窗体

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

A.属性

B.方法

C.继承

D.事件

17.当事件能被触发时，__B___就会对该事件作出响应。

A.对象

B.程序

C.控件

D.窗体

18.Visual Basic主要用于___D___。

A.图像处理

B.文字处理

C.制作视频文件

D.开发应用程序

19.下述的说法哪种是Windows的程序设计方法：___D____。

A.面向对象，顺序驱动

B.面向过程、事件驱动

C.面向过程、顺序驱动

D.面向对象、事件驱动

20.Visual basic采用了___C__编程机制。

A.面向过程

B.面向对象

C.事件驱动

D.可视化

21.以下不是Visual Basic特点的选项是_B____。

A.可视编程

B.算法设计

C.事件驱动

D.面向对象

22.下列叙述正确的是____C___。

A.对象是包含数据又包含对象数据进行操作的方法的物理实体

B.对象的属性只能在属性窗口中设置

C.不同的对象能识别不同的事件

D.事件过程都要由用户点击对象来触发

23.下列变量名中合法的是___A___。

https://www.wendangku.net/doc/8f10909968.html,1

B.6a

C.a+b

D.For

24.对变量名说法不正确的是___C___。

A.必须是字母开头，不能是数字或其他字符

B.不能是Visual Basic的保留字

C.可以包含字母、数字、下划线和标点符号

D.不能超过255个字符

25.下列符号是Visual Basic中合法变量名的是___D__。A.IF

B.7AB

C.A[B]7

D.GH_R56

26.下列变量名中不合法的是___B__。

A.strname

B.abc-3

C.A_one

D.vaone

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.下列各项不是Visual 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.Variant

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.Lofo()

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

A."Vis"

B."sua"

C."Bas"

D."sic"

48.Rnd函数不可能产生的值是___B__。

A.0.1

B.1

C.0.1234

D.0.00005

第二章

1.函数int(10*rnd)是在__D___范围内的整数。

A.[0, 1)

B.[1, 10)

C.[1, 9)

D.[0,9]

2.Rnd函数可能产生的值是__C___。

A.2

B.1

C.0.1234

D.1.00005

3.INT(100*RND(1))产生的随机整数的闭区间是

__A___。

A.[0，99]

B.[1，100]

C.[0，100]

D.[1，99]

4.函数int(abs(99-100)/2)的值为__B____。

A.1

B.0

C.3

D.4

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

A.1+rnd(30)

B.1+30*rnd()

C.rnd(1+30)

D.int(rnd()*30)+1

6.Inputbox函数的参数中，必选参数Prompt的作用是___B__。

A.输出信息

B.定义提示信息

C.定义隐含信息

D.定义输入的位置

7.把InputBox 的返回值转换为数值应该使用的函数是___D___。

A.Log

B.Str

C.Len

D.Val

8.设有如下语句：str1=inputbox("输入","","练习")从键盘上输入字符串“你好”后，str1的值是_D__。

A."输入"

B." "

C."练习"

D."你好"

9.RGB(x,y,z)函数中x,y,z的取值范围___C___。

A.[0,255)

B.(0,255]

C.[0,255]

D.(0,255)

10.数学式子sin45°写成Visual Basic表达式是__C___。

A.sin45

B.Sin(45)

C.Sin(45*3.14/180)

D.sin(45°) 11.下列____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

12.下列___B___语句可以将整型变量A、B的值互换。

A.A=B:B=A

B.A=A+B:B=A-B:A=A-B

C.A=C:C=B:C=A

D.A=(A+B)/2:B=(A-B)/2

13.下面的运算符中，哪个是算术运算符___A____。

A.Mod

B.=

C.And

D.Xor

14.下面的运算符中，哪个是关系运算符__C____。

A.Not

B.mod

C.<>

D.&

15.下面的运算符中，哪个是逻辑运算符__A____。

A.And

B.Mod

C.>=

D.&

16.逻辑运算符Xor、Or、Eqv、And中，级别最高的运算符是______。

A.Xor

B.Or

C.Eqv

D.And

17. 17 mod 3的运算结果是__D___。

A.0.5

B.1

C.1.5

D.2

18.下列表达式不合法的是__D_____。

A.123+abc

B.123&"abc"

C.1+2/3

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

19.语句Print 6*5/5的输出结果是____A____。

A.6

B.30

C.0

D.6*5/5

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

A.1

B.5

C.4

D.出错

21.下列各赋值语句，语法不正确的是__A___。

A.x+y=5

B.Number=15

https://www.wendangku.net/doc/8f10909968.html,bell.caption="time"

D.Length=x+y

22.表达式X+1>X是_D____。

A.算术表达式

B.非法表达式

C.字符串表达式

D.关系表达式

23.x是小于100的非负数，用vb表达式正确的是___D___。

A.0B.0<=x<100

C.x>=0 Or x<100

D.x>=0 AND x<100

24.若x=45,y=46,则表达式x+y=91的值是__C___。

A.x+y=11

B.11

C.False

D.True

25.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

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

A.分号

B.逗号

C.冒号

D.空格

27.Print方法可以输出多个表达式值，若使用标准格式输出，各表达式的分割符应是__B____。

A.空格

B.逗号

C.冒号

D.分号

28.程序的基本控制结构是___C___。

A.顺序结构、多分支结构和单分支结构

B.For…Next结构、Do…loop结构

C.顺序结构、选择结构和循环结构

D.单行结构和多行结构

29.下列结构中不属于循环结构的是___C___。

A.for/next

B.while/wend

C.With/end with

D.do/loop

30.下列程序的执行结果为__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

31.循环结构for i=1 to 10 step 1.5的执行次数是__B___。

A.6

B.7

C.9

D.10

32.当执行以下程序时，在名为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

33.窗体设计器是用来设计___B___。

A.应用程序的代码段

B.应用程序的界面

C.对象的属性

D.对象的事件

34.决定一个窗体有无控制菜单的属性是___D__。

A.Minbutton

B.Caption

C.Maxbutton

D.Controlbox

35.若要在窗体中绘制一个圆，使用的方法是___A___。

A.Circle

B.line

C.point

D.pset

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

A.Show

B.UnLoad

C.Load

D.Hide

37.要使窗体Form1关闭,错误的是__D____。

A.Unload Form1

B.Unload me

C.End

D.Form1.Visiable=False

38.下列各种窗体事件中，不能由用户触发的事件是__D____。

A.Load事件和Unload事件

B.Click事件和Unload事件

C.Click事件和Dbclick事件

D.Load事件和Initialize事件

39.窗体的Enable属性的属性值是_C____类型的数据。

A.整型

B.字符型

C.逻辑型

D.实型

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

https://www.wendangku.net/doc/8f10909968.html,

B.Caption

C.BackColor

D.BorderStyle

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

https://www.wendangku.net/doc/8f10909968.html,

B.Print

C.Caption

D.Enabled

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

A.ControlBox

B.MinButton

C.MaxButton

D.Enabeld

43.窗体能响应的事件是___C____。

A.ActiveFrom

B.Drive

C.Load

D.Change

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

A.输入对话框

B.输出对话框

C.模态对话框

D.非模态对话框

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

A.Me.Clear

B.Me.Cls

C.Me=" "

D.Me.Delete

46.改变控件在窗体中的上下位置应修改控件的____A_属性。

A.Top

B.Left

C.Width

D.Height

47.窗体的BackColor 属性用于设置窗体的__C____。

A.高度

B.亮度

C.背景色

D.前景色

48.确定一个窗体大小的属性是__A___。

A.Width和Height

B.Width和Top

C.Top和Left

D.Top和Height

49.能够改变窗体边框线类型的属性是___B___。

A.FontStyle

B.BorderStyle

C.BackStyle

D.Border

50.设置文本控件的文本内容时，应改变的属性是__A____。

A.text

https://www.wendangku.net/doc/8f10909968.html,

C.Caption

D.Width

51.命令form1.Cirle(500,800),800能够在窗体上中画出的图形是____D___。

A.半径为800的椭圆

B.细而高的椭圆

C.扁而平的椭圆

D.圆心在（500，800）的一个圆弧

第三章

1.控件是___A____。

A.建立对象的工具

B.设置对象属性的工具

C.编写程序的编辑器

D.建立图形界面的编辑窗口

2.要改变Label控件中背景的颜色，可以设置Label控件的__D___属性。

A.FontColor

B.FillColor

C.ForeColor

D.BackColor

3.若要使标签的大小自动适应所显示的文本，可通过设置__A____属性的值来实现。

A.AutoSize

B.Alignment

C.Enabled

D.Visble

4.在Visual Basic中通过___B___属性设置字体颜色。

A.Fontcolor

B.Forecolor

C.Backcolor

D.Showcolor

5.在Visual Basic中，要设置菜单项的快捷访问键，应使用哪个符号：___A___。

A.&

B.*

C.$

D.@

6.在Visual Basic中，下列____C____控件可以包含其他控件。

https://www.wendangku.net/doc/8f10909968.html,bel

https://www.wendangku.net/doc/8f10909968.html,mandbutton

C.Form

D.Checkbox

7.若要使标签透明，则可使用的属性是____B___。A.BackColor

B.BackStyle

C.BorderStyle

D.ForeColor

8.设置标签边框的属性是__A____。

A.BorderStyle

B.BackStyle

C.AutoSize

D.Alignment

9.当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的___B___。

A.AutoSize属性

B.Resize事件

C.AutoRedraw属性

D.Stretch方法

10.标准工具箱中的控件___B____。

A.数目是固定不变的

B.数目可以增加或减少

C.包含了Visual Basic所有控件

D.用户可以删除工具箱中的按钮控件

11.要改变控件的宽度，应修改该控件的___C__属性。

A.Top

B.Left

C.Width

D.Height

12.大部分控件都没有的属性是___D____。

A.Top

https://www.wendangku.net/doc/8f10909968.html,

C.Visible

D.Interval

13.若要在列表框中显示多列数据，可用列表框的___C___属性来实现。

A.MultiSelect

B.Index

C.Columns

D.List

14.复选框控件其Value属性的可取值是____C___。

A.Trut和False

B.0和1

C.0、1、2

D.1、2、3

15.所有控件都有的属性是_______，在程序中作为对象的标识引用。

A.Caption

B.Value

C.Text

https://www.wendangku.net/doc/8f10909968.html,

16.要使一个命令按钮成为图形命令按钮，则应首先设置___B__属性值。

A.Picture

B.Style

C.Downpicture

D.Disabledpicture

17.要把一个命令按钮设置成无效，应设置其哪一属性值___B__。

A.Visible

B.Enabled

C.Default

D.Cancel

第18小题

将命令按钮Command1设置为不可见，应修改该命令按钮的_______属性。

A.Visible

B.Value

C.Caption

D.Enabled

19.当某一按钮的___B___属性设置为False时，该按钮不可见。

A.Enable

B.Visibale

C.Default

D.Cancel

20.命令按钮Command1 的Caption属性为“退出（x）”，要将命令按钮的快捷键设为Alt+x,应修改Caption属性为____A_____。

A.在x前插入&

B.在x后插入&

C.在x前插入#

D.在x后插入#

21.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是__C___。

A.Value

B.Cancel

C.Default

D.Enabled

22.如果要在文本框中输入字符时，只显示某个字符，如星号(*)，应设置文本框的___B____属性。

A.Caption

B.PasswordChar

C.Text

D.Char

23.为使文本框显示滚动条，必须先设置文本框的属性是___C__。

A.AutoSize

B.Alignment

C.Multiline

D.ScrollBars

24.若要以代码方式设置在文本框中显示文本的字体大小，则可用文本框的___C___属性来实现。

A.FontName

B.Font

C.FontSize

D.FontBold

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

A.HideSelection

B.ToolTipText

C.Aligmment

D.WordWrap

26.若要设置文本框中所显示的文本颜色，使用的属性是__C____。

A.BackColor

B.FillColor

C.ForeColor

D.BackStyle

27.设定文本框中是否可以接受多行文本用__C___属性。

A.MaxLength

B.ToolTipText

C.Multiline

D.Tag

28.下列控件中可自动设置滚动条的是___C_____。

A.复选框

B.框架

C.列表框

D.标签框

29.文本框控件最多能处理___A___个字节。

A.32k

B.64K

C.128K

D.16k

30.用于设定文本框中最多可接受的字符数的属性是___D___。

A.AutoSize属性

B.PasswordChar属性

C.SelLength属性

D.MaxLength属性

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

A.Enable

B.Visibale

C.Timer

D.Interval

32.若要设置定时器控件的定时时间，需设置的属性是__A___。

A.interval

B.value

C.enabled

D.text

33.为使计时器控件每隔5秒钟产生一个计时器事件(timer 事件)，则应将其Interval属性值设置为___D___。

A.5

B.500

C.300

D.5000

34.如果要求设置定时器时间间隔为0.5秒钟，那么它的Interval属性值应该等于___B____。

A.5000

B.500

C.50

D.5

35.将定时器的时间间隔设置为1秒，那么定时器的Interval属性应设置为___A___。

A.1000

B.1

C.100

D.10

36.通用对话框中能打开“颜色对话框”的方法是___B___。

A.ShowOpen

B.ShowColor

C.ShowSave

D.ShowPrinter

37.以下控件中没有Caption属性的控件是___B___。

A.标签框

B.文本框

C.框架

D.命令按钮

38.任何控件都具有的属性是____C___。A.TEXT

B.CAPTION

https://www.wendangku.net/doc/8f10909968.html,

D.FORECOLOR

39.以下不具有Picture属性的对象是___D___。

A.窗体

B.图片框

C.图像框

D.文本框

40.若要使某命令按钮获得控制焦点，可使用的方法是_B____。

A.lostfocus

B.setfocus

C.point

D.value

41.下列那些控件不可能包含其它控件___D___。

A.Picturebox

B.Frame

C.Toolbar

D.Image

42.下面四个选项，不是事件的是__B____。

A.Click

B.Visibale

C.Unload

D.Change

43.决定控件上文字的字体、字形、大小及效果的属性是___D___。

A.TEXT

B.CAPTION

https://www.wendangku.net/doc/8f10909968.html,

D.FONT

44.以下___B___控件不能触发Dbclick()事件。

https://www.wendangku.net/doc/8f10909968.html,bel

https://www.wendangku.net/doc/8f10909968.html,mandbutton

C.PictureBox

D.Image

45.没有Caption属性的控件是___D__。

https://www.wendangku.net/doc/8f10909968.html,bel

https://www.wendangku.net/doc/8f10909968.html,mand

C.Frame

D.Textbox

46.一个可执行的vb运行程序至少包括一个___B___。

A.标准模块

B.窗体模块

C.类模块

D.资源文件模块

47.对象是一个逻辑实体，它是__C____的集合。

A.数据

B.代码

C.数据与代码

D.属性

48.Visual Basic应用程序的运行模式是___C___。

A.解释运行模式

B.编译运行模式

C.既有解释运行模式，又有编译运行模式

D.汇编运行模式

49.下列数据类型不可能占8个字节的是__B___数据类型。

A.Date

B.Long

C.Double

D.Currency

50.如果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)

第四章

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

A.Dim a,b As Integer

B.Dim a As String

C.Static a As Integer

D.Public a As Currenency

2 表达式25.26 MOD 6.98的值是__C___。

A.1

B.5

C.4

D.提示错误信息

3 下面的运算符中，优先级别最高的是__B___。

A.AND

B.*

C.〉=

D.&

4 已知变量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 5 下面程序执行的结果是__C__。

Private Sub Form_Click()

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

C=Val(A$)+Val(B$)

Print C\100

End Sub

A.123

B.3

C.5

D.579

6 以下哪个是合法的变量名_D______。

A.Len

B.Test@qw

C.6cost_1

D.count2s

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

A.4^5

B.3*4

C.x+1

D.SIN

8 VB 6.0中，执行下面的四个语句时出现错误的是__C___。

A.x=SGN(0)

B.x=SQR(0)

C.x=LOG(0)

D.x=SIN(0)

9 设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

10 Datetime是Date类型的变量，以下赋值语句中错误的是：_D______。

A.Datetime=#4/14/97#

B.Datetime=#May 1,1997#

C.Datetime=#12:15:00AM#

D.Datetime="8\8\99"

11 15.5\2的结果是___D__。

A.1

B.1.5

C.7

D.8

12 19.5 Mod 2*2的运算结果是__D___。

A.3.5

B.1

C.3

D.0

13 a=5,b=8,则int((b-a)*rnd+a)的结果是介于_A____之间的整数。

A.[5,8)

B.(0,5)

C.[3,5)

D.(0,3]

14 要声明一个长度为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

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

A.c%aaa

B.sum_3

C.Else

D.5persons

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

A.@

B.$

C.%

D.#

17 下列选项中，为字符串常量的是_B_____。

A.6/12/2001

B."6/12/2001"

C.#6,12,2001#

D.6,12,2001#

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

A.BCD

B.12345<>12345 & ABC

C.Not 2*5=10

D.4=4 and 5>2+2

19 下列数据中哪一个是布尔常量___C____。

A.123

B.not

C.TRUE

D.xyz

20 以下程序段的输出结果是__D____。

A=Sqr(3)

b=Sqr(2)

c=a>b

Print c

A.-1

B.0

C.False

D.Ture

21 8.6787E+8写成普通的十进制数是_B______。

A.86787000

B.867870000

C.8678700

D.8678700000

22 假设变量BOOLV AR是一个布尔型变量，则下面正确的赋值语句是 D

A.BOOLVAR=…TRUE?

B.BOOLVAR=.TRUE

C.BOOLVAR=#TRUE#

D.BOOLVAR=3<4

23 将任意一个正的两数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)

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

A.7.5

B.0

C.1

D.2

25 表达式Fix(-23.87)+int (24.56)的值为__C___。

A.-1

B.0

C.1

D.2

26 下列运算结果中，值最大的是___D___。

A.3\4

B.3/4

C.4 mod 3

D.3 mod 4

27 在VB6.0中，12345678是下列类型中的__B____。

A.整数型

B.长整数型

C.字符串型

D.日期型

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

A.0

B.0.8

C.-0.2

D.-34.8

29 表达式Int(-17.8)+Sgn(17.8)的值是__B____。

A.18

B.-17

C.-18

D.-16

30 表达式2*3^2+2*8/4+3^2的值为__B___。

A.64

B.31

C.49

D.22

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

A.Text1.text=Text.text+Text2.text?

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

C.Text1.Caption=Text1.Caption+Text2.Caption?

D.Text1.Enable=Text1.Enable+Text2.Enable?

32 如果X是一个正的实数，将千分位四舍五入，保留两位小数的表达式是 B

A.0.01*int(x+0.05)

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

C.0.01*int(100*(x+0.05))

D.0.01*int(x+0.005)

33 Dim b1,b2 as boolean语句显式声明变量__C___。

A.b1和b2都为布尔型变量

B.b1是整型，b2是布尔型

C.b1是变体型(可变型)，b2是布尔型

D.b1和b2都是变体型(可变型)

34 逻辑表达式Not"a">"b"And 9<3 Or 9>3的值为___A___。

A.True

B.False

C.表达式有错

D.条件不足

35 Double类型的数据由__C___个字节组成。

A.21

B.4

C.8

D.16

36 如果A为一boolean型数据，则下列赋值语句正确的是__D___。

A.A="true"

B.A=.true

C.A=#TURE#

D.A=3<4

37 若x是一个正实数，对x的第3位小数四舍五入的表达式是__C___。

A.0.01*Int(x+0.005)

B.0.001*Int(1000*(x+0.005))

C.0.01*Int(100*(x+0.005))

D.0.01*Int(x+0.05)

38 下列逻辑运算结果为"true"的是____C____。

A.false or not true

B.false and not true

C.true or not true

D.true and not true

39 表达式25.28 Mod 6.99的值是_C_____

A.1

B.5

C.4

D.出错

40 下面____D__不是VisualBasic的数据类型。

A.Single

B.Object

C.Integer

D.Boo1

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

A.8.76

B.7.8

C.6

D.6.67

42 Int(-5.1)的值是__B____。

A.-5

B.-6

C.5

D.4

43 设a=2,b=3,c=4,d=5,下列表达式a=b<>c=d的值是___C___。

A.1

B.Ture

C.False

D.-1

44 如果将布尔常量值True赋给一个整型变量，则整型变量的值为__B____。

A.0

B.-1

C.TRUE

D.FALSE

45 有如下程序：

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

46 下列程序段的执行结果为__A_。

X=5

y=-20

if not x>0 then

x=y-3

else

y=x+3

print x-y;y-x

end if

A.-3 3

B.5 -8

C.3 -3

D.25 -25

47 以下程序段执行后整型变量n 的值为__B___。

N=0

for I=1 to 20 step 5

n=n+1

next I

A.3

B.4

C.5

D.2

48 下列程序运行后，输出的结果为___A___。

B=1

Do while (b<40)

b=b*(b+1)

Loop

Print b

A.42

B.39

C.6

D.1

49 下列程序段的执行结果是___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

50 下列程序运行后，变量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

第五章

1.以下程序输出的结果为__4____。

X=1

y=4

Do Until y>4

x=x*y

y=y+1

Loop

Print x

2.以下程序段的执行结果是__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

3.下列循环语句将执行___D___次。

A=100

Print a

a=a+1

Loop until a<=10

A.1

B.10

C.100

D.死循环

4.下列程序执行后，变量s的值为__25___。

Dim s As long ,x As Integer

s=0:x=1

Do While (x<10)

s=s+x

x=x+2

Loop

Print s

5.当变量x=2,y=5时，以下程序的输出结果为__10__。Do until y>5

x=x*y

y=y+1

loop

print x

6.当执行以下程序时，在名为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

A.字符串15

B.整数15

C.字符串5

D.整数5

7.如下有一段不完整的程序段，如果要求该程序执行3次循环，则应在程序中的括号里输入__A____。

X=1

x=x+3

print x

loop until(___)

A.x>=8

B.x<=8

C.x>=7

D.x<=7 8.若整型变量a的值为2、b的值为3，则下列程序段执行后整型变量c的值为___2___。

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

9.下列程序的运行后s的值是__2500__。

S=0

For x=99 to 1 Step-2

s=s+x

Next x

Print s

10.下列程序的执行结果是__111_。

K=0

For I=1 To 3

a=I^I^K

print a;

Next I

11.下列程序的执行结果为___50__。

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

12.下列程序的执行结果为__A_5050__。

Dim S As Integer,n As Integer

S=0:n=1

Do While n<=100

S=S+n

n=n+1

Loop

Print S

13.要输出简单信息，可以使用__B___。

A.InputBox函数

B.Msg Box函数

C.ShowFont方法

D.Show Printer方法

14.要使循环体至少执行一次，应使用___C__循环。

A.For-next

B.While-wend

C.Do--Loop while|until

D.do[while|until]-loop

15.执行下列程序后，变量a的值为51

Dim I as integer

dim a as integer

a=0

for I=0 to 100 step 2

a=a+1

next I

16.下面程序执行后，X的结果为__C_15__。

X=0

For I =1 to 5

For j=I to 5

X=X+1

Next j

Next I

Print X

17.下列的程序段执行后，X的值为___B55_。

X=0

for I=1 to 10

for j=I to 10

x=x+1

next j

next I

18.下面程序段的循环结构执行后，的输出值是_C_11___。

程序段为：

For I=1 to 10 step 2

y=y+I

Next I

print I;

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

A="Beijing"

b="ShangHai"

Print a;b

A.Beijing ShangHai

B.Abeijing ShangHai

C.BeijingShangHai

D.Abeijing

20.有如下程序段，该程序执行后，变量a的值为___C_10__。

For I=1 To 2

For J=I To 2

For K=1 To J

a=a+2

Next K

Next J

Next I

21.执行下列程序后，X的值为___C__18_。

X=3

y=6

Do While y<=6

x=x*y

y=y+1

LooP

22.执行下列程序段后，整型变量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

23.执行完下面的程序段后，循环将执行__5__次。

For I=1.7 To 5.9 Step 0.9

a=a+1

Print a

Next I

24.有如下语句，执行后该段语句的循环次数是9_____。

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

25.有如下程序，该程序将___A___。

For I=1 to 10 step 0

K=k+2

Next I

A.形成无限循环。

B.循环体执行一此后结束循环。

C.语法错误。

D.循环体不执行即结束循环。

26.有如下程序段，该程序段执行完毕后，共循环了40________。

For I=1 To 5

For j=1 To I

For k=j To 4

Print "a"

Next k

Next j

Next I

27.有如下程序，该程序的运行结果为__32____。

Dim k As Integer

n=5:m=1:k=1

Do While k<=n

m=m*2

k=k+1

Loop

Print m

28.以下程序输出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

A.i Mod 2 = 0

B.x Mod 2 = 0

C.I Mod 2 <> 0

D.x Mod 2 <> 0

29.以下是计算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

30.下列程序的执行结果为___150_____。

Dim intsum As Integer

Dim I As Integer

intsum=0

For I=0 To 50 Step 10

intsum=intsum+I

Next I

Print intsum

31.下列命令按钮事件过程执行后，输出结果是_30____。

For m=1 to 1000 step 2

a=10

for n=1 to 20 step 2

a=a+2

next n

next m

print a

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

A.SGN(-26)=26

B.SGN(-26)=-26

C.SGN(-26)=+1

D.SGN(-26)=-1

33.在一个语句行内写多条语句时，语句之间应该用______D__分隔

A.逗号

B.分号

C.顿号

D.冒号

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

A.窗体

B.代码窗口

C.立即窗口

D.图片框

35.Round(1.512)的值是__C____。

A.1.5

B.1.51

C.2

D.1.50

36.执行语句Print format(5459.478,"#,##0.00")，正确的输出是__B____。

A.5459.48

B.5，459.48

C.5，459，478

D.5，459。47

37.下列是一个循环结构的程序，循环体内的语句将执行___1000__次。

K=0

For I=1 to 10

For j=1 to 100

K=K+1

Next j

Next I

38.下列程序的运行结果为___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

39.下列程序共执行了___15_____循环。

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

40.下列程序段运行后，输出结果是_42___。

B=1

Do until b>7

b=b*(b+1)

Loop

Print b

A.7

B.39

C.42

D.1

41.下列程序段的执行结果为_______。

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

42.下列程序段的执行结果为__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

Next I

Next J

Print K

43.下列程序段的执行结果为_1，6_____。 X=6

For K=1 To 10 Step -2

X=X+K

Next K

Print K;X

44.下列程序段的执行结果为__3 ，21____。 N=0:J=1

Do Until N>2

N=N+1

J=J+N*(N+1)

Loop

Print N;J

45.下列输出语句中，错误的是___D___。

A.? X,y

B.Print x,y

C.Debug.Print x,y

D.Print.Form x,y

46.用InputBox函数可帮助生成___C____。

A.消息框

B.“保存”对话框

C.简单输入框

D.“颜色”对话框

47.如果有数组声明 Dim a(10) As Integer，则该数组共有___11___个元素。

48.表达式Right("Beijing",4)的值是__B____。

A.Beijing

B.jing

C.eiji

D.ijin

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

A.Ltrim()

B.Rtrim()

C.Trim()

D.Lcase()

50.函数left("Hello", 2)的值为__A___。

A.He

B.el

C.lo

D.true

第六章

1.设执行以下程序段时依次输入1、3、5，执行结果为__1_。

Dim a(4) As Integer

Dim b(4) As Integer

For K =0 To 2

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

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

Next K

Print b(K)

2.用以下语句

Dim b(-2 to 4)as string 所定义的数组的元素个数是__7_____个。

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

4.用于获得字符串S最左边4个字符的函数是：_A______。

A.Left(S,4)

B.Left(1,4)

C.Leftstr(S)

D.Leftstr(3,4)

5.用于获得字符串S从第4个字符开始的4个字符的函数是_A _____。A.Mid(S,4,4)

B.Middle(S,4,4)

C.Midstr(S,4,4)

D.MiddleStr(S,4,4)

6.下列程序段的执行结果为_C.11 3____。

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)

7.如果有声明Option base 1 dim array(15)，则该数组共有__15___个元素。

8.如果有声明Dim a(5) As Integer，则该数组共占用__12____个字节内存。

9.数组的下标可取的变量类型是C_____。

A.日期型

B.字符型

C.数值型

D.可变型

10.如果有声明Option base 1 dim arr(-8 to -2,4)，则该数组共有_28____个元素。

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

A.5ABCDED

B.可变型

C.10

D.0

12.如下数组声明语句，正确的是_B_____。

A.dim a[3,4] as intiger

B.dim a(3,4) as string

C.dim a(n,n) as single

D.dim a(3 4) as integer

13.设A=”abcdefghijklm”，下面__A_____的函数值为”jklm”。

A.Mid(A,10,4)

B.Ringht(A,?5)

C.Ringht(A,1,4)

D.Left(A,1 0,4)

14.写列程序段的执行结果_C___。

A="abbacddcba"

for I=6 to 2 step -2

x=mid(a,I,I)

y=left(a,I)

z=right(a,I)

z=x & y & z

next I

print Ucase(z)

A.ABA

B.AABAAB

C.BBABBA

D.ABBABA

15.如有数组声明语句Dim a(2,-3 to 2,4)，则数组a包含元素的个数是__90___。

16.下列程序的执行结果是__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

17.dim a(-3 to 3)所定义的数组元素个数是___7__。

18.数组Dim D(3, 1 To 10, 1 To 15)共有元素__600______。

19.表达式Left("how are you ",3)的值是___A__。

A.how

B.are

C.you

D.ho

20.在Visual Basic程序设计中，过程名称的长度不能超过__40_____个字符。

21.以下过程不属于Sub过程的是___A__。

A.编译过程

B.Sub通用过程

C.proper属性过程

D.Event事件过程

22.编写如下事件过程：

Private Sub Form_MouseDown(Button As Integer ,Shift As Integer,X As Single,Y As Single)

If Shift=6 And Button=2 Then

Print "Hello"

End If

End Sub

程序运行后，为了在窗体上输出"Hello"，应在窗体上执行以下_D_____操作。

A.同时按下Shift 键和鼠标左键

B.同时按下Shift 键和鼠标右键

C.同时按下Ctrl、Alt 键和鼠标左键

D.同时按下Ctrl、Alt 键和鼠标右键

23.下列叙述中，正确的是____B_____。

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

B.控件数组的每一个成员的Index属性值都必须不相同

C.控件数组的每一个成员都执行不同的事件过程

D.对已经建立的多个类型相同的控件，这些控件不能组成控件数组

24.表达式x=Sqr(a^2-5)的类型是A_________。

A.算术表达式

B.逻辑表达式

C.关系表达式

D.字符表达式

25.以下不属于Visual Basic系统的文件类型是C A..frm B..cls C..bat D..vbp

26.以下面__A___那种方式打开的文件，只能读不能写。

A.Input

B.Output

C.Random

D.Append

27.要在C盘当前文件夹下建立一个名为Sd.dat的顺序文件，应先使用__C___语句。

A.Open "Sd.dat" For Output As #1

B.Open "C：Sd.dat" For Input As #1

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

D.Open "Sd.dat" For Input As #1

28.在Visual Basic中按文件的访问方式不同，可以将文件分为__A_____。

A.顺序文件、随机文件和二进制文件

B.文本文件和数据文件

C.数据文件和可执行文件

D.ASCII文件和二进制文件

29.双击窗体的任何地方，可以打开的窗口是____A____

A.代码窗口??

B.属性窗口

C.工程管理窗口

D.以上3个选项都不对

30.若要将窗体隐藏起来，则实现的方法为__D_____。

A.Unload

B.Show

C.WindowsState

D.Hide

31.列关于属性设置的叙述错误的是______A_

A.一个控件具有什么属性是VB预先设计好的，用户不能改变

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

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

D.一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值?

32.能显示窗体的方法是____B__。

A.Visible

B.show

C.Hide

D.open

33.使窗体自动向下移动的语句是Move_A____。

A.Top=Top+100

B.Top+100

C.Left=Top+100

D.Top=Top-100

34.用户可通过_D_____模拟屏幕的小图象来布置应用程序运行后的位置。

A.窗体设计器

B.快捷菜单

C.立即窗口

D.窗体布局窗口

35以下可以构成语句的一项是___B____。

A.对象名.属性名

B.对象名.方法名

C.对象名.事件名

D.对象名.函数名

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

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

B.一个容器中的所有复选框一次只能有一个被选中

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

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

37.我们在一个窗体上建立两个文本框，名称分别为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"

38. ControlBox属性只适用于窗体，当窗体的__A____属性设置为0-None时，则ControlBox属性不起作用。

A.Borderstyle

B.Autoredraw

C.Windowstate

D.Enabled

39.文本框控件中将Text的内容全部显示为所定义的字符的属性项是A_______。

A.PasswordChar

B.需要编程来实现

C.Password

D.以上都不是

40.下列对象中没有焦点属性的是___B_____。

A.命令按钮控件

B.窗口控件

C.文本框控件

D.单选框控件

41.设在窗体上有两个命令按钮，其中一个命令按钮的名称为cmda，则另一个命令按钮的名称不能是__A_____

A.cmdc

B.cmdb

C.cmdA

https://www.wendangku.net/doc/8f10909968.html,mand1

42.若要使标签控件显示时，不覆盖其背景内容，应设置标签控件的____D____属性

A.BACKCOLOR

B.BORDERSTYLE

C.FORECOLOR

D.BACKSTYLE

43.下列事件中，命令按钮能响应的事件是_B____。

A.DblClick

B.Click

C.Scroll

D.Load

44.引用列表框的最后一项应使用_A_______

A.List1.List(List1.ListCount-1)

B.List1.List(List1.ListCount)

C.List1.List(ListCount)

D.List1.List(ListCount-1)

45.下列语句中正确的是A

A.a=inputbox("hello")

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

C.12label.caption=1234

D.txt1.text+txt2.text=txt3.text

46.下拉式组合框的Style属性值为__0___。

47.下列各组控件都具有Caption属性的是_C_____。

A.窗体、文本框

B.标签、定时器

C.窗体、标签

D.文本框、定时器

48.控件内的对齐方式由_A____属性决定。

A.Alignment

B.WordWrap

C.AutoSize

D.Style

49.若要获得滚动条的当前值，可访问的属性是_B_____。

A.Text

B.Value

C.Max

D.Min

50.可以用作其它控件容器的控件有____C____

A.窗体控件，列表控件，图像控件

B.窗体控件，文本框控件，框架控件

C.窗体控件，框架控件，图片框控件

D.窗体控件，标签控件，图片控件

第七章

1.通常，文本框的Setfocus方法不能使用在

B______事件中。

A.Form_click

B.Form_load

https://www.wendangku.net/doc/8f10909968.html,mand_click

https://www.wendangku.net/doc/8f10909968.html,bel_click

2.使图形能自动按控件大小而改变的控件是_ D

_____。

A.标签框

B.框架

C.图片框

D.图像框

3.____ C __属性决定了按Tab键时焦点在各个控

件之间移动的顺序。