VB试题库.docx

VB试题库.docx

《VB试题库.docx》由会员分享，可在线阅读，更多相关《VB试题库.docx（124页珍藏版）》请在冰豆网上搜索。

VB试题库

1、求一个三位正数N的十位数的正确方法是___C___。

A、lnt（N/10）-lnt（N/100）

B、N-lnt（N-1000）*100

C、n\10Mod10

D、lnt（N/10）-lnt（N/10）*10

2、表达式（-1）*Sgn（-100+Int（Rnd*100））的值是___A___。

A、1

B、0

C、-1

D、随机

3、在程序中分别将变量IntA、Bl、st和D定义为整型、布尔型、字符串型和日期型，下列赋值语句在执行时会出错的是_A___。

A、Bl=#True#

B、st=""

C、D=#10/05/01#

D、Inta=4.6

4、图像框有一个属性，可以自动调整图形的大小，以适应图像框的尺寸，这个属性是__B______。

A、Appearance

B、Stretch

C、Autoredraw

D、Autosize

5、使用___C____方法可将新的列表项添加到一个列表框中。

A、Clear

B、AddItem

C、Print

D、RemoveItem

6、下列____B____不是列表框的方法。

A、Clear

B、AddItem

C、Print

D、RemoveItem

7、执行下列程序段，输出结果为____B______。

Dima（10）AsInteger

DimiAsInteger

Fori=1To10

a（i）=2*i-1

Nexti

Printa（4）;

Erasea

Printa（4）

A、出错

B、70

C、44

D、77

9、执行下列程序段，输出结果为_____B_____。

Dima（）AsInteger

DimiAsInteger

ReDima（10）

Fori=1To10

a（i）=2*i-1

Nexti

Printa（4）;

Erasea

Printa（4）

A、70

B、出错

C、77

D、44

10、执行下面的程序，输出结果是_____A______。

OptionExplicit

PrivateSubForm_Click（）

DimMAsInteger,NAsInteger

M=1:

N=2

PrintM+N+F（M,N）

M=2:

N=1

PrintF（M,N）+F（M,N）;

EndSub

PrivateFunctionF（XAsInteger,YAsInteger）

X=X+Y

Y=X+3

F=X+Y

EndFunction

A、1830

B、918

C、718

D、49

11、窗体的Name属性为Frm1，在窗体模块通用声明处和过程Sub1中分别用PublicKAsInteger,DimKAsInteger声明了两个同名变量K，则在过程Sub1中要访问全局变量K，可采用________C___。

A、Form1.K

B、Form.K

C、Frm1.k

D、K

12、一个工程中含有窗体Form1.Form2和标准模块Model1，如果在Form1中有语句

PublicXAsInteger

在Model1中有语句

PublicYAsInteger

则以下叙述中正确的是B

A、变量X.Y的作用域相同

B、在From1中可以直接使用X

C、Y的作用域是Model1

D、在Form2中可以直接使用X和Y

13、VB是一种面向___C_____的程序设计语言。

A、过程

B、用户

C、对象

D、方法

14、以下叙述中错误的是___D_____。

A、事件可以由用户引发，也可以由系统引发

B、打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件

C、保存VisualBasic程序时，应分别保存窗体文件及工程文件

D、VisualBasic应用程序只能以解释方式执行

15、VB是用于开发____A__环境下的应用程序的工具。

A、Windows

B、DOS

C、DOS和Windows

D、UNIX

16、为了建立一个随机文件，其中每一条记录由多个不同数据类型的数据项组成，应使用____C_______。

A、字符串类型

B、数组

C、记录类型

D、变体类型

17、下面关于随机文件的描述不正确的是___A________。

A、一个文件中记录号不必唯一

B、每条记录的长度必须相同

C、可通过编程对文件中的某条记录方便地修改

D、文件的组织结构比顺序文件复杂

18、以下关于文件的叙述中，错误的是_____B______。

A、顺序文件中的记录一个接一个地顺序存放

B、随机文件中记录的长度是随机的

C、LOF函数返回给文件分配的字节数

D、执行打开文件的命令后，自动生成一个文件指针

20、执行以下语句后，a的值为___C_____。

DimaAsInteger

a=1

Do

a=a+2

LoopUntila=100

A、101

B、100

C、溢出

D、99

22、在窗体上画一个命令按钮和一个文本框，其名称分别为Command1和Text1，把文本框的Text属性设置为空白，然后编写如下事件过程：

