VB测验试题及答案分解.docx

VB测验试题及答案分解.docx

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

VB测验试题及答案分解

VB测验试题及答案分解

————————————————————————————————作者：

————————————————————————————————日期：

卷1

一、   填空题

1、VB程序设计的主要特点是    可视化设计    和   事件编程     。

2、在VB中，最主要的两种对象是   窗体（form）  和 控件  。

3、工程是构成应用程序文件的    集合   。

4、方法是VB提供的一种  特殊子程序   ，用来完成一定的操作。

5、浮点类型数据包括单精度型和___双精度__数据。

6、事件是窗体或控件对象识别的__动作____。

7、可用窗体的__print_  方法在窗体中显示文字。

8、复选框控件Value属性指示复选框处于____选中___或禁止状态（暗淡的）中的某一种。

9、在VB中，修改窗体的   高度（height）和   宽度（width）  属性值，可改变窗体的大小。

10、双击工具箱中的控件图标，可在窗体的   中央  出现一个尺寸为缺省值的控件。

11、在MsgBox函数中，如果缺省title参数，则使用   工程1  作为消息框的标题。

12、设x＝34.58，语句PrintFormat（x,“000.0”）的输出结果是  34.6 。

13、在VB 中，数值型变量的初值为  0 ，Varant型变量的初值为  空  ，布尔型变量的初值为  FALSE  。

14、设置窗体的   picture  属性，可在窗体上显示图片。

15、程序运行工程中，清除MP图片框中的图片应使用语句  cls 。

二、选择题

1、菜单控件只包括一个事件，即  C   ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。

A、GotFocus        B、Load       C、Click       D、KeyDown

2、滚动条控件（如图所示）的Max属性所设置的是  A   。

A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值

B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量

C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量

D、滚动条控件无该属性

3、SQL 语句 Select*Formstudent 中的 *表示       B      。

A、所有记录    B、所有字段    C、所有表   D、都不对

4、以下选项中，不属于标签的属性是  C   。

A、Enabled        B、Caption     C、Default    D、Font

5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是  A   。

   A、Caption       B、Name       C、Text       D、Label

6、设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是  D   。

   A、Caption       B、Name      C、Text       D、Value

7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？

  D   。

   A、在标题项中输入&，然后打勾           B、在索引项中打勾           

   C、在有效项中打勾                      D、在复选项中打勾

8、当执行以下过程时，在窗体上将显示  A   。

PrivateSubCommand1_Click（）

Print"VB";

Print"Hello!

";

Print"VB"

EndSub

A、 VBHello!

VB               B、 VB            

                                     Hello!

VB           

C、 VB                         D、 VB

       Hello!

  VB                     Hello!

                                       VB

9、语句Print"Theansweris:

";20/4-2的结果为  B   。

A、Theansweris20/4-2          B、Theansweris3

C、Theansweris"20/4-2"       D、非法语句  

10、下列哪个控件是容器控件  B   。

   A、Image     B、Picture     C、ComboBox      D、FileListBox  

11、若要将窗体从内存中卸载出去，其实现的方法是  D   。

　　A.Show　   B.Hide　    　 C.Load　    　 D.UnLoad

12、以下选项中，不是 VisualBasic控件的是  A   。

　 A.窗体　　   B.定时器　　   C.单选框　   　 D.命令按钮

13、双击窗体中的对象后，VisualBasic将显示的窗口是  A   。

  A.代码窗口　  B．工具箱　  C．项目（工程）窗口　 D．属性窗口

14、可决定窗体的左上角是否有控制菜单的属性是  A   。

A.ControlBox             B.MinButton  

C.MaxButton　  　        D.BorderStyle

15、设有如下语句：

   Strl＝InputBox（"输人"，""，"练习"）

从键盘上输人字符“示例”后，Strl的值是  D   。

   A．“输入”     B．“”     C．“练习”     D．“示例”        

