2019VisualBasic程序设计期末测试题库200题（含答案）

2019年VisualBasic程序设计期末测试复习题200题

［含答案］

一、选择题

1.若要将窗体隐藏起来，则实现的方法为O

a)Unload

b)Show

c)WindowsState

d)Hide答案：D

2.在VB中，过程共有三种，他们是。

a)事件过程，子过程和函数过程。

b)sub过程，Function过程和Property过程。

c)事件过程，函数过程和属性过程。

d)Sub过程，函数过程和通用过程。答案：A

3.整型变量占用的字节数为»

a)2个字节

b)3个字节

c)4个字节

d)5个字节答案：A

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

a)@

b)$

c)%

d)#答案：D

5.下列选项中，为字符串常量的是。

a)6/12/2001

b)"6/12/2001"

c)#6,12,2001#

d)6,12,2001#答案：B

6.下列数据中哪一个是布尔常量。

a)123

b)not

c)TRUE

d)xyz答案：C

7.下列语句中正确的是

a)txt1.text+txt2.text=txt3.text

b)command1.name=cmdok

c)121abel.caption=1234

d)a=inputbox(hello)答案：D

8.下列控件不能改变大小的有。

a)TextBox

b)Label

c)Timer

d)PictureBox答案：C

9.可以通过来删除列表框中的选择项。

a)Enable属性

b)Removeitem方法

c)Additem方法

d)Text属性答案：B

10.若要使标签透明，则可使用的属性是

a)BackColor

b)BackStyle

c)BorderStyle

d)ForeColor答案：B

11.当复选框设置为图片风格时，下列属性可以在复选框被选中时显示图形。

a)DisabledPicture

b)DownPicture

c)Picture

d)Image答案：B

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

a)Caption

b)Value

c)Text

d)name答案：D

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

K=0

For1=1to10

Forj=lto100

K=K+1

Nextj

NextI

a)0

b)10

c)100

d)1000答案：D

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

a)for/next

b)while/wend

c)With/endwith

d)do/loop答案：C

15.下列控件中可自动设置滚动条的是o

a)复选框

b)框架

c)列表框

d)标签框答案：C

16.下列程序的运行结果为o

For1=1to3

d(D=2*M

?d(I)

NextI

a)135

b)246

c)146

d)567答案：A

17.下列语句可以将变量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答案：B

18.用于获得字符串S从第4各字符开始的4个字符的函数是

a)Mid(S,4,4)

b)Middle(S,4,4)

c)Midstr(S,4,4)

d)MiddleStr(SA4)答案：A

19.以下选项中，是VisualBasic控件的是。

a)文本框

b)Print

c)Click

d)Debug答案：A

20.窗体能响应的事件是o

a)ActiveFrom

b)Drive

c)Load

d)Change答案：C

21.单精度浮点数占用的字节数为o

a)2个字节

b)3个字节

c)4个字节

d)8个字节答案：C

22.改变驱动器列表框的Drive属性值将激活事件。

a)Change

b)Scroll

c)KeyDown

d)KeyUp答案：A

23.不能触发滚动条Change事件的操作是。

a)拖动滚动块

b)单击两端箭头

c)单击滚动块

d)单击箭头与滚动块之间的滚动条答案：C

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

a)标签框

b)文本框

c)框架

d)命令按钮答案：B

25.单击滚动条两端的滚动箭头，将触发它的事件。

a)Scroll

b)SmallChangeorLangeChange

c)KeyDown

d)Change答案：D

26.要想改变一个窗体的标题内容，则应该设置属性的值。

a)Name

b)Fontname

c)Caption

d)Text答案：C

27.以下程序输出的结果为o

X=1

y=4

DoUntily>4

x=x*y

y=y+1

Loop

Printx

a)4

b)8

c)12

d)16答案：A

28.以下哪个是合法的变量名o

a)Len

b)Test@qw

c)6cost_l

d)count2s答案：D

29.以下程序段的输出结果是o

A=Sqr(3)

b=Sqr(2)

c=a>b

Printc

a)-1

b)0

c)False

d)Ture答案：D

30.一个可执行的vb运行程序至少包括一个o

a)标准模块

b)窗体模块

c)类模块

d)资源文件模块答案：B

31.如下数组声明语句，正确的是o

a)dima[3,4]asintiger

b)dima(3,4)asstring

