《VB综合单元练习题一.doc》由会员分享,可在线阅读,更多相关《VB综合单元练习题一.doc(17页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、VB单元练习题一一、选择题1、 Visual Basic集成开发环境中不包括下列哪些窗口?( D)A. 工具箱窗口 B. 工程资源管理器窗口 C. 属性窗口 D. 命令窗口2、 “一辆小客车在正常行进过程中被一辆大型货车撞坏了”,在这句话中,“客车”,“小”,“行进”和“被一辆大型货车撞坏了”分别对应Visual Basic中的哪些术语?( B )A. 对象、属性、事件、方法 B. 对象、属性、方法、事件C. 属性、对象、事件、方法 D. 属性、对象、方法、事件3、对象的特征和状态特征称为?( C )A. 事件 B. 方法 C. 属性 D. 类4、下面哪一个属性用来标识对象的名称?(D )A.
2、 Caption B. Value C. Text D. Name5、下列哪个符号是合法的变量名? ( A ) A. VB123 B. Abs C. 99Ji D. xy6、数学式子10sin25o写成Visual Basic表达式是?(D) A. 10sin25 B. 10*sin(25) C. 10*sin(25o) D. 10*sin(25*3.14/180)7、Visual Basic中不存在下列哪一种数据类型?(D ) A. 字符串类型 B. 日期类型 C. 逻辑类型 D. 指针类型8、表达式Left(“Visual”,3)+Lcase(“AB”)的值是?(C) A. visAB B
3、. VisAB C. Visab D. ualab9、表达式6+10 Mod 4*2+1的值是?(A) A. 9 B. 11 C. 1 D. 310、把数值型转换为字符串型需要使用下列哪一种函数? (B) A. Val() B. Str() C. Asc() D. Chr()11、VB中窗体文件的扩展名是_。(B)(A)VBP(B)FRM(对)(C)VBW(D)PDM12、在设计应用程序时,通过_窗口可以查看到应用程序工程中的所有组成部分。(D)(A)代码窗口(B)窗体设计窗口(C)属性窗口(D)工程资源管理器窗口(对)13、在VisualBasic中,所有的窗体和控件都必定具有的一个属性是_
4、。(A)Name(对)(B)Font(C)Caption(D)FillColor14、对变量名说法不正确的是_C_。(A)必须是字母或汉字开头,不能是数字或其他字符 (B)不能是VB的保留字(C)可以包含字母、数字、下划线和标点符号(D)不能超过255个字符15、以下变量名中,_是不符合VisualBasic的命名规范的。(A)Abc901(B)_mnu_Open_234(对)(C)price_(D)K16、在窗体上画一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click()DimbAsIntegerb=b+1EndSub运行程序,三次单
5、击命令按钮后,变量b的值是:_。(A)0(B)1(对)(C)2(D)317、下列程序段的执行结果为_。X=5:Y=-20If Not X0 ThenX=Y-3ElseY=X+3EndifPrint X-Y;Y-X(A)-3 3(对)(B)5 8(C)3 3(D)25 2518、当x为偶数时,则在窗体上显示“偶数”,否则显示“奇数”,不能实现该代码段功能的是(A)if x2=x/2 then print偶数 else print奇数 (B)if x mod2=0 then print偶数else print奇数(C)if not x mod 20 then print偶数else print奇数
6、 (D)if x2=int(x/2 )then print偶数else print奇数(对)19、若要执行下列程序段后窗体上显示红字,则x可取的值为:Select case int(x/10)case2,4,6,8print黄case1,3,5,7,9print绿case elseprint红end select(A)27(B)38(C)10(D)5(对)20、在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是_。(A)Picture1.Picture=mypic.jpg (B)Picture1.Image=mypic.jpg(C)Picture1.Picture=Lo
7、adPicture(mypic.jpg)(对) (D)LoadPicture(mypic.jpg)21、大部分控件都没有的属性是_。(A)Top(B)Name(C)Enabled(D)Interval(对)22、下列属于正确的字符串常量的是_ (A)#ABC(B)$ABC$(C)ABC(D)ABC(对)23、设a=8,b=10,则以下表达式的值为真的是_ (A)(-3+5a)and(b0)(B)a=bandb12(C)not(b0)(D)(ab)or(b0)(对)24、语句Z=y+1代表_ (A)将变量Z存入变量y中,再加上1的表达式 (B)变量Z取得y+1的值(对)(C)变量Z取得变量y的值
8、,然后再加上1的一个表达式 (D)将变量Z存入变量y+1中25、执行下面的语句后,所产生的信息框的标题是_。A=MsgBox(AAAAA,3,BBBBB) (A)BBBBB(对)(B)AAAAA(C)空(D)出错,不能产生信息框26、执行下列代码,分别输入12和89,输出结果是_。Private Sub Form_Click()a=InputBox(D)b=InputBox(E)Print a+bEnd Sub(A)101(B)DE1289(C)DE(D)1289(对)27、为了暂时关闭计时器,应把该计时器的某个属性设置为False,这个属性是_。(A)Enabled(对)(B)Visible
9、(C)Timer(D)Interval28、下列表达式,哪一个可以产生1到6之间的随机整数(包括1和6)_。(A)Int(Rnd*7)(B)Int(Rnd(6)+1)(C)Int(Rnd*6) (D)Int(Rnd*6+1)(对)29、执行下列程序,从键盘输入10,运行结果是_。PrivateSubCommand1_Click()S=InputBox(请输入一个数字:)Select Case SCase Is0Print 0Case Is3Print 3Case Is5Print 5End SelectEnd Sub (A)0(对)(B)3(C)5(D)030? VB6.0共有3个版本,它们分
10、别是_A_? A 学习版、专业版和企业版 B 标准版、专业版和企业版C 学习版、标准版和网络版 D 标准版、专业版和中文版31? VB的集成开发环境中有_C_工作状态A 一种? B? 两种 C 三种? D? 四种32? VB6.0的集成开发环境不包括_D_A 窗体窗口? B 工具箱 C 代码窗口? D 过程窗口33? VB6.0集成开发环境有三种工作状态,不属于三种工作状态之一的是_B_A 设计状态? B? 编写代码状态 C 运行状态? D 中断状态34? 用VB设计的应用程序,文件的扩展名中不含_D_A ?.Frx? ?B? .Bas C? .Vbp? D? .Form35? 以下说法正确的
11、是_B_A 属性窗口包括:标题栏、对象名称的单选按钮、选项卡、属性列表、属性含义说明B 属性窗口包括:标题栏、对象名称的下拉列表、选项卡、属性列表、属性含义说明C属性窗口包括:菜单栏、对象名称的单选按钮、选项卡、属性列表、属性含义说明D属性窗口包括:菜单栏、对象名称的下拉列表、选项卡、属性列表、属性含义说明36VB中,强制变量声明的语句是_A_。 AOption Explicit BOption Base CREM DPUBLIC37? VB6.0集成开发环境有三种工作状态,工作状态显示在_D_。A 状态栏的最左方? B 状态栏的最右方 C 状态栏的中括号内 D 标题栏的中括号内38? 在界面
12、设计时,双击窗体中的对象后,VB将显示的窗口是_B_。A 立即窗口? B 代码窗口 C 属性窗口? D 项目(工程)窗口39? 下述选项中,属于VB的程序设计方法是_B_。A 面向对象、顺序驱动 B 面向对象、事件驱动C 面向过程、事件驱动 D 面向过程、顺序驱动40VB集成开发环境中,功能键F5的功能是_D_。A 进入帮助窗口 B 进入编辑状态 C 进行上下窗口的切换 D 运行程序41VB设计的应用程序,扩展名为.Vbp的文件是_C_。A 窗体文件? B 类文件 C 工程文件? D 标准模块文件42VB 设计的应用程序,扩展名为.Frm的文件是_A_。A 窗体文件? B类文件 C 工程文件?
13、 ?D 标准模块文件43用VB可视化程序设计语言设计应用程序的主要工作是完成_B_。A 设计流程和编写代码 B 设计界面和编写代码C 设计算法和编写代码 D 设计程序和编写代码44在VB 6.0中,12345&的数据类型是(B)A 整数型 B 长整数型 C 字符常数 D 双精度常数45在VB6.0中,语句Dim M1#,Abc,Xyz As Single定义的M1、Abc 和Xyz的类型分别是(D)A双精度、整数型、单精度 B双精度、单精度、单精度C双精度、整数型、整数型 D双精度、可变类型、单精度46在VB6.0中,下列不正确的Integer型常数是_A_。A 32768 B 0 C 037
14、% D 2222247在VB6.0K ,#的类型是_D_。A 整数型 B长整数型 C 字符常数 D双精度常数48方法PRINT 2030输出结果是_D_。A “2030” B2030 C 出现错误信息 D 049假定Bln1是逻辑型变量,下面赋值语句中正确的是_D_.A Bln1=True BBln1=.True. C Bln1=#True# DBln1=3450在以下运算符中,优先级最低的是(C)A / B C Mod D51VB6.0中,执行下面的四个语句时出现错误的是(C)A x=SGN(0) B x=SQR(1) C x=LOG(0) D x=SIN(1)52VB 6.0表达式COS(
15、0)+ABS(-1)+INT(RND(1)的值是(D)A 1 B1 C 0 D253设a为整型变量,不能正确表达数学关系6a15的VB6.0表达式是(A)A 6a15 B Not(a=6) And a6 And a6 And Not (a=15)54骰子是一个正六面体,用16这六个数分别代表这六面,掷一次骰子出现的数可表示为(D)A INT(RND(6)+1) BINT(RND*6) C INT(RND(1)*7) DINT(RND(1)*6+1)55逻辑运算符And,Or和Not的优先顺序,从高到低是_C_A Or-And-Not BAnd-Not-Or C Not-And-Or DNot-
16、Or-And56计算b的自然对数使用的Visual Basic表达式是_A_A Log(b) BLg(b) C Loge(b) DLge(b)57方法Print 28 Mod 15 输出结果是_D_A “28 Mod 15” B 28 Mod 15 C -13 D1358已字母A的ASCII码为十进制的65,表达式Asc(“A”)+Asc(“C”)的值是_B_A 6567 B132 C “AC” DAC59若X=5、Y=6,则表达式X+Y=11的值是_C_A X+Y=11 B11 C True DFalse60下列执行语句后,V的值是_B_A$=”54321”V=Val(Mid$(A$,3,2
17、)A 43 B32 C 432 D061执行下列语句后,E、F、G的值分别是_B_E=5:F=4:G=3E=F:F=G:G=EA 3 4 5 B 4 3 4 C 4 5 4 D 4 5 5 62m,n是整数,且nm,在下面四个语句中,能将x赋值为一个mn之间(含m,n)的任意整数,即满足m=x=n的是_A_A x=INT(RND*(n-m+1)+m Bx=INT(RND*n)+m C x=INT(RND*m)+n Dx=INT(RND*n-m)+m63VB6.0表达式Log(1)+ABS(-1)+Int(Rnd(1)的值是 _C_A -1 B 0 C 1 D 264VB表达式10-2的值是_B
18、_A 100 B0.01 C 100 D0.0165VB6.0表达式Len(Left(“abcd”,2)+Right(“济南学院”,2)的值为_B_A 2 B 4 C 6 D 866 Load事件是在窗体被装入工作区时(D)触发的事件。A 用户 B 程序员 C 手工 D 自动67 修改控件属性,一般可以使用属性窗口,也可以通过(D)为属性赋值。A 事件 B 对象 C 方法 D 代码68下面是窗体的四个属性,在界面设计时,改变属性值就看不到窗体变化的属性是_D_。A Top B Width C Left D Enabled69下面四个选项,不是事件的是_B_。A Load B Enabled C
19、 Unload D DblClick70以下叙述正确的是_A_。A 窗体(名称)属性是用来标识窗体的 B 窗体(名称)属性的值显示在窗体的标题栏中C 可以在运行期间改变窗体的(名称) D 窗体的(名称)属性值可以为空71决定窗体标题条显示内容的属性是_C_。A (名称) B Text C Caption D Top72若要使某文本框获得控制焦点,可使用的方法是_C_。A LostFocus B Point C SetFocus D GotFocus73以下选项中,不是Visual Basic6.0缺省控件名称的是_D_。A Command1 B Textl C labell D Change7
20、4若要将某命令按钮设置为默认命令按钮,则应设置为True 的属性是_C_。A Enabled B Cancel C Default D Value75命令按钮不能响应的事件是_A_。A DblClick B clickC MouseDown D MouseUp76在VB6.0中,合法的字符串常数是_B_。A ABC$ B“3+4” C ABC D3+4二、填空题1、下列哪些可以作为变量?12fd x13 r2 a2 23a22、下列哪些可以作为常量?并说明是数值型还是字符型、逻辑型、日期型? “asdf”asdf 1234 1234 #2008/11/10# true false a33、把下
21、列数学式子写成VB表达式4、计算下列VB表达式的值(要求写出步骤)5*3*628/4*2.5/1.25*(3.7+2.5)184*4.02/1.6253 Mod 3*2263 Mod 0.4*Sqr(25)8/4*5/2.5*(3.25+6.75)3*7214/5*2155*2271/327(1/3)sqr(100)4*25、 按下列要求写出赋值语句(1)把数值234赋给变量a(2)把字符串abc赋给变量z1(3)把标签Lblts的内容改为”姓名”6、 写出下列函数的值Int(-3.14159)Sqr(sqr(16)7、随机产生a-b范围内(包括b)整数的公式:_8、写出输入输出语句输出对话框
22、:要求使用图标,标题为:”输出对话框” ,对话框中的内容是”你输错了”_VB单元练习题二1.下列叙述中正确的是(C)? A.只有窗体才是Visual Basic中的对象 B.只有控件才是Visual Basic中的对象 C.窗体和控件都是Visual Basic中的对象 D.窗体和控件都不是Visual Basic中的对象2.确定一个控件在窗体上的位置的属性是(D)? A.Width或Height B. Width和Height C.Top或Left D.Top和Left3. 为了同时改变一个活动控件的高度和宽度,正确的操作是 (A)? A.拖拉控件4个角上的某个小方块 B.只能拖拉位于控件右
23、下角的小方块 C.只能拖拉位于控件左下角的小方块 D.不能同时改变控件的高度和宽度4、用户在屏幕上画出应用程序界面,并设置好对象的属性,即可完成界面的设计工作,这称为:( D )A、面向对象的程序设计 B、结构化程序设计C、事件驱动的编程机制 D、可视化程序设计5、VB6共有三个版本,按功能从弱到强的顺序排列应是( C )A、学习版、专业版和工程版 B、学习版、工程版和专业版C、学习版、专业版和企业版 D、学习版、企业版和专业版6、VB集成开发环境有三种工作状态,不属于三种工作状态之一的是( B )A、设计状态 B、编写代码状态 C、运行状态 D、中断状态7、工程文件的扩展名是(B)、.frm
24、 B、.vbp 、.bas 、.frx8、窗体文件的扩展名是(A)、.frm B、.vbp 、.bas 、.frx9、VB集成开发环境可以( D )A、编辑、调试、运行程序,但不能生成执行程序B、编辑、生成可执行程序、运行程序,但不能调试程序C、编辑、调试、生成可执行程序,但不能运行程序D、编辑、调试、运行程序,也能生成执行程序10、标准模块文件的扩展名是(C)、.frm B、.vbp 、.bas 、.vbg11用于获得字符串S从第5个字符开始的3个字符的函数是(A )。A Mid(S,5,3) B.Middle(S,5,3) C.Right(S,5,3) D.Left(S,5,3)12.用于
25、从字符串左边截取字符的函数是(D)。A、Ltrim( )B、Trim( )C、Instr( )D、Left( )13.用于去掉字符串左右两边的空格的函数是(B)。A、Ltrim( )B、Trim( )C、Left( )D、Instr( )14. 假定窗体的名称(Name属性)为Form1,则把窗体的标题设置为“VB Test”的语句为(B)? A. Form1 = VB Test B.Caption =VB Test C.Form1Text = VB Test D.Form1.Name =VB Test15 下列说法中正确的是:为了保存一个Visual Basic应用程序,应当 (D) A.只
26、保存窗体模块文件(.frm) B.只保存工程文件(.vbp) C.分别保存工程文件和标准模块文件(.bas) D.分别保存工程文件、窗体文件和标准模块文件16. 要使一个标签框对象能够显示所需要的文本,应设置该对象的那一个属性的值?( A) A. Caption B. Text C. Name D.AutoSize 17. 要使一个命令按钮称为图形式命令按钮,应设置该队象的哪一个属性值?(BA) A.Picture B.Style C.DownPicture D.DisabledPicture 18. 为使计时器对象每隔5秒钟产生一个时钟事件(Timer事件),则其Interval属性值应设置
27、为(D) A.5 B.300 C.500 D.500019. 一个标准的VB应用程序至少要包含一个(C)对象。 A.文本框 B.标签框 C.窗体 D.命令按钮 20. 要使一个文本框对象能够显示多行文字,应设置该对象的(B)属性值为 True. A.Text B.MultiLine C.Style D.Visible 21、双击窗体中的对象后,VB将显示的窗口是( C )A、工具箱 B、项目(工程)窗口 C、代码窗口 D、属性窗口22、下述先项中,属性VB的程序设计方法是( B )A、面向对象、顺序驱动 B、面向对象、事件驱动C、面向过程、事件驱动 D、面向过程、顺序驱动23、下面是窗体的四个
28、属性,在界面设计时,改变属性值看不到窗体变化的是( D )A、Top B、Width C、Left D、Enabled24、下面四个选项,不是事件的是( B )A、Load B、Enabled C、Unload D、DblClick25、用来设置窗体背景图片的属性是( B )A、Moveable B、Picture C、ForeColor D、WindowState26、在VB6中的每一个对象都具有自己的属性、_C_和方法。A、控件 B、函数 C、事件 D、公用过程 27计算结果为0的表达式是(B )。 A Int(3.4)+Int(-3.8) B.Int(3.4)+Fix(-3.8) CFi
29、x(3.4)+Fix(-2.8) D.Fix(3.4)+Int(-3.8)28. 假设A=3,B=7,C=2,则表达式 NOT ( BA 的值是(B) A.True B.False C.表达式错误 D.不确定29.在表达式 y = InputBox ( a, b, c ) 中,a,b,c分别为输入函数对话框的(B)(A)(C)。 A.标题 B.提示 C.预设值 D.帮助文件名 30.在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a = InputBox(Enter the First integer)b = InputBox(Enter
30、the Second integer)Print b + aEnd Sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入456和123,则输出结果是(D)? A.579 B.123 C.456 D.31.在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()Dim a, b As Integera = InputBox(Enter the First integer)b = InputBox(Enter the Second integer)Print b + aEnd Sub程序运行后,单击命令按钮,先后在两个输入对话框中分别输入45
31、6和123,则输出结果是 (A)? A.579 B.123 C.456 D.32.执行下面的语句后,所产生的信息框的标题是a=MsgBox(AAAA,BBBB,5)(A)? A.BBBB B.空 C.AAAA D.出错,不能产生信息框33.假定x的值为5,则在执行以下语句时,其输出结果为Result的Select Case语句是(C)A. Select Case x Case 10 To 1Print Result End Select B.Select Case x Case Is 5, Is 5Print Result End Select C. Select Case x Case Is
32、 5, 1, 3 To 10Print Result End Select D. Select Case x Case 1, 3, Is 5 Print Result End Select34. 假定有以下循环结构 Do Until条件循环体 Loop则正确的描述是 (B)? A.如果条件是一个为0的常数,则一次循环体也不执行B.如果条件是一个为0的常数,则无限次执行循环体C.如果条件是一个不为0的常数,则至少执行一次循环体D.不论条件是否为真,至少要执行一次循环体35.以下程序段的输出结果为x=1y=4Do Until y 4x=x*yy=y+1LoopPrint x (B)? A.1 B.
33、4 C.8 D.2036. 执行下面的程序段后,x的值为 x=5 For i = 1 To 20 Step 2 x=x+i5 Next i (A)? A.21 B.22 C.23 D.2437. 在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() x=0 Do Until x = -1 a=InputBox(请输入 A的值) a=Val(a) b=InputBox(请输入B的值) b=Val(b) x=InputBox(请输入x的值) x = Val(x) a=a+b+x Loop Print aEnd Sub程序运行后,单击命令按钮,依次
34、在输入对话框中输入5、4、3、2、1、-1,则输出结果为 (A)? A.2 B.3 C.14 D.1538如果要在文本框中键入字符时,只显示某个字符,如星号(*),应设置文本框的( B )属性。ACaption BPasswordChar CText DChar39.退出For循环可使用的语句为(A)。 A、Exit For B、End ForC、Exit DoD、End Do40.退出DoLoop循环可使用的语句为(C)。 A、Exit For B、End ForC、Exit DoD、End Do41.退出函数过程可使用的语句为(D)。 A、Exit sub B、End subC、End F
35、unction D、Exit Function42.退出sub过程可使用的语句为(A)。A、Exit sub B、End subC、End Function D、Exit Function43. 在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程: Private Sub Form_Load() Text1.Text= Text1.SetFocus For i=1 To 10Sum = Sum + i Next i Text1.Text = SumEnd Sub上述程序的运行结果是 (C)? A.在文本框Text1中输出55 B.在文本框Text1中输出0C.出错 D.在
36、文本框Text1中输出不定值44.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1),然后编写如下事件过程:Private Sub Command1_Click() x=0 Do While x 50x=(x+2)*(x+3)n=n+1 Loop Text1.Text = Str(n) Text2.Text = Str(x)End Sub程序运行后,单击命令按钮,在两个文本框中显示的值分别为 (B)? A.1和0 B.2和72 C.3和50 D.4和16845.在窗体上画一个命令按钮,名称为Command1。然后编写如下程序:P
37、rivate Sub Command1_Click() For I= 1 To 4For J = 0 To IPrint Chr(65 + I);Next JPrintNext IEnd Sub程序运行后,如果单击命令按钮,则在窗体上显示的内容是(A)? A.BBCCCDDDDEEEEEB.ABBCCCDDDDC.BCCDDDEEEED.AABBBCCCCDDDDD46.在窗体上画两个名称分别为Label1和Label2的标签,然后编写如下事件过程Private Sub Form_Click()x= -5:s= -5Select Case sCase Is 0 y=x+1Case Is = 0 y=x+2Case Else y=x+3End SelectLabel 1.Caption = xLabel2.Caption = yEnd Sub程序运行后,单击窗体,标签Label1和Label2中显示的内容分别是 (A)? A.-5 和 -2 B.-5 和 -4 C.-5 和 -3 D.-5 和 547. 下列程序段执行后输出的结果是(A) Dim x as Integer n=10For k=n To 1 x = k2Next kPrint x A.没有输出 B.-1 C.1 D.0 48 下列程序段执行后输出的结果是(A) i=0For k=10 To