16、窗体Form1的Name属性是Frm1,它的单击事件过程名是    C   。

  A.Form1_Click    B.Form_Click    C.Frm1_Click   D.Me_Click

  17、窗体的hide属性的含义是      A   。

    A.隐藏          B.展现          C.装入           D.卸载

18、若要设置定时器控件的定时时间，需设置的属性是  C   。

　　A．Enabled　　 B．Value　　 C．Interval　　 D．Text

19、能够改变复选框中背景颜色的属性是  C   。

   A．Value         B．FontColor   C．BackColor   D．Font

20、窗体能响应的事件是    B  。

   A．ActiveForm      B．Load     C．Drive        D．Change

三、判断题（判断下列正确与否，正确的打√，错误的打ⅹ。

）

1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。

X

2、图象框中的Stretch属性为true时，其作用是图形自动调整大小以适应图象控件。

X

3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。

X

4、通过改变属性窗口中的Name属性，来改变窗体的标题。

5、创建VB应用程序的三个主要步骤是：

（1）创建应用程序界面

（2）设置控件（3）编写代码。

X

6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。

7、已知P＝MsgBox（“Howareyou?

"，VbYesNo+VbQuestion，“Hello!

”），变量P是Integer数据类型。

8、工程文件的扩展名是 .vbg 。

9、VB允许设计和使用用户自己设计的控件。

10、OptionButton控件没有DblCliek事件。

X

11、同一条记录中的各数据具有相同的类型。

12、使用Data控件可以直接显示数据库中的数据。

X

13、ImageList 是一个图像容器控件，可用作工具栏的图像库。

14、当用户单击工具栏按钮时，将触发工具栏按钮的ButtonClick事件。

15、在VB的工程资源管理器中，如果从工程中移除已经保存过的文件，该文件仍然被物理删除（真正删除）。

X

16、如果列表框的ListConut的属性为10，则列表框最后一项的ListIndex值为10。

X

17、要是某个命令按钮不起作用，应将该按钮的Enabeld属性设置为False。

18、使用数组定义语句：

DimD$（10），则数组D中各元素的值为空。

X

19、如果在一行中输入多条语句，各语句之间用使用；分隔。

X

20、在代码窗口中输入某行代码并按回车键之后，如果代码变成红色，说明该行代码有语法错误。

四、读程序题，写出程序运行结果

   1、 PrivateSubForm_Click（）

StaticSUMAsInteger

I=1

DoWhileI<=10

SUM=SUM+I

I=I+1

Loop

PrintSUM

EndSub

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

    55     

                第二次单击窗体：

   110        

2、 PrivateSubForm_Click（）

Print"*";Tab（6）;2,Tab（15）;5

Print

ForI=15To16

PrintI;

Forj=2To6Step3

  PrintTab（3*j）;j*I;

Nextj

Print

NextI

EndSub

           程序运行结果：

   *   2   5

                          15   30   75

                          16   32   80                     

五、编程题

（一）窗体中有图片框（Picture1）和计时器（Timer1）两个控件，运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下脚移动，每次向左、向右移动100twip（20分之一像素）。

请填空：

      PrivateSub  Form_load（）

               Picture1.picture   =loadPicture（“c:

\pic\ball.ico”）

             Timer1    .Interval=200

      End  Sub

      Private  Sub  Timer1_Timer（）

          Static  x,y  As  Integer

          x=x+100

          y=y+100

            Picture1.Move     x,y   

        End  Sub

（二）有一个单击按钮过程，其作用是产生50个60～100的随机数，统计其中被6整除余2的个数，并将这些数输出。

请填空：

      PrivateSubCommand1_Click（）

        Dim  x  As  Integer,  N%

        Dim  Counter  As  Integer

              randomize     Timer

          For  N=1  To50

           X=Rnd（）*   rnd（）*41+60 

           If     x  Mod  6     =2  Then

             Print  x

             Counter=   Counter+1 

                Endif    

         Next  N

        Print  Counter

      End  Sub

卷2

第一部分：

客观题

一、单项选择题

1、在窗体模块的通用段中声明变量时，不能使用的关键字是（）