c)dima(n,n)assingle

d)dima(34)asinteger答案：B

32.表达式25.26MOD6.98的值是。

a)1

b)5

c)4

d)提示错误信息答案：C

33.数组DimD(3,ITolO,1To15)共有元素。

a)100

b)600

c)30

d)450答案：B

34.设A="abcdefghijklm"，下面()的函数值为"jklm"°?

a)Mid(A,10,4)

b)Ringht(A,5)

c)Ringht(A,1,4)

d)Left(A,10,4)答案：A

35.在使用菜单编辑器设计菜单时，必须输入的项是—o

a)标题

b)名称

c)索引

d)快捷键答案：B

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

a)[0,99]

b)[1,100]

c)[0,100]

d)[1,99]答案：A

37.表达式2+3*4八5-SIN(X+l)/2中最先进行的运算是？

a)4八5

b)3*4

c)x+1

d)SIN答案：C

38.将任意一个正的两数N的个位数与十位数对换的表达式为

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

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

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

d)(N-7INT(N/10)*10)*10+INT(N/10)答案：A

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

a)0.01*int(x+0.05)

b)0.01*int(100*(x4-0.005))

c)0.01*int(100*(x+0.05))

d)0.0Pint(x+0.005)答案：B

40.设A、B、C表示三角形的3条边，表示条件“任意两边之和大于第三边”

的布尔表达式可以用()表示。

a)A+B>=COrA+C>=BOrB+C>=A

b)Not(A+B<=COrA+C<=BOrB+C<=A)

c)A+B>CAndA+C>BAndB+C>A

d)A+B>=CAndA+C>=BOrB+C>=A答案：B

41.下列各种窗体事件中，不能由用户触发的事件是()

a)Load事件和Unload事件

b)Click事件和Unload事件

c)Click事件和Dbclick事件

d)Load事件和Initialize事件答案：D

42.Rnd函数可能产生的()值

a)2

b)1

c)0.1234

d)1.00005答案：C

43.当事件能被触发时，()就会对该事件作出响应.

a)对象

b)程序

c)控件

d)窗体答案：A

44.双击窗体的任何地方，可以打开的窗口是()

a)代码窗口

b)属性窗口

c)工程管理窗口

d)以上3个选项都不对答案：A

45.下列哪项是窗体对象的方法而不是属性()

a)Name

b)Print

c)Caption

d)Enabled答案：B

46.除时钟外其它控件都没有的属性是

a)Top

b)Name

c)Visible

d)Interval答案：D

47.叹金丁口艮

说法不正确的是

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

b)不能用VisualBasic保留字

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

d)不能超过255个字符答案：C

48.下列关于属性设置的叙述错误的是：()

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

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

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

d)一个控件的属性在属性窗口中设置，还可以利用程序代码为其设置新值答案：A

49.变量未赋值时，数值型变量的值为()

a)0

b)空

c)1

d)0.1答案：A

50.表达式25.28Mod10的值是()

a)1

b)5

c)4

d)出错答案：B

51.能够改变窗体边框线类型的属性是o

a)Fontstyle

b)Borderstyle

c)Backstyle

d)Border答案：B

52.在VB中，常量12#的数据类型是o

a)整型

b)双精度浮点型

c)长整型

d)字符串答案：B

53.执行语句Printformat(5459.478,"##,#0.00")，正确的输出是.

a)5459.48

b)5,459.48

c)5,459,478

d)5,459。47答案：B

54.当x=-5时,下列语句y=iif(x>0,xA2+l,x-l)执行后y的值一

a)0

b)26

c)-6

d)4答案：C

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

a)窗体

b)代码窗口

c)立即窗口

d)图片框答案：B

56.设x=»18,则Abs(5*x)=。

a)-90

b)90

c)18

d)5答案：B

57.表达式Int(・17.8)+Sgn(17.8)的值是。

a)18

b)-17

c)-18

d)-16答案：B

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

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)答案：B

59.下面四个选项，不是事件的是o

a)Load

b)Enabled

c)Unload

d)Activate答案：B

60.已知变量A、B、C中C的值最小，则判断A、B、C可否构成三角形的逻辑表达式是

a)A>=BANDB>=CANDC>0

b)A+OBANDB+OAANDC>0

c)(A+B)>=CORA-B<=CANDC>0

d)A+B>CANDA-BO答案：B

