VB模拟试题(参考)求答案啊.doc

计算机应用模拟题一、 单项选择题（共20分，每题1分）1、标签控件提供了在窗体相对固定的位置显示文本的区域，和它具有同样功能的控件是（ ）。A.文本框 B.命令按钮C.图片框 D.以上各控件都不对2、文本框不具有的属性是（ ）。A.Multiline B.CaptionC.Font D.Height3、命令按钮不具有的属性是（ ）。A.Font B.MultilineC.Enabled D.Visable4、单选按钮不具有的属性是（ ）。A.Value B.CaptionC.Text D.Font5、计时器没有的属性是（ ）。A.Interval B.EnableC.Size D.Index6、设有如下语句：Dim a，b As Integerc=VisualBasicd=#7202005#以下关于这段代码的叙述中，错误的是（ ）。A.a被定义为Integer类型变量B.b被定义为Integer类型变量C. c中的数据是字符串D.d中的数据是字符串类型7、以下可以作为Visual Basic变量名的是（ ）。A. A#A B.counstAC. 3A D. ?AA8、设x=4，y=6，则以下不能在窗体上显示出“A=10”的语句是（ ）。A. Print A=x+y B. PrintA=;x+yC. Print A=+Str(x+y) D. PrintA=&x+y9、假定有如下的命令按钮(名称为Command1)事件过程：Private Sub Command1_Click()Dim x as integerx=InputBox(输入：，输入整数)MsgBox ”输入数据：+x, , 输入的数据是：”End Sub程序运行后，单击命令按钮，如果从键盘上输入整数10，则以下叙述中错误的是（ ）。 A. x的值是10B. 输入对话框的标题是“输入整数”C. 信息框的标题是“输入数据：10”D. 信息框的标题是“输入的数据是：”10、在VisualBasic环境下，当写一个新的VisualBasic程序时，所做的第一件事是（ ）。A.编写代码B.新建一个工程C.打开属性窗口D.进入VB环境11、要求改变窗体的标题时，应当在属性窗口中改变的属性是（ ）。A.CaptionB.NameC.TextD.Label12、窗体能响应的事件是（ ）。A.ActiveFromB.DriveC.LoadD.Change13、若要求从文本框中输入密码时在文本框中只显示*号，则应当在此文本框的属性窗口中设置（ ）。 A.Text属性值为* B.Caption属性值为* C.password属性值为空D.Passwordchar属性值为*14、如果要求设置定时器时间间隔为1秒钟，那么它的Interval属性值应该等于（ ）。 A.1000B.100C.10D.115、VisualBasic提供的选择框（CheckBox）可具有功能是（ ）。A.多重选择 B.单一选择 C.选择多次 D.选择一次16、VisualBasic规定窗体文件的扩展名是（ ）。A.forB.frmC.vbpD.bas17、创建应用程序的界面时，在窗体上设置了一个命令按钮，运行程序后，命令按钮没有出现在窗体上，可能的原因是（ ）。 .该命令按钮的 Value 属性被设置为 False.该命令按钮的 Enabled 属性被设置为 False.该命令按钮的 Visible 属性被设置为 False.该命令按钮的 Default 属性被设置为 True18、若需要在同一窗口内安排两组相互独立的单选按钮（OptionButton），可使用 （ ）控件将它们分隔开。 .TextBox . Label .Image .Frame 19、Integer类型的变量X在 Select Case X 结构中，描述判断条件 3 X 7 的测试项应该写成（ ）。 . Case 3 X 7 . Case 3 X ， X 7 . Case Is 7 ， Is 3. Case 3 To 7 20、窗体设计器是用来设计（ ）。A.应用程序的代码段 B.应用程序的界面C.对象的属性 D.对象的事件1.确定一个控件或窗体的大小的属性是（ ）A. width 或height B. width和 height C. top或left D. top和left2. 与传统的程序设计语言相比，VB最突出的特点是（ ）A. 结构化程序设计 B事件驱动编程机制C程序开发环境 D. 程序调试技术3下列可作为Visual Basic变量名的是A. A#A B. 4A C. ?xY D. constA4.在VB6中integer类型数据占多少个字节（） A2 B4 C8 D 105以下选项中，不属于文本框的属性是（ ）。AEnabled B. Caption C.Name D. Multiline6. 执行如下两条语句，窗体上显示的是 a=9.8596 Print Format(a,$00,00.00)A) 0,009.86 B) $9.86 C) 9.86 D) $00,09.867.要求从文本框中输入密码时在文本框中只显示#号，则应用在此文本框的属性窗口中设置（ ）。AText属性值为# B. Caption属性值为#CPasswordchar属性值为# D. Passwordchar属性值为真8函数String(n，str)的功能是A.把数值型数据转换为字符串B.从字符串中取出n个字符C.返回由str首字母组成的的n个字符串D.从字符串中第n个字符的位置开始取子字符串9表示空格，以下语句的输出结果是（ ）a=23b=66print a;bA. 2366 B. 2366 C. 2366 D. 236610. 使文本框获得焦点的方法是（ ）A change Bgotfocus Clostfocus D setfocus11. 设a=2，b=3，c=4，d=5，表达式a2 and a=c or 2*ac的值是( )A. true B. false C. -1 D. 112.表达式5*55/5的输出结果是（ ）A. 5 B. 25 C. 0 D. 113. 删除列表框中指定的项目所使用的方法是（ ）A. Move B. RemoveItem C. Clear D. Remove14.合法的单精度型变量是（ ）A. num! B. sum% C. a$ D. mm# 15.不论任何控件，共同具有的属性是（ ）A. Text B. Name C. ForeColor D. Caption16.执行语句a=msgbox(“AAAA”, ,”BBBB”)后，所产生的信息框的标题是（ ）A. AAAA B. 空 C. BBBB D .出错，不能产生信息框17.下面过程语句说明合法的是（ ）A. sub f1 (ByVal n%() B. sub f1(n%) as integer C. function f1%(f1%) D. function f1( byval n%)18. 若要使命令按钮是否可见，要设置哪个属性（）A. Enabled B. Visible C. Backcolor D. Backstyle1工程文件的扩展名是（ ）。Avbg B.vbpC.vbw D.vbl2. VB采取了（ ）的程序机制。A.事件驱动 B. 按过程顺序执行C从主程序开始执行 D.按模块顺序执行3下列可作为Visual Basic变量名的是（ ）A. A#A B. 4A C. ?xY D. constAn6.以下不属于VB的工作模式的是（ ）。A编译模式 B. 设计模式 C.运行模式 D. 中断模式9当执行以下过程时，在窗体上将显示（ ）。Private Sub Command1_Click( ) Print “VB” Print“Hello!”； Print “VB”End SubA. VB Hello! VBB. VB Hello!VBC. VBHello! VB D. VBHello!VB10. 要使print方法在form_load事件中起作用，要对窗体的（ ）属性进行设置。A. BackColor B. ForeColor C. AutoRedraw D.Caption11.以下关于过程及过程参数的描述中，错误的是( )A. 过程的参数可以是变量、常量、表达式。B.用数组作为过程的参数时，使用的是传值方式。C.在函数过程体中必须对函数过程名赋值。D.调用子过程时，形参与实参要一一对应。12. 设x=4, y=8, z=7，表达式 xz) Or zx 的值是（ ） A. 1 B. -1 C. True D. False14.表达式Len(“VB程序设计”)的值是（ ）A .12 B. 6 C .10 D. 1717.在过程定义的变量，若想在离开该过程后，还能保存过程中的局部变量的值，则应使用关键字（ ）A. dim B. private C. public D. static19.若要使命令按钮不可操作，要设置哪个属性（）A. Enabled B. Visible C. Backcolor D. Backstyle20.如下数组声明语句，正确的是（）A. dim a3,4 as integer B. dim a(3,4) as integerC. dim a(m,n) as integer D. dim (3 4) as integer二、 填空题（共15分，每空1分）1、 窗体 和控件是创建界面的基本构件，也是创建应用程序所使用的对象。2、创建vb应用程序有四个主要步骤：（1）创建应用程序界面。（2）设置属性。（3事件过程及编程 。（4）运行和保存。3、在计算机中，文件随着分类方法的不同，名称也各不一致。根据数据的存取方式和结构，可以分为顺序文件、 随机文件 和二进制文件。4、在vb程序中使用变量，如果设置了Option Explicit，则在使用变量之前必须要进行 dim显示声明 。5、VB程序的运行采用 事件驱动 的机制。6、对象的三要素是指_属性_、_事件_和_方法_。7、下面表达式写成VB的表达式应当是_(12*x+5*y-sqrt(D3-M2)*sin(x)/exp(-x) 。8、根据下图写出InputBox函数中的参数为：InputBox(_strs1_,_“输入框”_,_100_)。9、声明一个包含10个整数的数组a的语句为_Dim s(1 To 10) As String _。10、调试程序时，如果想要程序在某条语句处暂停，则可以在该语句处设置 断点_。在调试过程中，可以在即时窗口中使用？加_print语句_察看该变量当前的值。1VB是面向对象的程序设计语言，面向对象系统三要素是属性、_事件_和_方法_。2.工程文件的扩展名是_vbp_, 窗体文件的扩展名是_frm_。3.假定一个文本框的名字是text1，在该文本框中显示”hello”，所使用的语句是_。4. D盘下有一个名为pic2.gif的图形文件，要在运行期间把该文件装入一个图片框picture1，应执行的语句为 picture1.picture = loadpicture（“d：|pic2.gif”_ _。5.为了选择多个控件，可以按住_shift_键，然后再单击。6.计时器事件之间的间隔通过_interval_属性设置7在程序中调用子过程需要指明_sub子程序名_ ，然后列出该子过程所要求的参数。8已知A=”12345678”，则表达式val(left(A,4)+mid(A,4,2)的值为123445_。1变量名最长可达_255_个字符。2在一行内写多条语句时，每个语句间用_；_ 符号分隔。3整数类型数据分别包括整型和_长整型_ 数据。4静态数组是指_数组大小不变_ 是固定不变的数组。5循环是一组重复执行的指令，重复次数由_循环变量_ 决定。6为了在运行时把d:pic文件夹下的图形文件a.jpg装入图片框Picturel，所使用的语句为_ 。7ListCount属性的值表示列表框或组合框中项目的数量，列表框或组合框最后一项的序号是 _ 。三、 程序填空题（共20分，每空2分）1、要在窗体上打印如图所示的九九乘法表。请在空白处填入适当的语句以实现该功能。 Dim s as string Dim i,j as integer For _ For _ s = _ Print Tab(j - 1) * 9 + 1); s; Next j Print Next i2、下面的代码段用于判断两个数x和y的大小，并始终在x中存放较大的数。请在空白处填入适当的语句以实现该功能。If_then _ _ _end if3、下面的代码段实现求100-200之间所有偶数的和。请在空白处填入适当的语句以实现该功能。Dim i as integerDim sum as long_For i=100 to 200_ _Next IPrint sum4 .随机产生六位学生的分数（1100），存放在数组a中，并显示结果。Private Sub Form_Click ( ) Dim a(1 to 6) For i = 1 to 6 a(i)= _ print a(i) _End Sub5. 设有以下循环，要执行3次循环体，请填空。x=1do while _ x=x+2loop6. 计算n!的程序n5: x1: i=1 Do _x=x*i_ i=i+1 Loop While _i=10，Is=-10 y=x Case -10 To 10 y=-x End SelectText2.Text=yEnd Sub运行程序后，在Text1文本框中输入3，然后单击命令按钮，此时，Text2文本框显示的结果为 9 。在Text1文本框中重新输入5，然后单击命令按钮，此时，Text2文本框显示的结果为 -5 。2、在窗体上放置一个按钮，名称为Command1，编写其单击事件过程如下：Option Explicit Private Sub Command1_Click() Static S As Integer Dim i As Integer S=1 For i =1 to 5 S=S*i Next i Print SEnd Sub运行该程序，并单击按钮，此时窗体上显示的运行结果为 120 。3、程序代码如下：Private Sub Form_Load() Dim i As Integer For i = 1 To 2 Hello MingCheng Next iEnd SubPrivate Sub Hello() Print 您好,;End SubPrivate Sub MingCheng() Print VB!End Sub运行该程序，窗体上的显示结果为 您好，VB！ 您好，VB！4. Private Sub Form_Click( )Static Sum As IntegerFor i=1 To 10 step 2 Sum= Sum+iNext iPrint SumEnd Sub单击窗体，显示结果为 25 。5. Private Sub Form_Click ( ) Dim a$, i%, c$ a= InputBox$(“输入字符串”) n=len(a) For i = 1 to Int(n2) c= Mid(a, i, 1) Mid(a, i, 1) = Mid(a, n+1-i, 1) Mid(a, n+1-i, 1)=c Next i Print aEnd Sub若输入ABCDEF，则结果是 FEDCBA 。6. Private Sub Form_Click( )Static Sum As IntegerFor i=1 To 6 Sum= Sum+iNext iPrint SumEnd Sub运行结果：217. Private Sub Form_Click ( ) Dim x%,y%,z% x=242 : y=44 z=x*y do while xy if xy then x=x-y else y=y-x loop print x , z/xEnd Sub运行结果： 22 4848. Dim a, b% a = Array(1, 2, 3, 4, 5) b = 2 For i = 0 To UBound(a) b = b * a(i) Next iPrint b运行结果：2409. public sub f1(n%, ByVal m%)n=n mod 10m=m10end subprivate sub command1_click() dim x%, y% x=12 : y=34 call f1(x,y) print x,yend sub运行结果：2 3410. 编程题（本科生要求下面4个题目全做，第1、3题7分