VB程序习题(附答案解析)

VB简介

1、在以下有关对象属性的表达中，不正确的选项是。

A、一个对象的属性可分为外观、行为假设干类

B、不同属性可能具有不同的数据类型

C、•个对象的所有属性都可在属性窗口的列表中进展设置

D、属性窗口中的属性列表既可按字母排序也可按类别排序

2、VisualBasic中最根本的对象是，它是应用程序的基石，也是其他控件的容

器。

A、文本框

B、命令按钮

C、窗体

D、标签

3、有程序代码“Textl.Texi="VisMBasic””，其中的Textl、Text和“VisualBasic”分别代

表O

A、对象、值、属性

B、对象、方法、属性

C、对象、属性、值

D、属性、对象、值

4、用窗体的属性来设置窗体的标题。

A、Caption

B、Style

C^Text

D、Name

5、窗体上有一个文本框控件Textl,假设已存在三个整型变量a、b、c,且变量a的值为5,

变量b的值为7,变量c的值为12。以下的语句可以使文本框内显示的内容为:

5+7=12。

A、TextI.Text=a+b+c

B、Text1.Text="a+b=cn

C、TextI=a&&b&"="&c

D、Textl="a"&"+"&"b"&"="&"c"

6、如果在窗体上有命令按钮OK,在代码编辑窗口有与之对应的Cmd_Click0事件，那

么命令按钮的名称属性和Caption属性分别为o

A、OK、Cmd

Cmd、OK

C、CmdOKsOK

D、OK、CmdOK

7、窗体Forml的名称属性是frm,它的Load事件过程名为0

A、Form_Load

B、Forml_Load

C、frni_Load

D、MeLoad

8、以下有关对象属性的说法正确的选项是，

A、对象所有的属性都罗列在属性窗口列表中

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

C、不同对象的同名属性取值一定一样

D、对象的某些属性既可以在属性窗口中设置，也可以在程序代码中设置

9、一个对象可以执行的匆作与可被对象识别的动作分别被称为。

A、事件、方法

B、方法、事件

C、属性、方法

D、过程、事件

10、以下有关算法的表达中，是不正确的。

A、算法中执行的步骤可以无休止的执行下去

B、算法中的每一步操作必须含义明确

C、算法中的每一步操作都必须是可执行的

D、算法必须有输出

11、对象可以识别和响应的某些行为称为。

A、方法B、继承C、属性D、事件

12、如果设计时在属性窗口将命令按钮的属性设置为False,那么运行时按钮从

窗体上消失。

A、VisibleB、EnabledC、DisabledPictureD、Default

13、将文本框的属性设置为True时，文本框可以输入或显示多行文本。

A、MultiLineB、ScrollBarsC、TextD^Enabled

14、下面___________对象无Caption属性。

A、FormB、CommandButtonC、TextBoxD、Label

15、决定控件上文字的字体、字形、大小、效果的属性是。

A、TextB、CaptionC、（名称）D、Font

16、构造化程序设计有三种根本构造，不包括。

A、顺序构造B、模块构造C、选择构造D、循环构造

17、一个对象所能做的事情称为对象的。

A、方法B、继承C、属性D、封装

18、如果设计时在属性窗U将命令按钮的属性设置为False,那么运行时按钮不

能响应用户的鼠标事件。

A、VisibleB、EnabledC、DisabledPictureD、Default

19、当标签的标题内容太长，需要根据标题自动调整标签的大小时，应设置标签的

属性设置为Trueo

A、AuloSizeB、WordwrapC^VisibleD、Enabled

20、下面控件中，没有Caption属性的是。

A、复选框B、单项选择按钮C、组合框D、框架

21、任何控件都具有属性。

A、TextB、CaptionC、（名称）D、ForeColor

22、窗体上有多个控件，在Form_Aclivaie0事件过程中添加语句，就可以确

保每次运行程序时，都将光标定位在文本框Textl中

A、Textl.Text=""

B、Textl.SetFocus

C>Tcxtl.GctFocus

D、Textl.Visible=True

23、假设已把一个命令按钮的Default属性设置为True,那么下面可导致按钮的Click事件

过程被调用的操作是。

A、用鼠标右键单击此按钮

B、按键盘上的Esc键

C、按键盘上的回车键

D、用鼠标右键双击此按钮