61.如果有声明Optionbase1dimarr(-8to-2,4),则该数组共有个元素。

a)36

b)28

c)34

d)35答案：B

62.将字符串“hello”添加到列表框的最后,可使用。请语句。

a)List1.Additemuhello,,,List1.ListCount-1

b)List1.Additem“hello”，Listl.ListCount+1

c)List1.Additem"hello”，List1.Listindex

d)List1.Additem“heHo”答案：D

63.为了在按下回车键时执行某个按钮的事件过程，需要把该命令按钮的一个属性设置为

True,这个属性是()

a)Value

b)Cancle

c)Enable

d)Default答案：D

64.能够改变窗体边框线类型的属性是()

a)FontStyle

b)BorderStyle

c)BackStyle

d)Border答案：B

65.要使标签中显示的文本靠右显示，则应将其Alignment属性设置为()

a)0

b)1

c)2

d)3答案：B

66.控件是()

a)建立对象的工具

b)设置对象属性的工具

c)编写程序的编辑器

d)建立图形界面的编辑窗口答案：A

67.表达式val(-17.8)+Abs(17.8)的值是。

a)0

b)0.8

c)-0.2

d)-34.8答案：A

68.不能作为容器的对象是o

a)窗体

b)框架

c)图片框

d)图像框答案：D

69.若要设置定时器控件的定时时间，需设置的属性是o

a)interval

b)value

c)enabled

d)text答案：A

70.滚动条单击边上的箭头按钮移动的大小由___设定。

a)Change

b)SmallChange

c)Scroll

d)Tabstop答案：B

71.下列程序段的执行结果为o

K=0

ForJ=1to2

ForI=1to3

K=I+1

NextI

ForI=1to7

K=K+1

NextI

NextJ

PrintK

a)10

b)6

c)11

d)16答案：C

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

DimintsumAsInteger

Dim1AsInteger

DimjAsInteger

For1=1To10Step2

Forj=lTo5Step2

intsum=intsum+j

Nextj

NextI

a)10

b)20

c)25

d)15答案：D

73.Boolean类型的数据由几个字节组成

a)1

b)2

c)3

d)4答案：B

74.Double类型的数据由___个字节组成。

a)21

b)4

c)8

d)16答案：C

75.使窗体自动向下移动的语句是Moveo

a)Left,Top+100

b)Top+100

c)Top+100

d)Top=Top+100答案：A

76.变量A%的类型是。Dimaasinteger

a)Integer

b)Single

c)String

d)Boolean答案：A

77.对象不能响应Click事件。

a)列表框

b)图片框

c)窗体

d)计时器答案：D

78.如有数组声明语句Dima(2,-3to2,4),则数组a包含元素的个数是

a)40

b)75

c)12

d)90答案：D

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

a)0.01*Int(x+0.005)

b)0.0l*Int(100*(x+0,005))

c)0.01*Int(100*(x+0.05))

d)0.0PInt(x+0.05)答案：B

80.能显示窗体的方法是o

a)Visible

b)show

c)Hide

d)open答案：B

81.VisualBasic的文件管理控件是。

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

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

c）文本框、驱动器列表框、文件列表框

d）驱动器列表框、文件列表框、图像框答案：A

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

a)5000

b)500

c)50

d)5答案：B

83.用于获取字符串长度的函数是o

a)Len()

b)Length()

c)Strlen()

d)Lofo()答案：A

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

a)0

b)I

c)0.1234

d)0.00005答案：B

85.执行下列程序段后，整型变量c的值为一.

A=24

b=328

selectcaseb\10

case0

c=a*10+b

case1to9

c=a*100+b

case10to99

c=a*1000+b

endselect

a)537

b)2427

c)24328

d)240328答案：C

86.若整型变量a的值为2、b的值为3,则下列程序段执行后整型变量c的值为

Ifa>5then

ifb<4then

c=a-b

else

c=b-a

Endif

elseifb>3then

c=a*b

else

c=amodb

Endif

a)2

b)-1

c)1

d)6答案：A

87.下列程序的执行结果是o

Dima(5)AsString

DimbAsInteger

DimIAsInteger

ForI=0To5

a(I)=I+l

Printa(I)

NextI

a)123456

b)6

c)654321

d)0答案：A

88.下列程序的执行结果为

DimintsumAsInteger

