VB题库.docx

VB题库.docx

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

VB题库

1.结构化程序设计中的三种基本结构不包括（C）。

A顺序结构

B选择结构

C嵌套结构

D循环结构

2.窗体模块文件的扩展名是（B）。

A.clsB.frmC.basD.rec

3.在设计阶段，双击窗体上的某个控件，可以打开（A）。

A代码窗口B属性窗口C工具箱窗口D工程资源管理器窗口

4.下列叙述中，错误的是（C）。

AVB是可视化程序设计语言BVB采用事件驱动编程机制

CVB是面向过程的程序设计语言DVB应用程序可以以编译方式执行

5.在VB中可以通过（C）方法向工具箱加入其它控件。

A右击工具箱，执行弹出式菜单中的“添加选项卡”命令

B执行“文件”菜单中的“添加工程”命令

C执行“工程”菜单中的“部件”命令

D执行“工程”菜单中的“添加窗体”命令

6.下列（A）是合法的变量名。

Ax_yBx-yC2xDand

7.表达式4+6\5*7/9Mod3的值是（B）。

A4B5C6D7

8.下列逻辑表达式为True的是（C）。

A"A"<"9"B"A">"a"C"a">"AT"D"AT"<"AND"

9.表示x大于0且小于10的VB表达式是（B）。

A00Andx<10Cx>0Orx<10Dx>0:

x<10

10.判断整型变量x是奇数的表达式是（A）。

AxMod2<>0BxMod2!

=0CxMod2≠0DxMod2＝0

11.下列赋值语句中，正确的是（C）。

Ai+j=10B2i=jCj=i+jDi=j=0

12.表达式Len（"幸运52"）的值是（B）。

A0B4C6D8

13.以下（B）语句可表示[50,100]之间的随机数。

AInt（Rnd*51）+49BInt（Rnd*51+50）CInt（Rnd*50）+5DInt（Rnd*50+50）

14.表达式Fix（5.6）+Int（-5.6）的值是（B）。

A0B-1　C1D以上都不对

15.设a="39级台阶"，使b="台阶"的语句是（D）。

ARight（a,4）BInstr（a,5,4）CLeft（a,5,4）Dmid（a,4,2）

16.执行x=InputBox（"请输入半径",0,"求面积"），在输入框中输入3后回车,则下列叙述正确的是（B）。

Ax的值是数值3Bx的值是字符"3"

C0是默认值D对话框标题是"求面积"

17.窗体上有一个命令按钮Command1，编写如下事件过程：

　PrivateSubCommand1_Click（）

x=InputBox（"x="）

y=InputBox（"y="）

Printx+y

EndSub

运行后，单击命令按钮，先后在两个输入对话框中输入123和321，窗体显示的内容是（B）。

A444B123321C123+321D出错信息

18.下列叙述中，正确的是（B）。

A窗体的Name属性可以为空B窗体的Name属性定义窗体的名称

C可以在运行期间改变窗体的Name属性D窗体的Name属性的值显示在窗体标题栏中

19.设置窗体的（A）属性可改变窗体标题。

ACaptionBNameCBackColorDBorderStyle

20.使用（C）方法可隐藏窗体，但不从内存中释放。

AShowBLoadCHideDUnLoad

21.设置标签Label1的（D）属性使它不可见。

ALabel1.Visible=0BLabel1.Visible==1

CLabel1.Visible=TrueDLabel1.Visible=False

22.文本框没有（D）属性。

AName　BLeftCFontDCaption

23.设置图像框的（C）可使框内的图片按图像框大小自动调整。

AAutoSize属性为TrueBAutoSize属性为False

CStretch属性为TrueDStretch属性为False

24.将当前目录下的图形文件Clock.jpg装入图片框Picture1的语句是（D）。

APicture="Clock1.jpg"BPicture=LoadPicture（"Clock1.jpg"）

CPicture1.Picture="Clock1.jpg"DPicture1.picture=LoadPicture（"Clock1.jpg"）

25.在窗体运行时，复选框处于选中但不激活状态，表示（B）。

AEnabled为False且Value为0BEnabled为False且Value为1

CEnabled为True且Value为0DEnabled为True且Value为1

26.属性窗口为命令按钮的Picture属性装入了图片，但却没有显示的原因是（B）。

A按钮的Enabled属性为FalseB按钮的Sytle属性为0

C按钮的Default属性为FalseD按钮的DisabledPicture属性没有装入图片

27.设置命令按钮的（A）属性为True，可使按下Esc键时执行该按钮的单击事件过程。

ACancelBEnabledCValueDDefault

28.引用列表框List1最后一项数据应使用（B）。

AList1.List（ListCount-1）BList1.List（List1.ListCount-1）

CList1.List（ListCount）DList1.List（List1.ListCount）

29.下列（C）控件结合了文本框和列表框的特性。

A图片框B图像框C组合框D标签

30.计时器控件以一定时间间隔触发（D）事件。

AEnabledBIntervalCTimer1DTimer

31.拖动滚动条中的滑块将触发滚动条的（B）事件。

ASlide　　BScrollCDragOver　DDragDrop

32.用（A）分隔同一窗体中的多组单选按钮，使它们互不干扰。

A框架B组合框C复选框D列表框

33.计时器控件能正常工作应具备的两个条件是（C）。

AEnabled属性为True和Interval属性为0BEnabled属性为False和Interval属性为0

CEnabled属性为True和Interval属性非0DEnabled属性为False和Interval属性非0

34.下列程序段的执行结果是（B）。