24、如下选项中，不是VB提供的程序控制构造。

A、顺序构造B、选择构造C、重生构造D、树型构造

程序代码根底

-b+y/h2-4ac

1、数学表达式2。对应的VisualBasic表达式为。

AN-b+Sqr(b*b-4*a*c)/2*a

13、-b+Sqr(b*b-4*a*c)/(2*a)

C、(-b+Sqr(b*b-4*a*c))/2*a

D、(-b+Sqr(b*b-4*a*c))/(2*a)

2、VisualBasic中可以同时删除字符串前导和尾部空格的函数是。

A、Ltrim

B、Rtrim

C、Trim

D、Mid

3、设A=7,B=4,C=6,那么表达式AMod3+B”/C\5的值为。

A、出错

B、3

C、2

D、1

4、在Form,Click事件中执行如下语句的结果是。

PrintFormat(1236.54,"+##,##().()%")

A、123456

B、+123,654.0%

C、+123,6.54%

D、+123,654

5、语句Print"5*20"的输出结果是。

A、”5*20”

B、出现错误信息

C、5*20

D、100

6、窗体上放置了三个文本框，假设在Textl中输入123,在Text2中输入78,在程序中执行

了语句Tcxt3=Textl+Text2后，那么在Tcxt3中显示。

A、434B、12378C、溢出D、语法错误

7、表达式Val("abcdfgl23M234")的值为。

A、789B、1234C、0D、表达式错

8、假设变量BOOL是一个布尔型变量，那么以下赋值语句中，正确的选项是。

A、BOOL='TRUE'

B、BOOL=.TRUE.

C、BOOL=#TRUE#

D、BOOL=True

9、函数Cint、Int、Fix都返回整数值，以下能正确地描述它们返回整数值大小关系的是

A、CInt(-5.59)=Int(-5.59)<Fix(-5.59)

B、Int(-5.59)<CInt(-5.59)<Fix(-5.59)

C、CInt(-5.59)<Fix(-5.59)<Int(-5.59)

D、Int(-5.59)<Fix(-5.59]=CInt(-5.59)

10、表达式Int(91*Rnd+20)的最大值是。

A、10B、90C、99D、110

11、能正确返回正整数N的数据位数的语句是o

A、Len(N)B、Len(Str(N))C、Len(CStr(N))D、Len(Val(N))

12、如下四个符号，可以作为VB合法变量名的是。

A、5_fB、_5flgC、User%sD、N1

13、以下表达式中运算结果为True的是。

A>"ABCRG">="abcde”

B、Int(134.69)<CInt(134.69)

C、78.9/35.77v=97.5,43、87And-45.4>-4.98

D、Str(32.345)=CStr(32.345)

14、表达式6.5*5Mod28\8的值是。

A、OB、1C、2D、3

15、能正确描述条件“A、B之一为零但不得同时为零”的VB逻辑表达式足

A、A=0OrB=0

B、A*B=0AndA+B<>0

C、A*B=OOrA+BoO

D、A=0AndB=0

16、如下语句中，不能正常执行的是o

A、Print5+7=100

B、Print3245343+23233

C、Print3423/89

D、Print32765+3

17、假设变量Lng为长整形变量，下面不能正常执行的语句是o

A、Lng=16384*2

B、Lng=4*0.5*16384

C、Lng=i90A2

D、Lng=32768*2

18、设a="VisualBasic",下面使b的值为“Basic"的语句是。

A、b=Lefl(a,8J2)

B、b=Mid(a,8,5)

C、b=Right(a,5,5)

D、b=Left(a,8,5)

19、下面所列四组数据中，全部是正确的VB常数是-

A、327681、34D2"ABCDE"&O1767

B、3276123.561、2E-2#True#

C、&HABCEO2-O3-2OO2FalseD-3

D、ABCDE#O2-O2-2OO2#E-2#True#

20、表达式Ini(5*Rnd+IO)的最小值是。

A、9B、10C、11D、12

21、将数学表达式cos2(a+b)+5c2是写成Vb表达式的正确形式是。

A、Cos(a+b)A2+5*Exp(2)

B、CosA2(a+b)+5*Exp(2)

C、Cos(a+b)A2+5*eA2

D、C0sA2(a+b)+5*Ln(2)

22、假设变量myd为日期时间型变量，下面不能正常执行的语句是

A、myd=12:23:30