DimIAsInteger

intsum=0

For1=0To50St印10

intsum=intsum+I

NextI

Printintsum

a)150

b)200

c)50

d)0答案：A

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

A=100

Do

Printa

a=a+l

Loopuntila<=10

a)1

b)10

c)100

d)死循环答案：D

90.下面程序段的循环结构执行后，的输出值是o

程序段为：

For1=1to10step2

y=y+I

NextI

printI;

a)25

b)10

c)11

d)因为Y的初值不知道，所以不确定答案：C

91.写列程序段的执行结果—o

A=Mabbacddcban

for1=6to2step-2

x=mid(a,I,I)

y=left(a,I)

z=right(a,I)

z=x&y&z

next1

printUcase(z)

a)ABA

b)AABAAB

c)BBABBA

d)ABBABA答案：C

92.RGB函数通过红、绿、蓝三基色混合产生某种颜色，其语法为RGB(红，绿，蓝)，

括号中红、绿、蓝三基色的成分使用0-255之间的整数。若使用3个滚动条分别输入3种

基色，

为保证输入数值有效，则应设置____属性。

a)Max和Min

b)SmallChange和LargeChange

c)Scroll和Change

d)Value答案：A

93.执行下列程序后，X的值为o

X=3

y=6

DoWhiley<=6

X=x*y

y=y+l

Loop

a)3

b)6

c)18

d)20答案：C

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

a)Ltrim()

b)Rtrim()

c)Trim()

d)Lcase()答案：C

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

For1=1.7To5.9Step0.9

a=a+l

Printa

NextI

a)3

b)4

c)5

d)6答案：C

96.以下程序输出1到1000之间所有的偶数之和，请补充完该程序。

PrivateSubCommand_Click()

DimxAsDouble

For1=0To1000

IfThen

x=x+I

EndIf

NextI

Printx

EndSub

a)iMod2=0

b)xMod2=0

c)IMod2<>0

d)xMod2<>0答案：A

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

Dimtassingle

DimkasInteger

k=O:t=l

While_______

k=k+l

t=t*k

Wend

Printt

a)k<10

b)k>10

c)k=10

d)k>=10答案：A

98.是由VisualBasic提供的一种专门的子程序，由对象本身所具有,

反映该对象功能的内部函数或过程。

a)文件

b)属性

c)方法

d)窗体答案：C

99.刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是。

a)单选按钮

b)图片框

c)通用对话框

d)文本框答案：C

100.下列各项不是VisualBasic的基本数据类型的是。

a)Char

b)String

c)Integer

d)Double答案：A

101.有如下程序段，该程序执行后，变量a的值为o

For1=1To2

ForJ=ITo2

ForK=1ToJ

a=a+2

NextK

NextJ

NextI

a)2

b)8

c)10

d)20答案：C

102.如果ABC的值为100,下列表达式中，的值为False。

a)ABC

b)12345012345&ABC

c)Not2*5=10

d)4=4and5>2+2答案：C

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

属性。

a)Caption

b)PasswordChar

c)Text

d)Char答案：B

104.要输出简单信息，可以使用o

a)InputBox函数

b)MsgBox函数

c)ShowFont方法

d)ShowPrinter方法答案：B

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

a)For-next

b)While-wend

c)Do-Loopwhile|until

d)do[while|until]-loop答案：C

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

a)Enable

b)Visibale

c)Timer

d)Interval答案：A

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

a)Top

b)Left

c)Width

d)Height答案：C

108.下列可以把当前目录下的图形文件picl.jpg装入图片框Picture1中的语句为

a)Picture=Mpicl.jpg"

b)Picture.Handle=Hpic1.jpgM

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

d)Picture:LoadPicture("pic1.jpgu)答案：C

109.以下不是VisualBasic特点的选项是。

a)可视编程

b)算法设计

c)事件驱动

d)面向对象答案：B

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

a)Visible

b)Value

c)Caption

d)Enabled答案：A

111.文件列表框中用于设置或返回所选文件的文件名的属性是。

a)File

b)FilePath

c)Path

d)FileName答案：D

112.下面四个选项，不是事件的是o

a)Click

b)Visibale

c)Unload

d)Change答案：B

113.循环结构fori=lto10step1.5的执行次数是。

a)6

b)7

c)9

d)10答案：B