A、DimB、PublicC、PrivateD、Static

2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（　　）

A、工程资源管理器窗口B、工具箱窗口

C、属性窗口D、代码窗口

3、若要使某可见控件获得焦点，可使用（）方法来实现。

Ａ、Refresh　Ｂ、Setfocus　Ｃ、Gotfocus　　Ｄ、Value

4、下列不可作为VB变量名的是（　　）

A、ABT1B、AlphaC、ABCD、4*Delta

5、表达式5Mod3+3\5*2的值是（　　）

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

6、下列语句中，正确的赋值语句是（）

A、i+j=10B、2i=jC、j=i+jD、i*j=0

7、执行下列程序段后，x的值是（）。

n=4:

x=1:

i=1

Do

x=x*i

i=i+1

LoopWhilei

A、2B、6C、10D、14

8、当用户在窗体上单击鼠标时，不会触发的事件是（　　）

Ａ、Click　　Ｂ、MouseDown　　Ｃ、MouseUp　　Ｄ、DblClick

9、下列为整型变量的是（）

A、x!

B、x#C、x$D、x%

10、要从For循环中直接退出循环，可使用的语句（）。

A、ExitDoB、ExitLoopC、ExitForD、Stop

11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（　　）

A、xMod2=1OryMod2=1B、xMod2=0OryMod2=0

C、xMod2=0AndyMod2=0D、xMod2=1AndyMod2=1

12、在通用声明中给出OptionBase1语句，则数组a包含（）个数组元素。

Dima（3,-2To1,5）AsInteger

A、60B、75C、120D、13

13、设窗体上有一个名称为Text1的文本框，要求只能显示信息，不能输入，应选择答案（　　）

A、Text1.MaxLength=0B、Text1.Width=0

C、Text1.Visible=FalseD、Text1.Enabled=False

14、命令按钮CommandButton的Picture,DownPicture和DisablePicture属性都已装入图形,按下命令按钮,其上显示的图形是（）

A、Picture属性中的图形B、DownPicture属性中的图形

C、DisablePicture属性中的图形D、不显示图形

15、在窗体上画一个名称为Command1的命令按钮，并编写如下程序：

PrivateSubCommand1_Click（）

DimxAsInteger

StaticyAsInteger

x=10：

y=5

Callf1（x,y）

Printx,y

EndSub

PrivateSubf1（ByRefx1AsInteger,y1AsInteger）

x1=x1+2

y1=y1+2

EndSub

程序运行后，单击命令按钮，在窗体上显示的内容是（　　）

A、105B、125C、107D、127

16、执行以下程序段，输出结果为（　　）

PrivateSubCommand1_Click（）

a$="abbacddcba"

Fori=6To2Step-2

X=Mid（a,i,i）

Y=Left（a,i）

z=Right（a,i）

z=UCase（x&y&z）

Nexti

Printz

EndSub

A、ABAB、ABBABAC、BBABBAD、AABAAB

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

A、Int（Rnd*51）+49B、Int（Rnd*51+50）

C、Int（Rnd*50）+5D、Int（Rnd*50+50）

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

A、x的值是数值3B、x的值是字符"3"

C、0是默认值D、对话框标题是"求面积"

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

A、AutoSize属性为TrueB、Stretch属性为True

C、AutoSize属性为FalseD、Stretch属性为False

20、有如下事件过程

PrivateSubCommand1_Click（）

x=1

Fori=1To3

Ifi<=1Thena=x*x

Ifi<=2Thena=x*x+1

Ifi>=3Thena=x*x+2

Printa;

Nexti

EndSub

运行时，单击命令按钮，则结果是（）：

A、2511B、151C、223D、111

21、在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：

PrivateSubCommand1_Click（）

StaticXAsInteger

StaticYAsInteger

Cls

Y=1:

Y=Y+5:

X=5+X

PrintX,Y

EndSub

程序运行时，单击命令按钮Command1三次后，窗体上显示的结果为（　　）

A、1516B、156C、1515D、56