B、myd=#10/22/20213:30:32PM#-1

C、myd=#10/22/20213:30:32PM#

D、myd=#10/22/20213:30:32PM#+1

23、数学表达式^^对应的正确VisualBasic表达式为__________。

a+b

A、a-b/a+b

B、a-b/(a+b)

C、(a-b)/a+b

D、(a-b)/(a+b)

24、设Mysl,Mys2均为字符串型变量，Mysl:"VisualBasic",Mys2="b”,那么卜面关系表达式

中结果为True的是。

A、Lcn(Mysl)<>2*InStr(Mysl//)

B、Mid(Mysl,8,l)>Mys2

C、Chr(98)&Right(Mysl,4)=z/Basicz，

D^InStr(Left(Mysl,6)/a")+60>Asc(Ucase(Mys2))

25、设A=7.B=4,C=6,,那么表达式AMod3+B0/C\5的值为。

A、1B、2C、3D、出错

26、语句PrintFormat(12345.6,"+###,##0.00”)执行结果是。

A、12,345.6B、+12,345.60C、+#12,345.60D、+12,345.6

27、函数A5C(“A")的值65,那么函数ASC(“b")的值是__________。

A、65B、98C、78D、100

28、以下是字符串常量。

A、FalseB."abc"C.clef'D、#True#

29、以下不能作为VisualBasic变量名的是一___________0

A、2FaB、F2aC、Fa2D、Fa_2

30、设有以下定义语句：

Dimm,nasSingle,dlasDouble,d2assiring

那么变量in的类型是___________

A、单精度型B、双精度空C、字符串型D、可变类型

31、表达式5*2Mod25\2A2的值是O

A、\B、0C、6D、4

32、显示如下图输入框的Inputbox语句是___________O

A、a=lnpulBox（"应用例如“，“请输入“&"正整数［T）

B、a=InpulBox（"应用例如“，“请输入"&vbCrLf&"正整数"，T）

C、a=InputBox（"请输入“&“正整数“，"应用例如",T）

D、a=InputBox（"请输入”&vbCrLf&"正整数”,”应用例如［T）

33、以下是布尔型常量。

A、TrueB,"True"C、'True'D、#True#

34、如果将布尔常量值True赋值给一个整型变量，那么整型变量的值为

A、0B、-IC、TrueD、False

35、以下表达正确的选项是。

A、注释语句是执行语句，仅对程序的有关内容起注释作用

B、代码中参加注释语句的目的是提高程序的可读性

C、注释语句不可以放在续行符的后面

D、只能使用Rem关键字书写注释语句

36、下面__________不是字符串常量。

A、“你好“B、C."True"D、#False#

37、以下符号常量的声明中，是不合法的。

A、ConstaasSingle=l.1

D>ConstaasIntcgcr="12"

C、ConstaasDouble=Sin(l)

D、Consta="OK"

38、以下表达中不正确的选项是o

A、变量名的第一个字符必须是字母

B、变量名的长度不超过255个字符

C、变量名可以包含小数点或者内嵌的类型声明字符

D、变量名不能使用关键字

39.Int（100*Rnd。）产生的随机整数区间是

A、[0,99]B、[1,100]C、[0,100]D、[1,99]

40、函数Right(”Beijing”,4)的值是。

A、BeijB、jingC、eijiD、ijin

41>表达式Abs(-5)+LenJABCDE”)的值是。

A、5ABCDEB、-5ABCDEC、10D、0

42、设A、B、C表示三角形的三条边，表示条件“任意两边之和大于第三边”的布尔表达

式可以用表示，

A、A+B>COrA+C>BOrB+C>A

B、A+B<COrA+C<BOrB+C<A

C、A+B>CAndA+C>BAndB+C>A

D、A+B<CAndA+C<BAndB+C<A

43、在一个语句行内写多条语句时，语句之间应该用分隔。

A、逗号B、分号C、顿号D、冒号

44、下面是字符串常量。

A、mB、#01/01/99#C>"m"D、True

45、要强制显式声明变量，可在窗体模块或标准模块的通用声明段中参加语句。

A、OptionBase0

B、OptionExplicit

C、OptionBase1

D、Optioncompare

46、产生［10,37］之间的随孔整数的VB表达式是

A、Int(Rnd*27)+10

B、Int(Rnd*28)+10

C、Int(Rnd*27)+11

D、Int(Rnd*28)+11

47、有以下定义语句：

Dimmax,minAsInteger

那么变量max的类型是

A、可变类型B、单精度型C、整型D、长整型

48、函数Left（"howareyou1',3）的值是。

A、howB、areC、youD、howareyou

49、函数Mid（"shanghai",6,3）的值是。

A、shanghB、shaC、anghD、hai

50、可表示“两个变量A和B之一为0,但不能同时为0〃的表达式是—

A、A=0AndB<>0

B、A*D=0AndA<>B

C、A<>0AndB=0

D、A<>0AndB=0AndA=0AndB<>0

51、在VB代码编辑器中，用来表示续行的是。

A、一个空格加一个下划字符（一）

B、一个下划字符（一）

C、直接回车

D、一个空格加一个连字符（-）

52、如果将布尔常量值False赋值给一个整型变量，那么整型变量的值为一

A、0B.—IC、TrueD、False

选择构造程序设计

1、以下语句正确的选项是0

A、Ifx<4*yAndx>yTheny=x4

B、Ifx<4*yAndx>yTheny=xA4

C、Ifx<4*y:x>yTheny=xA4

D、Ifx<4*yAndx>yTheny=x**4

2、分析以下语句，给出执行结果

PrivateSubForrn_Click()

ConstpiAsSingle=3.14

a%=7

IfaMod4>piThenPrint”努力"ElsePrint”学习”

EndSub

执行结果为，其判决条件的值为。

A、努力TRUE

B、学习False

C、努力False

D、学习TRUE

3、针对语句1门=1ThenJ=1,以下说法正确是。

A、1=1和J=1均为赋值语句

B、1=1、J=1均为关系表达式

C.1=1为关系表达式，J=1为赋值语句

D.1=1为赋值语句，J=I为关系表达式

4、如果X的值大于或等于Y的平方，那么打印“0K”,表示这个功能的单行格式If语句

是。

A、Ifx>=yA2ThenPrintOK

B、Ifx>=y2ThenPrint"OK"

C、Ifx>=yA2ThenPrint"OK"

D、Ifx>=yA2ThenPrint”OK"EndIf

5、语句X=X+1的正确含义是__________o

A、变量X的值与X+l的值相等

B、将变量X的值存到X+l中去

C、将变量X的值加1后赋给变量X

D、变量X的值为1

6、以下程序段可以实现X、Y变量值的交换。

A、Y=X:X=Y

B、Z=X:Y=Z:X=Y

C、Z=X:X=Y:Y=Z

D、Z=X:W=Y:Y=Z:X=Y

7、以下语句正确的选项是o

A、IfABThenT=AA=BB=T

B、IfA>BThenT=A;A=B;B=T

C、IfA>=BThenT=AA=BB=T

D、IfA>=BThenT=A:A=B:B=T

8、关于语句Ifx=1Theny=1,以下说法正确的选项是__________。

A、x=1和y=I均为赋值语句

B、x=1和y=1均为关系表达式

C、x=l为关系表达式，y=l为赋值语句

D>x=1为赋值语句，y=l为关系表达式

9、以下说法中正确的选项是。

A、语句Texll.Text;x的含义是将变量x的值显示于文本框Textl中

B、语句Textl.Text=x的含义是将文本框Tex”中的内容赋值给变量x

C、语句Texll.Texl=x的含义是将文本框Textl中的内容转换为数值型后赋值给变量x

D、以上说法都是错误的

10、以下语句正确的选项是__________。

A、Ifx<3*yAndx>yTheny=xA3

B、Ifx<3*yAndx>yTheny=x3

C、Ifx<3*y：x>yTheny=xA3

D、Ifx<3*yAndx>yTheny=x**3

11、如果X的值小于或等于Y的平方，那么打印“OK〃，表示这个功能的单行If语句是

A、Ifx<=y2ThenPrint"OK"

B、Ifx<=yA2ThenPrint"OK"

C、Ifx<=yA2Then"OK"

D、Ifx<=yA2Print"OK"

循环构造程序设计

1、在程序中有语句Fori=nlTon2Stepn3,那么在循环体中有以下语句会影响

循环执行的次数。

A、nl=nl+1

B、n2=n2+n3

C、n3=2*n3

D、i=i+n3

2、循环构造ForI=1to15step2的执行次数是。

A、6B、7C、8Ds9

3、以下循环构造中，窗体上打印出来的循环变量i的值为。

sum=0

Fori=1To100

sum=sum+i

Nexti

Printi；sum

A、1B、2C、100D、101

4、以下循环构造中，循环体x=x+k的执行次数为。

x=0

Fork=1To10Step2

x=x+k

Nextk

printk；x

A、0B、1C、5D^10

5、以下循环语句中在任何情况卜都至少执行一次循环体的是,

A、DoWhilev条件〉B、Whilev条件〉

循环体循环体

LoopWend

C、DoD、DoUntilv条件〉

循环体循环体

LoopUntilv条件〉

6、在窗体上网一个名称为Command1的命令按钮，并编写以卜程序：

PrivateSubCommandl_Click()

Dinin%,b,t

t=l:b=l:n=2

Do

b=b*n

t=t+b

n=n+1

LoopUntiln>9

Printt

EndSub

此程序计算并输出一个表达式的值，该表达式是

A、9!

B、10!

C、1!+2!+…+9!

D、1!+2!+…+10!

数组

1、某过程的说明语句中，正确的数组说明语句是O

ConstnAsInteger=3

DimLAsInteger

①Dimx(L)AsInteger

②Dima(k)AsInteger

ConstkAsInteger=3

③Dimb(n)AsInteger

④Dimy(2000(o2021)asInteger

A、①②④

B、①③④

C、③④

D、②③

2、以下有关数组的说法中，错误的选项是。

A、数组必须先定义后使用

B、数组形参可以是定长字符串类型

C、Erase语句的作用是对已定义数组的值重新初始化

D、定义数组时，数组维界值可以不是整数

3、在窗体的通用声明处有语句“Dima。AsSingle",以下在某事件过程中重定义此数组的

一组正确语句是。

A、ReDima(3,3)

ReDirna(4,4)AsInteger

B、ReDima(3,3)

ReDimpreservea(4,4)

C、ReDima(3)

ReDima(3,3)asInteger

D、ReDima(3,3)

ReDinipreservea(3,4)

4、以下是VisualBasic合法的数组元素表示法。

A、x_9B、x[9]C、x{9}D、x(9)

5、下面的数组声明语句中是正确的。

A、Dima[3,4]AsIntegerB、Dima(3,4)AsInteger

C、Dima(3;4)AsIntegerD、Dima(3:4)AsInteger

6、设有数组声明语句：

OptionBase1

Dimb(-lToI,2)AsInteger

那么数组b中共有个元素。

A、2B、4C、6D、9

7、使用语句Dima(lTo15)AsString声明数组a之后，以下说法正确的选项是。

A、A数组中的所有元素值为0

B、A数组中的所有元素值不确定

C、A数组中的所有元素值为空串

D、A数组中的所有元素值为True

8、关于RcDim语句，以下说法错误的选项是0

A、ReDim语句可以改变数组的维数

B、ReDim语句既可以在过程中使用，也可以在模块的通用声明处使用

C、ReDim语句可保存动态数组中原有的内容

D、在ReDim语句中，可使用变量说明动态数组的大小

9、设有数组声明语句：

OptionBase1

Dima(-1To2,8)AsLong

那么，函数LBound(a,2)的值为。

A、0B、-1C、1D、2

10、以下关于控件数组的说法错误的选项是。

A、控件数组由一组具有共同名称和一样类型的控件组成

B、控件数组中的每一个控件共享同样的事件过程

C、控件数组中的每个元素的下标由控件的Index属性指定

D、同一控件数组中的元素只能有一样的属性值

11、设有命令按钮Commandl单击事件过程，代码如下；

PrivateSubCommandl_Click()

Dima(30)AsInteger

Fori=lTo30

a(i)=Int(Rnd*IOO)

Next

ForEacharrltcmIna

IfaiTltemMod7=0ThenPrintarrltem；

IfarrItem>90ThenExitFor

Next

EndSub

对于该事件过程，以下表达中错误的选项是___________。

A、a数组中的数据是30个100以内的整数

B、语句ForEacharrltemIna有语法错误

C>IfarrltemMod7=0……语句的功能是输出数组中能够被7整除的数

D、IfarrItem>90……语句的作用是当数组元素的值大于90时退出For循环

12^有以下程序:

OptionBase1

Dima()AsInteger

PrivateSubFonn_Click()

DimiAsInteger,jAsInteger

ReDima(3,2)

Fori=1To3

Forj=1To2

a(i,j)=i*2+j

Nextj

Nexti

RcDimPreservea(3,4)

Forj=3To4

a(3,j)=j+9

Nextj

Printa(3,2);a(3,4)

EndSub

程序运行后，单击窗体，输出结果是o

A、813B、013C、712D、00

13、下面的数组声明语句中是正确的。

A、Dima[3,4]asInteger

B、Dima(3,4)AsInteger

C、Dima[3;4]asInteger

D、Dima(3:4)asInteger

14、设有数组声明语句：

OptionBaseI

DimA(2)AsInteger

那么数组A的下界为o

A、0B、IC、2D、不能确定

15、以下说法不正确的选项是o

A、使用ReDim语句可以改变动态数组的维数

B、假设用Dim语句定义了动态数组的类型，可以用ReDim更改为其它类型

C、使用ReDim语句可以改变动态数组每一维的大小

D、使用ReDim语句可以对动态数组中的所有元素进概初始化

16、用Array函数给某X赋值时，X必须是・

A、已经声明的静态数组

B、已经声明的动态数组

C、Variant类型的变量

D、整型变量

17、设有数组声明语句：

OptionBase1

DimA(-lTo2)AsLong

那么函数UBound(A)的值为。

A、0B、-1C、1D、2

18、设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法中错

误的选项是o

A、命令按钮的Caption属性都是CommandI

B、在代码中访问任意一个命令按钮只需使用名称Command1

C、命令按钮的大小都一样

D、命令按钮共享一样的事件过程

19、在窗体上画1个命令按钮，并编写如下事件过程：

PrivateSubCommandlClick()

Dima(3,3)

Form=1To3

Forn=lTo3

Ifn=mOrn=4-niThen

a(m,n)=m+n

Else

a(m,n)=0

EndIf

Printa(m,n);

Nextn

Print

Nextm

EndSub

运行程序，单击命令按钮，窗体上显示的内容为

200204230200

040040340045

A、°°6B406C、006D、056

20、以下程序段的执行结果为________。

DimA(3)

Fori=1To3

A(i)=i*i

Nexti

PrintA(i-1)

A、16B、9C、4D、1

21、以下__________一是VB中合法的数组元素表示法。

A、X9B、X[9JC、X{9}D、X(9)

22、设有数组声明语句：

OptionBase1

DimA(-1to2)AsInteger

那么数组A中共有_一个元素O

A、2B、3C、4D、不能确定

23、使用语句DimA(1To15)AsInteger声明数组A之后，下面说法中正确的选项是

A、数组中所有元素的值为0

B、数组中所有元素的值不确定

C、数组中所有元素的值为空串

D、以上说法均不对

24、在以下语句中，a只能是__________。

DimX(15)

ForEachaInX

Printa;

Nexta

A、已经声明的静态数组B、已经声明的动态数组

C、Variant类型的变量D、整型变量

25、设有数组声明语句：

OptionBase1

DimA⑵AsLong

那么函数LBound(A)的值为o

A、0B、-1C、1D、2

26、在窗体上用复制、粘贴的方法建立了一个命令按钮数组，数组名为Ml。设窗体Forml

标题为“myforml",双击控件数组中的第三个按钮，翻开代码编辑器，写如下代码：

PrivateSubMl_Click(IndexAsInteger)

Form1.Caption="myform2"

EndSub

运行时单击按钮数组中的第一个按钮，那么窗体显示标题为。

A、FormIB、MlC、myform1D^myform2

27、在窗体上画一个名为Command1的命令按钮，然后编写如下代码：

OptionBase1

PrivateSubCommandI_Click()

Dima,sAsInteger

a=Array(1,2,3,4)

j=1

Fori=4ToIStep-1

s=s+a(i)*j

j=j*10

Nexti

Prints

EndSub

运行上面的程序，其输出结果是O

A、1234B、12C、34D、4321

28、窗体上有Command1>Command2两个命令按钮。现编写以下程序：

OptionBase0

Dima()AsInteger,mAsInteger

PrivateSubCommandl_Click()

m=InpulBox("请输入一个正整数”)

ReDima(m)

EndSub

PrivateSubCommand2_Click()

m=InputBox("请输入一个正整数”)

ReDima(m)

EndSub

运行程序时，单击Command)后输入整数1(),再单击Command2后输入整数5,那么数

组a中元素的个数是o

A、5B、6C、10D、11

29、下面有关数组的说法中，错误的选项是0

A、一般而言，数组必须先定义后使用

B、数组的下界必须从0开场

C、Erase语句的作用是对已定义固定大小数组的值重新初始化

D、定义数组时，数组维界值可以不是整数

30、下面有关数组处理的表达中，不正确的选项是o

A、过程中用RcDim语句重定义动态数组时，其下标的上下界可为赋了值的变量

B、在过程中，可以使用Dim、Private和Static语句定义数组

C、用RcDim语句重新定义动态数组时，不得改变该数组的数据类型

D、在ReDim语句中使用Preserve语句时，只能改变数组最后一维的维上界

过程

1、以下说法中正确的选项是O

A、在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名，但其

作用域只限于该过程

B、在窗体的Form_Load密件过程中定义的变量是全局变量

C、局部变量的作用域可以超出所定义的过程

D、在调用过程时，所有局部变量被系统初始化为0或空字符串

2、下有关参数的说法中，错误的选项是o

A、过程的形参不可以是定长字符串类型的变量

B、按地址传递参数，形参和实参的类型可以不同

C、按值传递参数，形参和实参的类型可以不同，只要相容即可

D、按地址传递参数，形参和实参也能以按值传递方式进展形实结合

3、VisualBasic中系统默认的参数传递方式是。

A、按值

B、按地址

C、byval

D、按形参

4、在VisualBasic中，以下关于过程的定义说法正确的选项是。

A、过程可以嵌套定义也可以嵌套调用

B、过程可以嵌套定义但不可以嵌套调用

C、过程不可以嵌套定义但可以嵌套调用

D、过程不可以嵌套定义也不可以嵌套调用

5、假设在应用程序中用“PrivateSubsubl(xAsInteger,yAsSingle)”定义了子程序subl,调

用程序中的变量i,j均为Integer型，那么正确调用子程序subl的是。

©Callsubl(i,j)②Callsubl(3.1415,i)

③Callsubl(3.14,234)®Callsubl(“245”,"231.5”)

A、①③

B、③④

C、①②③

D、无

6、调用由语句PrivateSubconvert(yAsInteger)定义的Sub过程时，以下不是按值传递的语

句是。

A、Callconvert((x))

Callconvert(x*1)

C、convert(x)

D、convertx

7、在VisualBasic中，全局变量的定义方式是。

A、Dim

B、Static

C、Private

D、Public

8、在过程中定义的变量，假设希望在离开过程后，还能保存过程中该变量的值，那么应该

使用关键字在过程中定义该局部变量。

A、Dim

B、Static

C、Private

D、Public

9、可以在__________中，使用PublicpubstrasString*20定义一个定长字符串。

A、窗体模块

B、标准模块

C、类模块

D、三者均可

10、假设在应用程序的标准模块、窗体模块和过程Subl的说明局部，分别用"PublicGAs

Integer"、"PrivateGAsInteger”和"DimGAsInteger"语句说明了三个同名变量G。如果

在过程Subl中使用赋值语句“G=3596",那么该语句是给在说明局部定义的变

量G赋值。

A、标准模块

B、过程Subl

C、窗体模块

D、标准模块、窗体模块和过程Subl

II、多窗体程序由多个窗体组成。在缺省情况下，VisualBasic在执行应用程序时，总是把

指定为启动窗体。

A、不包含任何控件的窗体

B、设计时的第一个窗体

C、命名为Frml的窗体

D、包含控件最多的窗体

12、在窗体模块的通用声明段中声明变量时，不能使用关键字。

A、DimB>StaticC^PrivateD、Public

13、下面的过程定义语句中合法的是o

A、Subprocl(Byvaln()jB、SubprocI(n)AsInteger

C、Functionprod(prod)D、Functionprocl(Byvaln)

14、Sub过程与Function过程最根本的区别是。

A、两种过程参数的传递方式不同

B、Sub过程可以使用Call语句或直接使用过程名调用，而Function不可以

C、Sub过程的过程名不能返回值，而Funciion过程能通过过程名返回值

D、Function过程可以有参数，Sub过程不可以

15、在过程调用中，参数的传递可以分为两种方式。

A、按值传递和按地址传递B、按值传递和按参数传递

C、按地址传递和按参数传递D、按参数传递和按位置传递

16、要想在过程调用后返回两个结果，下面的过程定义语句中正确的选项是o

A、Subproc1(ByVain,ByVaim)B、Subproc1(ByVain,m)

C、Subproc1(n,ByVaiin)D、Subproci(n,m)

17、通用过程可以通过执行“工具〃菜单中的命令来建立。

A、添加过程B、通用过程C、添加窗体D、添加模块

18、假设已定义了一个私有通用过程PrivateSubSubl(aAsSingle,bAsSingle),那么以下调

用语句中错误的选项是O

A、Subl12,12BNCallSublx»y

C、CallSubl(2*x,sin(I))D、subl12,x

19、在过程调用中，参数的传递可以分为按值传递和两种方式。

A、按数组传递B、按参数传递C、按地址传递D、按索引传递

20、在参数传递过程中，使用关键字来修饰参数，可以使之按值传递。

A、ByVaiB、ByRefC、ValueD、Reference

21、下面有关标准模块的表达中，错误的选项是o

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

B、标准模块中的Private过程不能被工程中的其他模块调用

C、标准模块的文件扩展名为.bas

D、标准模块中的全局变量可以被工程中的任何模块引用

22、下面的过程定义语句合法的是。

A、Subproc1(ByVain())B、Subprocl(n)AsInteger

C、Functionproc1(procI)D、Functionproc1(ByVain)

23、在过程调用中，参数的传递可以分为按地址传递和两种方式。

A、按数组传递B、按参数传递C、按值传递D、按位置传递

24、在参数传递过程中，使用大键字来修饰参数，可以使之按地址传递。

A、ByVaiB、ByRefC、ValueD、Reference

25、Sub过程与Function过程最根本的区别是__________。

A、Sub过程可以使用Call语句调用,而Function过程不可以

B、Function过程可以有参数，而Sub过程不可以

C、两种过程的参数传递方式不同

D、Sub过程的过程名不能返回值，而Function过程能通过过程名返回值

26、标准模块中有如下程序代码：

PublicxAsInteger,YAsInteger

Subvar_pub()

x=10:y=20

EndSub

在窗体上有1个命令按钮，并有如下事件过程：

PrivateSubCommandi_Click()

DimxAsInteger

Callvar_pub

x=x+100

y=y+100

Printx;y

EndSub

运行程序后单击命令按钮，窗体上显示的是0

A、100100B、100120C、110100D、110120

27、在窗体上有1个命令按钮，并有如下事件过程：

SubS()

X=1

Y=2

Z=X+Y

PrintX,Y,Z

EndSub

PrivateSubCommandl_Click()

X=2

Y=3

Z=X+Y

CallS

PrintX,Y,Z

EndSub

运行程序后单击命令按钮，窗体上显示的第二行是O

A、123B>235C、233D、125

常用控件

1、以下属性是每个控件都具有的。

A、Name

B、Caption

C、Font

D、Interval

2、单项选择按钮用于一组互斥的选项中，假设一个应用程序中包含多组互斥条件，可使用

控件对单项选择按钮进展分组。

A、框架控件或图像控件

B、组合框或图像控件

C、组合框或图片框

D、框架控件或图片框

3、以下所列的8个控件中，具有Caption属性的有个。

CheckBox（复选框）、ComboBox（组合框）、HscrollBar（水平滚动条）、DirListBox（文件

夹列表框）、Image（图像框）、Frame（框架）、Label（标签）、Line（线条）

A、5

B、4

C、3

D、2

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

A、Print

Additem

C、Clear

D、Rcmoveltcm

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

A、Caption

B、Value

C、Checked

D、Selected

6、以下使用方法的语句中，正确的选项是。

ANList1.Clear

B、Form!.Clear

C、Combo1.Cis

D、Picture1.Clear

7、VisualBasic中除窗体能显示图片外，下面列出的控件中可以显示图片的控件有

__________个。

PictureBoxsImage、TextBox、CommandButton^OptionButton>Label

A、2

B、3

C、4

D、5

8、能够区分各鼠标按钮与【Shift】、【Ctrl】、【Ak】键的事件过程是。

A、Click

B、Keypress