114.在VisualBasic中，要设置菜单项的快捷访问键，应使用哪个符号：

a)&

b)*

c)$

d)@答案：A

115.在VisualBasic中，下列控件可以包含其他控件。

a)Picturebox

b)Commandbutton

c)Label

d)Checkbox答案：A

116.在VisualBasic设计界面中不能隐藏的窗口是。

a)工程窗口

b)属性窗口

c)立即窗口

d)窗体窗口答案：A

117.菜单控件只包括一个事件，即(1),当用鼠标单击或键盘选中后按“回车”键

时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。C

A、GotFocusB、LoadC、ClickD、KeyDown

118.下列能正确产生［1-30］之间的随机整数的表达式是o

a)l+md(30)

b)l+30*md()

c)rnd(1+30)

d)int(md()*30)+l答案：D

119.可变数组的各个数组元素的数据类型可以。

a)相同

b)不相同

c)两可

d)都不对答案：A

120.Visualbasic采用了编程机制。

a)面向过程

b)面向对象

c)事件驱动

d)可视化答案：C

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

a)属性

b)方法

c)继承

d)事件答案：D

122.函数int(abs(99-100)⑵的值为。

a)1

b)0

c)“0”

d)“1”答案：B

123.数学式子sin25°写成VisualBasic表达式是。

a)sin25

b)Sin(25)

c)Sin(25*3.14/180)

d)sin(25°)答案：C

124.以下控件中没有Caption属性的是»

a)标签框

b)文本框

c)框架

d)命令按钮答案：B

125.关键字声明的局部变量在整个程序运行中一直存在。

a)Static

b)Private

c)Dim

d)Public答案：A

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

a)窗体

b)图片框

c)图像框

d)文本框答案：D

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

a)AutoSize属性

b)Resize事件

c)AutoRedraw属性

d)Stretch方法答案：B

128.运行VB程序的快捷键为o

a)F4

b)F5

c)F6

d)F7答案：B

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

a)BackColor

b)FillColor

c)ForeColor

d)BackStyle答案：C

130.菜单控件仅支持以下事件。

a)Click

b)MouseDown

c)KeyPress

d)Load答案：A

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

a)Value

b)Cancel

c)Default

d)Enabled答案：C

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

a)AutoSize

b)Alignment

c)Multiline

d)ScrollBars答案：C

133.下列各赋值语句，语法不正确的是o

a)x+y=5

b)iNumber=15

c)Labell.caption='^time'^

d)sLength=x+y答案：A

134.下列逻辑运算结果为“true”的是。

a)falseornottrue

b)falseandnottrue

c)trueornottrue

d)trueandnottrue答案：C

135.VisualBasic应用程序的运行模式是。

a)解释运行模式

b)编译运行模式

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

d)汇编运行模式答案：C

二、填空题

136.下列程序用来将变量X,Y的值互换，请补充完程序(提示：该题答案中不要出现空

格)。

T=Y::X=T答案：Y=X

137.窗体中有图片框(Picturel)和计时器(Timerl)两个控件，运行程序时，

将图片加载到图片框中，然后图片框以每1秒钟一次的速度向窗体的右下

脚移动，每次向左、向下移动150twipo请填空：

PrivateSubForm_load()

(1)=loadPicture(ac:\pic\ball.icow)

(2).Interval二(3)

EndSub

PrivateSubTimerl_Timer()

Staticx,yAsInteger

x=x+150

y=(4)

Picturel.Move(5)

EndSub

答案：(1)picturel.picture(2)Timerl(3)1000(4)y+150(5)x,y

138.下列程序的执行结果是o

PrivateFunctionP(NAsInteger)

ForI=1ToN

SUM=SUM+i

NextI

P=SUM

EndFunction

PrivateSubCommand1_Click()

S=P(l)+P(2)+P(3)+P(4)

PrintS;

EndSub答案：20

139.假设有一复选框控件，名为Checkl,在程序中，我们用ucheckl.value=l"

语句设置Value属性的值，则该程序执行后，复选框处于一状态。答案：选中

140.执行语句“a=6=5”后，变量a的值为。答案：FALSE

141.下面程序段的输出结果是o

ForX=1.5To5Step5

PrintX;

NextX答案：1.5

142.执行下面的程序段后，s的值为o

S=5

For1=2.6To4.9Step0.6

s=s+l

NextI答案：9

