1、 vb 习题1. 工程文件的扩展名是。2. VB 中若要产生一个消息框用实现。3. 若要获得滚动条的当前位置，可以通过属性来实现。4. 关闭正在运行的VB 窗口将自动触发的事件是.5. 窗体的标题栏属性由窗体对象的属性决定。1、VB 程序设计的主要特点是和。2、在VB 中，最主要的两种对象是和。5、浮点类型数据包括单精度型和 数据。6、事件是窗体或控件对象识别的 动作 。97、可用窗体的 _方法在窗体中显示文字。9、在VB 中，修改窗体的和属性值，可改变窗体的大小。10、双击工具箱中的控件图标，可在窗体的出现一个尺寸为缺省值的控件。11、在MsgBox 函数中，如果缺省title 参数，则使用
2、作为消息框的标题。12、设x34.58，语句Print Format(x,“000.0”)的输出结果是。13、在 VB 中，数值型变量的初值为，Varant 型变量的初值为，布尔型变量的初值为FALSE。14、设置窗体的属性，可在窗体上显示图片。二、选择题1、菜单控件只包括一个事件，即，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。A、GotFocusB、LoadC、ClickD、KeyDown 2、滚动条控件(如图所示)的 Max 属性所设置的是。A、滚动框处于最右位置时，一个滚动条位置的Value 属性最大设置值B、 单击滚动条和滚动箭头之间的
3、区域时，滚动条中滚动块的最大移动量C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量D、滚动条控件无该属性4、以下选项中，不属于标签的属性是。A、EnabledB、CaptionC、DefaultD、Font5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是。A、CaptionB、NameC、TextD、Label6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是。A、CaptionB、NameC、TextD、Value7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？。A、在标题项中输入&，然后打勾B、在索引项中打勾C、在有
4、效项中打勾D、在复选项中打勾8、当执行以下过程时，在窗体上将显示。Private Sub Command1_Click( ) Print VB;Print Hello! ; Print VBEnd SubA、 VBHello!VBB、 VBC、 VBD、 VBHello!VBHello!VBHello!VB9、语句Print The answer is:;20/4-2 的结果为。A、The answer is 20/4-2B、The answer is 3 C、The answer is 20/4-2D、非法语句10、下列哪个控件是容器控件。A、ImageB、PictureC、ComboBox
5、D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是。A.ShowB.HideC.LoadD.UnLoad 12、以下选项中，不是 Visual Basic 控件的是。A.窗体B.定时器C.单选框D.命令按钮13、双击窗体中的对象后，Visual Basic 将显示的窗口是。A.代码窗口B工具箱C项目（工程）窗口D属性窗口14、可决定窗体的左上角是否有控制菜单的属性是。A.ControlBoxB.MinButtonC.MaxButtonD.BorderStyle 15、设有如下语句：StrlInputBox（输人，练习）从键盘上输人字符 “示例”后，Strl 的值是。A
6、“输入”B“ ”C“练习”D“示例” 16、窗体Form1 的 Name 属性是Frm1,它的单击事件过程名是。A. Form1_ClickB.Form_ClickC. Frm1_ClickD. Me_Click 17、窗体的hide 属性的含义是。A.隐藏B.展现C.装入D.卸载18、若要设置定时器控件的定时时间，需设置的属性是。AEnabledBValueCIntervalDText 19、能够改变复选框中背景颜色的属性是。AValueBFontColorCBackColorDFont 20、窗体能响应的事件是。AActiveFormBLoadCDriveDChange三、判断题(判断下列
7、正确与否，正确的打，错误的打。)1、三种方式的组合框都允许用户输入哪些不在列表框中的选项。2、图象框中的Stretch 属性为true 时，其作用是图形自动调整大小以适应图象控件。3、在菜单编辑器中使用“索引”时，可有一组菜单项具有相同的“名字”。4、通过改变属性窗口中的Name 属性，来改变窗体的标题。5、创建VB 应用程序的三个主要步骤是：(1)创建应用程序界面(2)设置控件(3)编写代码。6、变量是指在程序运行过程中其值可以改变的那些量，而值不能改变的是常量。7、已知PMsgBox(“Howareyou?，VbYesNo+VbQuestion，“Hello!”)，变量P 是 Intege
8、r 数据类型。9、VB 允许设计和使用用户自己设计的控件。10、OptionButton 控件没有DblCliek 事件。15、在VB 的工程资源管理器中，如果从工程中移除已经保存过的文件，该文件仍然被物理删除（真正删除）。16、如果列表框的ListConut 的属性为 10，则列表框最后一项的ListIndex 值为 10。17、要是某个命令按钮不起作用，应将该按钮的Enabeld 属性设置为False。18、使用数组定义语句：Dim D$（10），则数组D 中各元素的值为空。19、如果在一行中输入多条语句，各语句之间用使用 ；分隔。20、在代码窗口中输入某行代码并按回车键之后，如果代码变成
9、红色，说明该行代码有语法错误。四、读程序题，写出程序运行结果1、 Private Sub Form_Click() Static SUM As IntegerI = 1Do While I=10 SUM = SUM + I I = I + 1Loop Print SUM End Sub运行程序，第一次单击窗体：55第二次单击窗体：1102 、 Private Sub Form_Click() Print *; Tab(6); 2, Tab(15); 5 PrintFor I = 15 To 16Print I;For j = 2 To 6 Step 3 Print Tab(3 * j); j
10、* I;Next j Print Next I End Sub程序运行结果：*25153075163280五、编程题（一）窗体中有图片框(Picture1)和计时器(Timer1)两个控件，运行程序时，将图片加载到图片框中，然后图片 框以每 2 秒钟一次的速度向窗体的右下脚移动，每次向左、向右移动100twip（20 分之一像素）。请填空：Private Sub Form_load( )Picture1.picture=loadPicture(“c:picball.ico”) Timer1.Interval=200End SubPrivate Sub Timer1_Timer( ) Stati
11、c x , y As Integer x=x+100y=y+100Picture1.Movex , yEnd Sub（二）有一个单击按钮过程，其作用是产生50 个 60100 的随机数，统计其中被 6 整除余 2 的个数，并将这些数输出。请填空：Private Sub Command1_Click() Dim x As Integer, N%Dim Counter As Integer randomizeTimerFor N=1 To 50 X=Rnd()*rnd()*41+60Ifx Mod 6=2 Then Print xCounter=Counter+1 End ifNext NPrin
12、t Counter End Sub六、随机产生 30-100（包括 30、100）的 10 个正整数，求最大值、最小值、平均值、和。Private Sub Form_click()Dim i%, s%, aver%, max%, min% Dim a%(10)min = 100: max = 30 Print 10 个数为：For i = 1 To 10a(i) = Int(Rnd * 71 + 30)If max a(i) Then min = a(i) s = s + a(i)Print a(i);Next iaver = s / (i - 1) PrintPrint 10 个数的最大值为
13、：; max Print 10 个数的最小值为：; min Print 10 个数的和为：; sPrint 10 个数的平均值为：; aver End Sub答案填空 1.vbp 2.msgbox 3.value 4.unload 5.caption1.面向对象 事件驱动2.窗体（form）控件 5.双精度 6.动作7.print9.heightwidth10.中央11.工程 112. 34.613.FALSE14.picture选择 1.C2.A4.C5.A6-10 DDABB11-15DA AA B 16-20C A C CB 1-5 X X X X X6. 7. 9.10.X 15.X
14、16.X 17.18. 19. X 20. 一、 填空题1. VB 中若要产生一消息框，可用 （1） 函数来实现。Msgbox2. 常量是指在程序运行过程中，（2）的量其值不能改变3. 整数类型数据分别包括整型和（3）数据。 长整型4、在VB 集成开发环境中，运行应用程序的方法有三种：一是_(4) ；二是_(5)_；三是_(6) 。“运行”菜单下的启动单击工具栏上人启动按钮按 F5 键5、在VB 中若要让某对对象获取焦点，则可通过 (7)_方法来实现。Setfocus6. 列表框（ListBox 控件）显示(8)，用户可从中选择一个或多个项目。项目列表7. 框架（Frame 控件）可以用来(9
15、)进行分组，以便于用户识别，主要用于为单选按钮分组。对其他按钮8、在VB 中，用来描述对象外部特征的量称之为对象的_(10) 。 属性9、为使某窗口中的命令按钮“取消(C)”具有如下特性：按“AltC”键或按 “ESC” 键，均可代替用鼠标单击该按钮的操作，应设置该按钮的 Caption 属性值为 (11) ，并且设置其 (12) 属性值为 （13） 。取消&C Cancle Ture10、在过程内用_（14） 声明的变量为静态变量，在执行一个过程结束时，过程中所用到的 Static 变量的值会保留，下次再调用此过程时，变量的初值是上次调用结束时被保留的值。Static11、在模块文件中的声明
16、部分用Global 或 （15） 关键字声明的变量为全局变量。 Public12、在模块文件中的声明部分用 （16） 或 （17） 定义的变量为模块级变量。DimPrivate13计时器控件通过定期激活Timer 事件，使得Timer 控件（18）就执行一次Timer 事件中的代码。每隔一个时间段14要获得滚动条的当前位置，可以访问通过（19）属性来实现。Value 值15关闭正在运行的VB 窗口将自动触发的事件是（20）。Unload二、选择题1. 工程文件的扩展名是（）。AvbgB.vbpC.vbwD.vbl2.在以下窗体中没有采用的控件是（）。A.文本框B 垂直滚动条C框架D 命令按钮3
17、滚动条控件（如图所示）的Largechange 属性所设置的是（）A. 单击滚动条和滚动箭头之间的区域时，滚动条控件Value 属性值的改变量B. 滚动条中滚动块的最大移动位置C. 滚动条中滚动块的最大移动范围D. 滚动条控件无该属性4、用于从字符串左边截取字符的函数是（ ） A、Ltrim( ) B、Trim( )C、Left( )D、Instr( ) 5、可获得当前系统日期的函数是（ ）A、Date( )B、Time( )C、IsDate( )D、Year( ) 6、退出For 循环可使用的语句为（ ）A、Exit ForB、Exit DoC、End ForD、End Do7、窗体的标题栏
18、显示内容由窗体对象的（ ）属性决定。A、BackColor B、BackStyle C、TextD、Caption8、程序运行时，若要通过回车键调用某命令按钮的Click 事件过程，则可设置该命令按钮的（ ）属性值为True 来实现。A、ValueB、EnabledC、DefaultD、Cancel9、当用户在窗体上单击鼠标时，不会触发的事件是（ ）A、ClickB、MouseDown C、MouseUpD、DblClick10、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是A、工程资源管理器窗口 B、工具箱窗口 C、代码窗口 D、属性窗口11、设 a=“Visual Basic”，下面
19、使 b=“Visual”的语句是A、b=Left(a,8,12) B、b=Mid(a,8,5) C、b=Rigth(a,6) D、b=Left(a,6) 12、若要使命令按钮不可用，则可设置其（ ）属性为False 来实现。A、Value B、Cancel C、Enabled D、Default13允许在菜单项的左边设置打勾标记，下面哪种论述是正确的？（） A在标题项中输入&然后打勾B 在 索 引 项 中 输 入 “” C在复选项中输入“”D 在 有 效 项 中 输 入 “” 14当执行以下过程时，在窗体上将显示（）。PrivateSubCommandl_Click( )Print “VB”
20、Print“Hello!”； Print “VB”End SubA. VBHello! VBB. VBHello!VBC. VBHello! VBD. VB Hello! VBE、VBHello!VB15、以下不属于键盘事件的是（ ）A、KeyDownB、KeyUpC、UnloadD、KeyPress 16、以下叙述中正确的是（ ）A、窗体的Name 属性指定窗体的名称，用来标识一个窗体B、窗体的Name 属性的值是显示在窗体标题栏中的文本 C、可以在运行期间改变对象的Name 属性的值D、对象的Name 属性值可以为空17、图像框或图片框中显示的图形文件，由它们的（ ）属性值决定。A、Dow
21、nPictureB、PictureC、ImageD、Icon18、文本框的（ ）属性用于设置或返回文本框中的文本内容。A、TextB、(名称)C、CaptionD、Name19、复选框或单选钮的当前状态可通过（ ）属性来返回或设置。A、CheckedB、ValueC、SelectedD、Caption 20、VB 提供（）属性用于控制对象是否可用。A、DefaultB、CancelC、EnabledD、Visible三、判断题(判断下列正确与否，正确的打，错误的打。)1、设置属性的语句格式为：“对象名属性名属性值”()2、若用户在键盘上按下一个键，则会产生一个单击事件（Click 事件） ()
22、3、VB 的赋值语句只能给变量赋值 ()4、在VB 中，字符型常量应使用”号将其括起来 ()5、窗体大小只能通过鼠标拖动窗体边框来设置()6. 在定义了一个函数后，可以象调用任何一个VB 内部函数一样使用它，即可以在任何表达式、语句或函数中引用它。（）7. Visual Basic 表达式为：1284+COS（28）（）8. Visual Basic 表达式为：3*cos (c+d)2 或 3*cos (c+d)*cos (c+d)() 9.VB 程序语言两个基本特点是：结构化和事件驱动编程。（ ）10工程资源管理器用于查看和管理工程类的文件，不能删除文件。（ ） 四、读程序题，写出程序运行结
23、果1. Private Sub Form_Click( ) Static Sum As IntegerFor I=1 To 10 Sum= Sum+INext I Print SumEnd Sub552. Private Sub Form_Click ( ) Print *；Tab(9);3,Tab(18);6 PrintFor I=15 to 16 Print I;For j=3 To 6 Step 3 Print Tab(3*j);j*I; Next jPrint Next I End Sub*361545901648963. Private Function Fac(n As Integ
24、er)As Integer Dim f As Integerf=f+n Fac =fEnd FunctionPrivate Sub Form_Click( ) Dim I As IntegerFor I=1 To 5Print ；I & = & Fac(I) Next IEnd Sub1=12=23=34=45=54. Private Sub Command1_Click( ) Text1.Text=努力End Sub“”Private Sub Command2_Click( ) Text1.Text=学习End Sub学习单击Command2 按钮，又单击Command1 按钮，在文本框中显
25、示什么？ 五、编程题11、在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1。要求每一秒钟在文本框中显示一次当前的时间。程序如下，请在下划线上填入恰当的内容。Private Sub Timer1_ () TxtTime.text= End Sub Timertime2、在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click()For a=1 To 4 For b=0 To aPrint Chr(65+a) Next bPrint Next aEnd Sub程序运行后，如果单击命令按钮，则在窗体上显
26、示的内容是什么？B BC C CD DD DE E E E E3、在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Load()Text1.Text=”计算机”End SubPrivate Sub Text1_Change()Picture1.Print“等级考试”End Sub程序运行后，在文本框中显示的内容是而在图片框中显示的内容是在文本框中显示的内容是计算机而在图片框中显示的内容是等级考试参考答案： 一、 填空题（1）MsgBox 函数 （2）其值不能改变（3）长整型（4）单击“运行”菜单下的启动（5）单击工具栏上的启动按钮（6）按F5 键（
27、7）Setfocus（8）项目列表（9）对其它控件 （10）属性 （11）取消(&C)（12）Cancel(13) True （14）Static（16）Dim（17）Private（18）可以每隔一个时间段（19） Value（20）Unload 二、选择题1B2B3A4.A5.A 6A7.D8. C9.D10.C11. D12. C13. C14.B15.C16. A17. B18. A19.B20 . C三、判断题1. 2.3. 4.F 在 VB 中，字符型常量应使用”号将其括起来 5. F6.F7. F正确的形式是：128/4+COS（28*3.14159/180）8. 9. FVB 的两个基本特点是：可视化设计和事件驱动编程。 10. F