22、设a=3,b=5，则以下表达式值为TRUE的是（　　）

A、a>=bAndb>10B、a>bOrb>0

C、a<0andb>0D、-3+5>aandb>0

23、从键盘上输入两个字符串，分别保存在变量str1、str2中。

确定第二个字符串在第一个字符串中起始位置的函数是（　　）

A、LeftB、MidC、StringD、Instr

24、下列哪组语句可以将变量a，b的值互换（）

A、a=b:

b=aB、a=a+b:

b=a-b:

a=a-b

C、a=c:

c=b:

b=aD、a=（a+b）/2:

b=（a-b）/2

25、可以同时删除字符串前导和尾部空格的函数是（　　）

A、Ltrim　　　B、Rtrim　　C、Trim　　D、Mid

26、表达式29\3的值是（　　）

A、1B、7C、8D、9

27、下列程序运行后，单击command1时显示的结果是（）

PrivateSubCommand1_Click（）

x=1

mysubx+2

Printx

EndSub

PublicSubmysub（xAsInteger）

x=3*x-1

Ifx<4Thenx=x+10

Printx;

EndSub

A、81B、88C、191D、1919

28、以下有关VisualBasic语言描述中错误的是（）。

A、不区分大小写B、语句是一行一句，以回车键结束

C、用“,”分隔一行中的多个语句

D、一条语句放在多行中，则在前一行结束处使用续行符空格+下划线（“_”）连接下一行

29、在窗体上添加两个文本框（其Name属性分别为Text1和Text2）和一个命令按钮（其Name属性为Command1），然后编写如下事件过程：

PrivateSubCommand1_Click（）

x=0

DoWhilex<50

x=（x+2）*（x+3）

n=n+1

Loop

Text1.Text=Str（n）

Text2.Text=Str（x）

EndSub

程序运行后，单击命令按钮，在两个文本框中显示的值分别为（）

A、1和0B、2和72C、3和50D、4和168

30、设有如下声明：

DimXAsInteger

如果Sgn（X）的值为-1，则X的值是（）

A、整数B、大于0的整数C、等于0的整数D、小于0的数

二、判断题

下列各题如果是正确的，请在机读卡对应位置上涂A，如果是错误的涂B。

答在试卷

上不得分

1、VB程序运行后，在内存中只能驻留一个窗体。

2、在VB中，控件的属性只能在设计时修改，运行时无法改变。

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

4、在一个窗体模块中可以调用在其他窗体中被定义为Public的通用过程。

5、Function过程与Sub过程最主要的区别是：

SUB过程不能返回值，而FUNCTION

过程能返回值。

6、用Print方法可以在图像框中输出数据。

7、Dima,b,cAsInteger能将a,b,c都声明成整型变量。

8、语句print“*”;tab（10）;”a”与语句print“*”;spc（10）;”a”的显示结果

是一样的。

9、控件数组使用Index属性来标识控件元素，其范围必须从0开始。

10、文件号的最大取值为512。

第二部分：

主观题

三、填空题

请在答题卷对应位置填写答案，答在试卷上不得分。

1、数学关系式a2+b2表示成正确的VB表达式为___【1】___。

2、计算表达式的值Int（86.567*100+0.5）/100＝___【2】___。

3、赋值语句g=123+Mid（"123456",3,2）执行后，变量g中的值是___【3】___。

4、VB6.0在编写代码时可以添加说明性文字。

注释方法有2种，一种是使用注释标记符撇号（’）；另一种是使用以关键字___【4】___开头的注释语言。

5、设a="a"，b="b"，c="c"，d="d"，执行语句x=IIf（（ad）,"A","B"）后，x的值为___【5】___。

6、在VB中，描述对象特征的数据称为对象的___【6】___。

7、有下面的表达式x1=val（“1e2abcd”），运行后，x1的值为：

___【7】___。

8、产生一个两位数的随机数的表达式为：

___【8】___。

9、只有控件对象的Enabled和Visible属性值均为___【9】___时，该控件对