143.工程是构成应用程序文件的。答案：集合

144.下列程序用来计算1+2+3……+10的值，请补充完程序。

Dimt,kassingle

K=0

DOWhilek<10

K=k+1:

loop

printt答案：T=T+K

145.表达式32/2人3-3*2八2+4人2的值是。答案：8

146.表达式“12345”<>“12345"&“ABC”的值是.答案:TRUE

147.表达式Int(Rnd(O)+l)+Int(Rnd(l)-l)的值是。答案：0

148.x,y中至少有一个变量小于变量z的VB表达式为x<zy<z。

答案：OR

149.在VB中，修改窗体的(11)和(12)属性值，可改变窗体的大小。

高度(Height)宽度(Width)

150.以下程序段的输出结果是一o

Num=0

Whilenum<=2

num=num+l

Wend

Printnum答案：3

151.在VisualBasic中按文件的访问方式不同，可以将文件分为顺序文件、随机文件和

o答案：二进制文件

152.如果有三个单选按钮直接画在窗体上，另有四个单选按钮画在框架中，则运行时，可

以同时选中个选项按钮(提示：该题答案不能出现汉字)。答案：2

153.在窗体上画一个命令按钮(其Name属性为CommAndl),然后编写如下代码：

PrivateSubCommAnd1_Click()

DimM(10)AsInteger

Fork=lTo10

M(k)=12-k

Nextk

x=6

PrintM(2+M(x))

EndSub

程序运行后，单击命令按钮，输出结果是o答案：4

154.方法是VB提供的一种，用来完成一定的操作。答案：特殊子程序

155.设a=2,b=3,c=4,d=5下歹！Ja>bandcodorc=a表达式的值是。答案：FALSE

156.PrivateSubForm_Click()

StaticSUMAsInteger

1=1

DoWhileI<=10

SUM=SUM+I

1=1+1

Loop

PrintSUM

EndSub

运行程序，第一次单击窗体：

第二次单击窗体：

157.下列程序段的执行后输出的结果为

I=4:A=5

Do

I=I+I:A=A+2

LoopUntilI>=7

PrintUA=U;A答案：A=ll

158.表达式3/6*5的值是o答案：2.5

159.下列程序的作用是将三个数按从大到小进行排序，请补充完该程序。

Ifa<bThen

d=a:a=b:b=d

Endlf

Ifa<cThen

d=a:a=c:c=d

Endlf

IfThen

d=b:b=c:c=d

Endlf

Printa,b,c答案：b<c

160.表达式（2+8*3）/2的值是o答案：13

161.以下程序用来判断一个整数X是否为偶数，并将其中的偶数在窗体上显示，请补充

完该程序。

IfX_2=ThenPrintX答案：MOD0

162.当对窗体中的对象进行操作时，VisualBasic就会显示该对象的代码窗口。

答案：双击

到15（总共103个记录）第一页前一页下一页最后一页

163.下列程序的执行结果是o

Ml=l:m2=1

DoWhilem2<>6

ml=ml*m2:m2=m2+1

Loop

Printml答案：120

164.一组具有相同名称，不同下标的下标变量称为。答案：数组

165.假定当前日期为2002年7月120,星期六，则执行语句Printday（now）后，输出结

果是o答案：12

166.假定在C：盘根目录下有一个名为pic2.gif的图形文件，要在运行期间把该文件装

入一个图片框PICTURE1,应执行的语句为。答案：

PICTUREI.PICTURE=LOADPICTURE("C:\PIC2.GIF")

167.人=7用=3右=4,则表达式人\10口3+8八3/(2\5的值为。答案：2

168.下列程序段的运行结果是：

Subsele()

DimnasInteger

I=21:n=3

DoWhileI>n

I=I-n

Loop

PrintI

EndSub

打印结果o答案：3

169.一个程序最多可以有窗体。答案：255

170..34要选择多个不相邻的控件，按住或SHIFT键不放，再单击要选择的控

件。

答案：CTRL

171.表达式：T+"2"="3"的值是o答案：FALSE

172.执行下面的程序段后，s的值为一。

S=5

For1=2.6To4.9Step2

s=s+l

NextI答案：7

173.下列程序的执行结果是一o

T=O:m=1:Sum=0

Do

t=t+m:Sum=Sum+t:m=m+2

LoopWhilem<=9

PrintSum答案：