x=3:

y=5:

z=9

x=x+y

y=x-y

Ifx-y>z-xThenz=x+y

Ifx+y>z-yThenx=z+y

Printx,y,z

A359B14311C8311D859

35.窗体上有一个命令按钮Command1，编写如下事件过程：

PrivateSubCommand1_Click（）

Sum=0

Form=1To3

SelectCasem

Case1

a=1

Case2

a=2

Case3

a=3

EndSelect

Printa,

Sum=Sum+a

Nextm

PrintSum

EndSub

运行时，单击按钮，输出结果是（D）。

A3339B3216C1113D1236

36.窗体上有一个命令按钮Command1，编写如下事件过程：

PrivateSubCommand1_Click（）

a=80:

b=50:

c=30

IfacThenb=c

Ifb=cAnda

Ifa=bAndb>cThenc=a+b

Printa,b,c

EndSub

运行时，单击按钮，窗体输出的结果是（B）。

A805030B803030C503080D503030

37.执行下列程序段后，x的值是（C）。

n=5:

x=1:

i=1

Do

x=x*i

i=i+1

LoopWhilei

A10B15C24D120

38.执行下列语句后，x的值是（A）。

a=3

x=IIf（a>5,int（-5.6）,Fix（5.6））

A5B-5C6D-6

39.窗体上有一个命令按钮Command1，编写如下事件过程：

PrivateSubCommand1_Click（）

a=Val（InputBox（"请输入分数：

","计算你的等级",60））

Ifa<0Ora>100Then

Print"输入错误"

ElseIfa<60Then

Print"不合格"

ElseIfa<80Then

Print"合格"

Else

Print"优秀"

EndIf

EndSub

运行时，单击按钮，在输入对话框中直接回车，输出结果为（C）。

A输入错误B不合格C合格D优秀

40.阅读下列程序段：

m=0

Fori=1To3

Forj=1Toi

m=m+j

Nextj,i

执行以上的循环后，i和m的值分别为（D）。

A36B310C46D410

41.所有对象都具有Name（名称）属性

A对B错

42.控件的属性值不可以在程序运行时动态的修改.

A对B错

43.决定对象是否可见的属性是Visible属性，决定对象可用性的属性是Enabled属性。

A对B错

44.Do/LoopWhile结构中的循环体，至少被执行一次。

A对B错

45.命令按钮的Enabled属性确定它是否响应任何事件。

A对B错

46.标签控件和文本框控件都用来输入和输出文本。

A对B错

47.当用户拖动滚动条控件中的滚动框时,Scroll和Change事件连续发生。

A对B错

48.VB是以结构化的Basic语言为基础,以事件驱动作为运行机制的可视化程序设计语言。

A对B错

49.由于定时器控件在运行时是不可见的，因此在设置时可将其放在窗体的任何位置。

A对B错

50.许多属性可以直接在属性表上设置，修改，并立即在屏幕上看到效果。

A对B错

程序填空1：

以下程序段用于交换两个整形变量a,b的值。

Dimtmpasinteger

Tmp=51

a=52

53

51.

Aa

Bb

Ctmp

Da+b

52.

Aa

Bb

Ctmp

Da+b

53.

Aa=tmp

Bb=tmp

Ctmp=a

Dtmp=b

程序填空2：

以下程序段用于交换一个两位正整数的93个位与十位，以形成一个新的两位正整数39。

Dimaasinteger

Dimbasstring

Dimcasstring

a=93

b=54

b=55

c=56

a=val（c）

printa

54.

Aval（a）

Bint（a）

Cstr（a）

Dsgn（a）

55.

ATrim（b）

Blen（b）

CTrim（a）

Dlen（a）

56.

Alen（a）

Bright（b,1）

Cleft（b,1）

Dright（b,1）+left（b,1）

程序填空3：

在窗体中利用一个Label控件和Timer控件实现一个倒计时程序。

每一秒倒计时一次,直到0结束。

效果如图所示。

在Timer控件的Timer事件中，有如下的实现代码。

Dimsecondasinteger

Second=val（57）

Second=58

If（59）

60

Endif

Label1.caption=str（second）

57.

Alabel1.text

Blabel1.caption

Clabel1.Name

Dlabel1.forecolor

58.

Asecond-1

Bsecond+1

Clabel1+1

Dlabel1-1

59.

Asecond>0

Bsecond<=0

Clabel1>0

Dlabel1<=0

60.

Asecond>0

Bsecond=0

Csecond<0

Dsecond<=0

综合题1：

设计程序实现如下功能：

实现100以内的正偶数的累加。

请选择正确的语句组填入下划线中。

Dimsumasinteger

Dimiasinteger

Fori=0to100

61

Next

Printsum

61.

A

Ifimod2=0then

Sum=sum+i

Endif

B

Ifi/2=0then

Sum=sum+i

Endif

C

Ifi\2=0then

Sum=sum+i

Endif

D

Ifimod2=0then

Sum=i

Endif

综合题2：

以下程序代码实现了从四个整数中选出最大的数。

请选择正确的语句组填入下划线中。

Dimaasinteger

Dimbasinteger

Dimcasinteger

Dimdasinteger

Dimeasinteger

Dimfasinteger

Dimmaxasinteger

62

max=e

if（max

max=f

endif

printmax

62.

A

e=iif（a>b,a,b）

f=iif（c>d,c,d）

B

e=iif（a>b,c,d）

f=iif（c>d,a,b）

C

e=iif（a

f=iif（c

D

e=iif（a

f=iif（c