PrivateSubCommand1_Click（）

A=Inputbox（"EnterAnInteger"）

B=Inputbox（"EnterAnInteger"）

Text1.Text=B+A

EndSub

程序运行后，单击命令按钮，如果在输入对话框中分别输入4和56，则文本框中显示的内容是____C___。

A、出错

B、60

C、564

D、456

23、执行语句：

A=Inputbox（"Today","Tomorrow","Yesterday"）

将显示一个输入对话框，在对话框的输入区中显示的信息是____C__。

A、Tomorrow

B、Today

C、Yesterday

26、下列程序段的执行结果是___A____。

X=2

Y=1

IfX*Y<1ThenY=Y-1ElseY=-1

PrintY-X>0

A、False

B、True

C、-1

D、1

27、在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：

PrivateSubCommand1_Click（）

N=Text1.Text

SelectCaseN

Case1To20

X=10

Case2,4,6

X=20

CaseIs<10

X=30

Case10

X=40

EndSelect

Text2.Text=X

EndSub

程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是D____。

A、20

B、30

C、40

D、10

28、设在菜单编辑器中定义了一个菜单项，名为Menu1。

为了在运行时隐藏该菜单项，应使用的语句是___A_____。

A、Menu1.Visible=False

B、Munu1.Enabled=False

C、Menu1.Visible=True

D、Menu1.Enabled=True

29、以下使用方法的代码中，正确的是__D____。

A、Form1.Clear

B、Combo1.Cls

C、Label1.SetFocus

D、Text1.SetFocus

30、设有一个命令按钮，若要实现按回车键等同按此键，应设置其__D_______。

A、Default属性设为False

B、Cancel属性设为True

C、Cancel属性设为False

D、Default属性设为True

32、在用通用对话框控件建立"打开"或"保存"文件对话框时，如果需要指定文件列表框所列出的文件类型是文本文件（即.txt文件），则正确的描述格式是__A__。

A、"文本文件（.txt）|*.txt"

B、"text（.txt）"|（*.txt）

C、"text（.txt）||（*.txt）"

D、"text（.txt）（*.txt）"

33、在以下4个逻辑表达式中，其逻辑值为"真"的是__B____。

A、not（3+4<4+6）

B、not（1>2）

C、1>2or2>3

D、2>1and3<2

34、设A="12345678"，则表达式Val（Left（A,4）+Mid（A,4,2））的值为___A___。

A、123445

B、123456

C、8

D、6

35、以下能够触发文本框Change事件的操作是__C______。

A、文本框获得焦点

B、设置文本框的焦点

C、改变文本框的内容

D、文本框失去焦点

36、VB中可以使用自己定义的Sub过程和Function过程，______D_____过程称为函数，这种过程可以返回值。

A、通用

B、属性

C、事件

D、Function

37、下面程序段的运行结果为_C_______。

DimsAsInteger,iAsInteger

i=1:

s=1

Do

i=i+s

LoopUntils>10

Printi,s

A、111

B、1110

C、溢出

D、101

38、以下关于窗体的描述中，错误的是____B____。

A、窗体的Height、Width属性用于设置窗体的高和宽

B、执行UnloadForm1语句后，窗体Form1消失，但仍在内存中

C、窗体的Load事件在加载窗体时发生

D、当窗体的Enabled属性为False时，通过鼠标和键盘对窗体的操作都被禁止

39、以下叙述中错误的是____B___。

A、下拉式菜单和弹出式菜单都用菜单编辑器建立

B、如果把一个菜单项的Enabled属性设置为False，则该菜单项不可见

C、除分隔线外，所有菜单项都能接收Click事件

D、在多窗体程序中，每个窗体都可以建立自己的菜单系统

40、在程序中可以通过复选框和单选按钮的____A___属性值来判断它们的当前状态它。

A、Value

B、Caption

C、Checked

D、Selected

42、运行如下程序后，输出结果为______。

DimiAsInteger,yAsInteger

Fori=3To15Step3

y=y+i

i=i+3

Nexti

Printi;y

答案：

2127

43、如果依次输入75,55,45,70,30,25,40,15,20,5,下列程序段的执行结果为______。

DimcAsInteger,kAsInteger,dAsInteger

c=70

Fork=11To20

x=InputBox（"输入X的数值:

"）

Ifx

d=d+x:

c=x

Else

d=d+c

EndIf

Nextk

Printd