VB期中练习题-答案
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. Caption
B. Value
C. Text
D. Name
5、下列哪个符号是合法的变量名? （A ）
A. VB123
B. Abs
C. 99Ji
D. x\y
6、数学式子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. VisAB
C. Visab
D. ualab
9、表达式6+10 Mod 4*2+1的值是？（A）
A. 9
B. 11
C. 1
D. 3
10、把数值型转换为字符串型需要使用下列哪一种函数? （B）
A. Val()
B. Str()
C. Asc()
D. Chr()
11、VB中窗体文件的扩展名是______。
(A)VBP (B)FRM(对)(C)VBW (D)PDM
12、在设计应用程序时，通过______窗口可以查看到应用程序工程中的所有组成部分。
(A)代码窗口(B)窗体设计窗口 (C)属性窗口(D)工程资源管理器窗口(对)
13、在VisualBasic中，所有的窗体和控件都必定具有的一个属性是______。
(A)Name(对)(B)Font (C)Caption (D)FillColor
14、对变量名说法不正确的是______。
(A)必须是字母开头，不能是数字或其他字符
(B)不能是VB的保留字
(C)可以包含字母、数字、下划线和标点符号(对)
(D)不能超过255个字符
15、以下变量名中，______是不符合VisualBasic的命名规范的。
(A)Abc901 (B)_mnu_Open_234(对)(C)price_ (D)K
16、在窗体上画一个命令按钮（名称为Command1），然后编写如下事件过程：
Private Sub Command1_Click()
Dim bAs Integer
b=b+1
End Sub
运行程序，三次单击命令按钮后，变量b的值是：______。
(A)0 (B)1(对)(C)2 (D)3
17、下列程序段的执行结果为______。
X=5:Y=-20
If Not X>0 Then
X=Y-3
Else
Y=X+3
Endif
Print X-Y;Y-X
(A)-3 3(对) (B)5 8 (C)3 3 (D)25 25
18、当x为偶数时，则在窗体上显示“偶数”，否则显示“奇数”，不能实现该代码段功能的是
(A)if x\2=x/2 then print"偶数" else print"奇数"
(B)if x mod2=0 then print"偶数"else print"奇数"
(C)if not x mod 2<>0 then print"偶数"else print"奇数"
(D)if x\2=int(x/2 )then print"偶数"else print"奇数"(对)
19、若要执行下列程序段后窗体上显示“红”字，则x可取的值为：
Select case int(x/10)
case2,4,6,8
print"黄"
case1,3,5,7,9
print"绿"
case else
print"红"
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=LoadPicture("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+5>a) and (b>0) (B)a>=b and b>12 (C)not (b>0) (D)(a>b) or (b>0)(对)
24、语句Z=y+1代表________
(A)将变量Z存入变量y中，再加上1的表达式
(B)变量Z取得y+1的值(对)
(C)变量Z取得变量y的值，然后再加上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+b
End Sub
(A)101 (B)DE1289 (C)DE (D)1289(对)
27、为了暂时关闭计时器，应把该计时器的某个属性设置为False，这个属性是_______。
(A)Enabled(对)(B)Visible (C)Timer (D)Interval
28、下列表达式，哪一个可以产生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 S
Case Is>0
Print ">0"
Case Is>3
Print ">3"
Case Is>5
Print ">5"
End Select
End Sub
(A)>0(对) (B)>3 (C)>5 (D)>0
30．VB6.0共有3个版本，它们分别是_______
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．.Form
35．以下说法正确的是___B____
A．属性窗口包括：标题栏、对象名称的单选按钮、选项卡、属性列表、属性含义说明B．属性窗口包括：标题栏、对象名称的下拉列表、选项卡、属性列表、属性含义说明C．属性窗口包括：菜单栏、对象名称的单选按钮、选项卡、属性列表、属性含义说明D．属性窗口包括：菜单栏、对象名称的下拉列表、选项卡、属性列表、属性含义说明36．VB中，强制变量声明的语句是___A____。
A．Option Explicit B．Option Base C．REM D．PUBLIC
37．VB6.0集成开发环境有三种工作状态，工作状态显示在_______。
A．状态栏的最左方B．状态栏的最右方
C．状态栏的中括号内D．标题栏的中括号内
38．在界面设计时，双击窗体中的对象后，VB将显示的窗口是______。
A．立即窗口B．代码窗口C．属性窗口D．项目（工程）窗口
39．下述选项中，属于VB的程序设计方法是____B___。
A．面向对象、顺序驱动B．面向对象、事件驱动
C．面向过程、事件驱动D．面向过程、顺序驱动
40．VB集成开发环境中，功能键F5的功能是___D____。
A．进入帮助窗口B．进入编辑状态
C．进行上下窗口的切换D．运行程序
41．VB设计的应用程序，扩展名为.Vbp的文件是____C__。
A．窗体文件B．类文件C．工程文件D．标准模块文件
42．VB 设计的应用程序，扩展名为.Frm的文件是__A____。
A．窗体文件B．类文件C．工程文件 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．32768B．0 C．037% D．–22222
47．在VB6.0K ，12345678#的类型是__B____。
A．整数型B．长整数型C．字符常数D．双精度常数
6．在VB6.0中，合法的字符串常数是______B______。
A．ABC$ B．“3+4”C．‘ABC’D．‘3+4’
48．方法PRINT 20\30输出结果是——D——。
A．“20\30”B．20\30
C．出现错误信息D．0
49．假定Bln1是逻辑型变量，下面赋值语句中正确的是__D___.
A．Bln1=’True’B．Bln1=.True.
C．Bln1=#True# D．Bln1=3<4
50．在以下运算符中，优先级最低的是（C）
A．/ B．\
C．Mod D．^
51．VB6.0中，执行下面的四个语句时出现错误的是（C）
A．x=SGN(0) B．x=SQR(1)
C．x=LOG(0) D．x=SIN(1)
52．VB 6.0表达式COS（0）+ABS（-1）+INT（RND（1））的值是( )
A．1 B．–1
C．0 D．2
53．设a为整型变量，不能正确表达数学关系6 A．6 C．a>6 And a<15 D．a>6 And Not (a>=15) 54．骰子是一个正六面体，用1~6这六个数分别代表这六面，掷一次骰子出现的数可表示为（D） A．INT（RND（6）+1）B．INT（RND*6） C．INT（RND（1）*7）D．INT（RND（1）*6+1） 55．逻辑运算符And,Or和Not的优先顺序，从高到低是____C___ A．Or-And-Not B．And-Not-Or C．Not-And-Or D．Not-Or-And 56．计算b的自然对数使用的Visual Basic表达式是____A_____ A．Log(b)B．Lg(b) C．Loge(b) D．Lge(b) 57．方法Print 28 Mod –15 输出结果是____D____ A．“28 Mod –15”B．28 Mod –15 C．-13 D．13 58．已字母A的ASCII码为十进制的65，表达式Asc（“A”）+Asc（“C”）的值是_______B__ A．6567 B．132 C．“AC”D．AC 59．若X=5、Y=6，则表达式X+Y=11的值是___C___ A．X+Y=11 B．11 C．True D．False 60．下列执行语句后，V的值是____B____ A$=”54321” V=Val(Mid$(A$,3,2)) A．43 B．32 C．432 D．0 61．执行下列语句后，E、F、G的值分别是______ E=5:F=4:G=3 E=F:F=G:G=E A． 3 4 5 B． 4 3 4 C． 4 5 4 D． 4 5 5 62．m,n是整数，且n>m,在下面四个语句中，能将x赋值为一个m~n之间（含m,n）的任意整数，即满足m<=x<=n的是_______ A．x=INT(RND*(n-m+1))+m B．x=INT(RND*n)+m C．x=INT(RND*m)+n D．x=INT(RND*n-m)+m 63．VB6.0表达式Log(1)+ABS(-1)+Int(Rnd(1))的值是_______ A．-1 B．0 C． 1 D． 2 64．VB表达式10^-2的值是_______ A．–100 B．0.01 C．100 D．–0.01 65．VB6.0表达式Len(Left(“abcd”,2)+Right(“济南学院”，2))的值为_________ A． 2 B． 4 C． 6 D．8 66．Load事件是在窗体被装入工作区时（D）触发的事件。 A．用户B．程序员 C．手工D．自动 67．修改控件属性，一般可以使用属性窗口，也可以通过（D）为属性赋值。 A．命令B．对象 C．方法D．代码 68．下面是窗体的四个属性，在界面设计时，改变属性值就看不到窗体变化的属性是_____。A．Top B．Width C．Left D．Enabled 69．下面四个选项，不是事件的是_____。 A．Load B．Enabled C．Unload D．DblClick 70．以下叙述正确的是_______。 A．窗体（名称）属性是用来标识窗体的 B．窗体（名称）属性的值显示在窗体的标题栏中 C．可以在运行期间改变窗体的（名称） D．窗体的（名称）属性值可以为空 71．决定窗体标题条显示内容的属性是______。 A．(名称) B．Text C．Caption D．Top 72．若要使某文本框获得控制焦点，可使用的方法是_______。 A．LostFocus B．Point C．SetFocus D．GotFocus 73．以下选项中，不是Visual Basic6.0缺省控件名称的是______。 A．Command1 B．Textl C．labell D．Change 74．若要将某命令按钮设置为默认命令按钮，则应设置为True 的属性是_________。A．Enabled B．Cancel C．Default D．Value 75．命令按钮不能响应的事件是_____。 A．DblClick B．click C．MouseDown D．MouseUp 二、填空题 1、下列哪些可以作为变量? 12fd x13r2 a223a2 2、下列哪些可以作为常量？并说明是数值型还是字符型、逻辑型、日期型？“asdf”asdf"1234"1234 #2008/11/10#true false a3 3、把下列数学式子写成VB表达式 (x+y+z)/sqr(x^2+y^2+z^2) a^2+2*a*b+b^2 2*sin((x+y)/2)*cos((x-y)/2) (((2*x+y)^3)/3)^(1/4) 4、计算下列VB表达式的值(要求写出步骤) 5*3*6\245 8/4*2.5/1.25*(3.7+2.5)24.8 18\4*4.0^2/1.6 0 25\3 Mod 3*22 26\3 Mod 0.4*Sqr(25) 0 8/4*5/2.5*(3.25+6.75) 40 3*7\2 10 14/5*2 5.6 15\5*2 1 27^1/3 9 27^(1/3) 3 sqr(100)\4*2 1 5、按下列要求写出赋值语句 (1)把数值234赋给变量a a=234 (2)把字符串abc赋给变量z1 z1=”abc” (3)把标签Lblts的内容改为”姓名”Lblts.caption=”姓名” 6、写出下列函数的值 Int(-3.14159) -4 Sqr(sqr(16)) 2 7、随机产生a-b范围内(包括b)整数的公式：Int((b - a + 1) * Rnd + a) 8、写出输入输出语句 输出对话框：要求使用图标，标题为：”输出对话框”，对话框中的内容是”你输错了” A = MsgBox("你输错了", 16, "输出对话框") 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和Left 3. 为了同时改变一个活动控件的高度和宽度，正确的操作是 (A) A.拖拉控件4个角上的某个小方块 B.只能拖拉位于控件右下角的小方块 C.只能拖拉位于控件左下角的小方块 D.不能同时改变控件的高度和宽度 4、用户在屏幕上画出应用程序界面，并设置好对象的属性，系统便可以自动生成程序代码，这称为：（ A ） A、面向对象的程序设计 B、结构化程序设计 C、事件驱动的编程机制 D、可视化程序设计 5、VB6共有三个版本，按功能从弱到强的顺序排列应是（ C ） A、学习版、专业版和工程版 B、学习版、工程版和专业版 C、学习版、专业版和企业版 D、学习版、企业版和专业版 6、VB集成开发环境有三种工作状态，不属于三种工作状态之一的是（ B ） A、设计状态 B、编写代码状态 C、运行状态 D、中断状态 7、工程文件的扩展名是（B） Ａ、.frm B、.vbp Ｃ、.bas Ｄ、.frx 8、窗体文件的扩展名是（A） Ａ、.frm B、.vbp Ｃ、.bas Ｄ、.frx 9、VB集成开发环境可以（ D ） A、编辑、调试、运行程序，但不能生成执行程序 B、编辑、生成可执行程序、运行程序，但不能调试程序 C、编辑、调试、生成可执行程序，但不能运行程序 D、编辑、调试、运行程序，也能生成执行程序 10、标准模块文件的扩展名是（C） Ａ、.frm B、.vbp Ｃ、.bas Ｄ、.vbg 11．用于获得字符串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.用于从字符串左边截取字符的函数是（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.Form1．Text = "VB Test" https://www.wendangku.net/doc/8a9009823.html, ="VB Test" 15 下列说法中正确的是：为了保存一个Visual Basic应用程序，应当 (D) A.只保存窗体模块文件(.frm) B.只保存工程文件(.vbp) C.分别保存工程文件和标准模块文件(.bas) D.分别保存工程文件、窗体文件和标准模块文件 16. 要使一个标签框对象能够显示所需要的文本，应设置该对象的那一个属性的值？( A) A. Caption B. Text C. Name D.AutoSize 17. 要使一个命令按钮称为图形式命令按钮，应设置该队象的哪一个属性值？(B) A.Picture B.Style C.DownPicture D.DisabledPicture 18. 为使计时器对象每隔5秒钟产生一个时钟事件（Timer事件），则其Interval属性值应设置为(D) A.5 B.300 C.500 D.5000 19. 一个标准的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、下面是窗体的四个属性，在界面设计时，改变属性值看不到窗体变化的是（ D ） A、Top B、Width C、Left D、Enabled 24、下面四个选项，不是事件的是（ B ） A、Load B、Enabled C、Unload D、DblClick 25、用来设置窗体背景图片的属性是（ B ） A、Moveable B、Picture C、ForeColor D、WindowState 26、在VB6中的每一个对象都具有自己的属性、___C____和方法。 A、控件 B、函数 C、事件 D、公用过程 27．计算结果为0的表达式是（B ）。 A．Int(3.4)+Int(-3.8) B.Int(3.4)+Fix(-3.8) C．Fix(3.4)+Fix(-2.8) D.Fix(3.4)+Int(-3.8) 28. 假设A=3，B=7，C=2，则表达式 NOT ( 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 the Second integer") Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是(D) A.579 B.123 C.456 D.123456 31.在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a, b As Integer a = InputBox("Enter the First integer") b = InputBox("Enter the Second integer") Print b + a End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中分别输入456和123，则输出结果是(A) A.579 B.123 C.456 D.123456 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 1 Print "Result" End Select B.Select Case x Case Is ＞ 5, Is ＜ 5 Print "Result" End Select C. Select Case x Case Is ＞5, 1, 3 To 10 Print "Result" End Select D. Select Case x Case 1, 3, Is ＞ 5 Print "Result" End Select 34. 假定有以下循环结构 Do Until条件 循环体 Loop 则正确的描述是 (B) A.如果"条件"是一个为0的常数，则一次循环体也不执行 B.如果"条件"是一个为0的常数，则无限次执行循环体 C.如果"条件"是一个不为0的常数，则至少执行一次循环体 D.不论"条件"是否为"真"，至少要执行一次循环体 35.以下程序段的输出结果为 x=1 y=4 Do Until y ＞ 4 x=x*y y=y+1 Loop Print x (B) A.1 B.4 C.8 D.20 36. 执行下面的程序段后，x的值为 x=5 For i = 1 To 20 Step 2 x=x+i\5 Next i (A) A.21 B.22 C.23 D.24 37. 在窗体上画一个命令按钮，然后编写如下事件过程： 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 a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入5、4、3、2、1、-1，则输出结果为 (A) A.2 B.3 C.14 D.15 38．如果要在文本框中键入字符时，只显示某个字符，如星号(*)，应设置文本框的( )属性。 A．Caption B．PasswordChar C．Text D．Char 39.退出For循环可使用的语句为（ A ）。 A、Exit For B、End For C、Exit Do D、End Do 40.退出Do…Loop循环可使用的语句为（ C ）。 A、Exit For B、End For C、Exit Do D、End Do 41.退出函数过程可使用的语句为（ D ）。 A、Exit sub B、End sub C、End Function D、Exit Function 42.退出sub过程可使用的语句为（ A ）。 A、Exit sub B、End sub C、End Function D、Exit Function 43. 在窗体上画一个文本框(其Name属性为Text1)，然后编写如下事件过程： Private Sub Form_Load() Text1.Text= "" Text1.SetFocus For i=1 To 10 Sum = Sum + i Next i Text1.Text = Sum End Sub 上述程序的运行结果是（C） A.在文本框Text1中输出55 B.在文本框Text1中输出0 C.出错 D.在文本框Text1中输出不定值 44.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Command1)，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do While x ＜ 50 x=(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和168 45.在窗体上画一个命令按钮，名称为Command1。然后编写如下程序： Private Sub Command1_Click() For I= 1 To 4 For J = 0 To I Print Chr(65 + I); Next J Print Next I End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是(A) A.BB CCC DDDD EEEEE B.A BB CCC DDDD C.B CC DDD EEEE D.AA BBB CCCC DDDDD 46.在窗体上画两个名称分别为Label1和Label2的标签，然后编写如下事件过程 Private Sub Form_Click() x= -5:s= -5 Select Case s Case Is ＞ 0 y=x+1 Case Is ＞= 0 y=x+2 Case Else y=x+3 End Select Label1.Caption = x Label2.Caption = y End Sub 程序运行后，单击窗体，标签Label1和Label2中显示的内容分别是 (A) A.-5 和-2 B.-5 和 -4 C.-5 和 -3 D.-5 和–5 33. 下列VB程序语句正确的是(D). A. If A ≥B Then T=A: A=B: B=T B. If A ≥B Then T=A; A=B; B=T C. If A>=B Then T=A A=B B=T D. If A>=B Then T=A: A=B: B=T 47. 下列程序段执行后输出的结果是(C) n=10 For k=n To 1 step -1 x = k^2 Next k Print x A.-2 B.-1 C.1 D.0 48 下列程序段执行后输出的结果是(A) i=0 For k=10 To 19 Step 3 i=i+1 Next k Print i A. 4 B. 5 C. 3 D. 6 49 下列程序段执行后输出的结果是(B) x=int (Rnd+4) Select Case x Case 5 Print "优秀"K Case 4 Print "良好" Case 3 Print "及格" Case Else Print "不及格" End Select A. 优秀 B. 良好 C. 及格 D. 不及格 50. 在窗体上画一个命令按钮(其Name属性为Command1)，然后编写如下代码： Option Base 1 Private Sub Command1_Click() Dim ａ a = Array(1, 2, 3, 4) j=1 For i = 4 To 1 Step -1 s = s + a(i)*j j =j * 10 Next i Print s End Sub 运行上面的程序，单击命令按钮，其输出结果是 (D) A.4321 B.12 C.34 D.1234 51.决定窗体标题条显示内容的属性是(C) A.Text https://www.wendangku.net/doc/8a9009823.html, C.Caption D.BackStyle 52．要求从文本框中输入密码时在文本框中只显示*号，则应用在此文本框的属性窗口中设置（ A ） A．Passwordchar属性值为* B. Caption属性值为* C．PasswordChar属性值为真 D. Text属性值为* 53决定窗体有无控制菜单的属性是(A) A.ControlBox B.MinButton C.Enabled D.MaxButton 54使文本框获得焦点的方法是(C) A.Change B.GotFocus C.SetFocus D.LostFocus` 55下列可以把当前目录下的图形文件pic1.jpg装入图片框Picture1中的语句为（C） A.Picture = "pic1.jpg" B.Picture.Handle = "pic1 .jpg" C.Picture 1.Picture = LoadPicture("pic 1.jpg") D.Picture = LoadPicture("pic 1.jpg") 56决定标签内显示内容的属性是(D) A.Text https://www.wendangku.net/doc/8a9009823.html, C.Alignment D.Caption 57假定在图片框Picture1中装入了一个图形，为了清除该图形(注意，清除图形，而不是删除图片框)，应采用的正确方法是(B) A.选择图片框，然后按Del键 B.执行语句Picture1.picture=LoadPicture("") C.执行语句Picture1.picture="" D.选择图片框，在属性窗口中选择Picture属性条，然后按回车键 58.比较图片框（PictureBox）和图像框（Image）的使用，正确的描述是（）。 A．当图片框（PictureBox）的AutoSize自属性为False时，只在装入图元文件（*.wmf）时，图形才能自动调整大小以适应图片框的尺寸 B．当图像框（Image）的Stretch属性为True时，图像框会自动改变大小以适应图形的大小，使图形充满图像框 C．两类控件都可以设置AutoSize属性，以保证装入的图形可以自动改变大小 D．两类控件都可以设置Stretch属性，使得图形根据物件的实际大小进行拉伸调整，保证显示图形的所有部分 59删除列表框中指定的项目所使用的方法为(D) A.Move B.Remove C.Clear D.RemoveItem 60.若要向列表框添加列表项，可使用的方法是（ A ）。 A、AddItem B、Remove C、Clear D、Add 61当拖动滚动条中的滚动块时，将触发的滚动条的事件是(C) A.Move B.Change C.Scoll D.SetFocus 62．滚动条控件的LargeChange属性所设置的是（B ） A．滚动条中滚动块的最大移动范围 B．单击滚动条和滚动箭头之间的区域时，滚动条控件value属性值的改变量 C．滚动条中滚动块的最大移动位置 D．滚动条控件无该属性 63用户在组合框中输入或选择的数据可以通过一个属性获得，这个属性是(C) A.List B.ListIndex C.Text D.ListCount 64．设置一个单选按钮（OptionButton）所代表选项的选中状态，应当在属性窗口中改变的属性是（D ） A．Caption B．Name C．Text D．Value 65.在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() a = Text1.Text + Text2.Text Print a End Sub Private Sub Form_Load() Text 1.Text = "" Text2.Text = "" End Sub 程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入123和321，然后单击命令按钮，则输出结果为(C) A.444 B.321123 C.123321 D.132231 65．运行下面程序后输出的结果是（B） Private Sub Form_Click() K = 4 If K <= 3 Then n = 5 If K <= 4 Then n = 4 If K <= 5 Then n = 3 Print n End Sub A．无输出B．3 C．4 D．5 66．运行下面程序后输出的结果是（B） Private Sub Form_Click() score = Int(Rnd * 10) + 80 Select Case score Case Is < 60: PingYu = "未通过" Case 60 To 69: PingYu = "合格" Case 70 To 79: PingYu = "中" Case 80 To 89: PingYu = "良" Case Else: PingYu = "优" End Select Print PingYu End Sub A．优B．良 C．中D．合格 67．有如下程序： Private Sub Form_Click() A = 3 If A <= 3 Then Print 3; End If If A <= 4 Then Print 4; End If If A <= 5 Then End If If A <= 6 Then Print 6; End If Print End Sub 运行后输出的结果是_3 4 5 6______ 68．窗体上有两个文本框Text1和Text2，下面程序的功能是：在文本框Text1中输入一个0~6的整数，然后单击窗体；在文本框Text2中用英文显示是星期几。请将程序补充完整。 注意：不得增行或删行，也不得更改程序的结构！ Private Sub Form_Click() Dim Var% ___Var_________=Text1.Text Select Case Var Case 0 Text2.Text = "Sunday" Case 1 Text2.Text = "Monday" Case 2 Text2.Text = "Tuesday" Case 3 Text2.Text = "Wednesday" Case 4 Text2.Text = "Thursday" Case 5 Text2.Text = "Friday" Case 6 Text2.Text = "Saturday" Case Else Text2.Text = "Must be 0to 6" _ End Select_________________ End Sub 69．以下叙述正确的是（） A．Select Case 语句中的测试表达式可以是任何形式的表达式 B．Select Case 语句的测试表达式只能是数值表达式或字符表达式 C．在执行Select Case 语句时，所有Case 子句均按出现的次序被顺序执行 D．如下Select Case 语句的Case表达式是错误的 Select Case Case 1 TO 10 …… End Select 答案：B 70．窗体上画一个命令按钮，其名称为command1，然后编写如下事件过程： Private Sub command1_click() If I = 1 Then x = I If I <= 4 Then x = x + 1 Print x; Next I End Sub 程序运行后，单击命令按钮，其输出结果为（） A．1 2 3 4 B．2 3 4 5C．2 3 4 4 D．3 4 5 6 答案：B 71．有如下程序。其输出结果为（） Private Sub command1_click() x = Sqr(2) \ 2 + Sgn(2) \ 2 + Rnd(2) \ 2 x = Sqr(3) \ 3 + Sgn(3) \ 3 + Rnd(3) \ 3 If x > y Then Print "x>y" ElseIf x = y Then Print "x=y" Else Print "x End If End Sub A．x>y B．x=y C．x Private Sub Form_Click() A = 0 For j = 1 To 20 Step 2 A = A + j \ 5 Next j Print A End Sub 运行后，输出的结果是(B) A．12 B．16 C．40 D．100 73．有一个分数序列： 2/1 3/2 5/3 8/5 13/8 求这个序列前20项的和。请将程序补充完整。 注意：不得增行或删行，也不得更改程序的结构。 Private Sub form_click() Dim s As Single Dim t1 As Integer, t2 As Integer, t As Integer Dim I As Integer s = 0 t1 = 2 t2 = 1 I = 0 DO while _I<=19______ S=__s+t1/t2___________ t = t1 + t2 __t2=t1___________ __t1=t___________ I = I + 1 Print I; t1; t2; s Loop Print s End Sub 74．有如下程序： Private Sub Form_click() A = 0 For j = 1 To 10 A = A + j \ 2 + j Mod 3 Next j Print A End Sub 运行后，输出的结果是_________ A．20 B．25 C．30 D．35 75．有如下程序： Private Sub Form_clik() Dim s%, i% s = 0 i = 100 Do While i <= 120 If (i \ 3) * 3 = i Then s = s + 1 i = i + 1 End If i = i + 1 Loop Print s End Sub 运行后输出的结果是________ A．7 B．9 C．11 D．13 76．有如下程序： Private Sub form_click() s = 0 i = 1 Do While i <= 100 If i Mod 10 <> 0 Then s = s + i i = i + 1 Else 二、选择题 1、菜单控件只包括一个事件，即 C ，当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示 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 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_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 。 姓名 班级 考号 …………………………………装……………………………………订……………………………………线……………………………固安县职业中学2016～2017学年度第一学期期中考试 计算机专业高中三年级VB 试卷 命题教师： 高丽丽 考试时间：2016年11月 一、选择题 1． Visiul Basic 的版本中，（ ）的功能最强大。 A ．学习版 B ． 基础版 C ．专业版 D ．企业版 2．标准可执行文件是（ ） A ．标准EXE B ．ActiveX EXE C ．ActiveX DLL D ．ActiveX 控件 3．Visual Basic 6.0没有下面那种版本。（ ） A ．企业版 B ．学习版 C ．工程版 D ．专业版 4．一般标准模块文件的扩展名为（ ） A ．VBP B ．VPG C ．FRM D ．BAS 5．在Visual Basic 中，数值1234&的类型是（ ） A ．整型 B ．长整型 C ．字符串型 D ．双精度型 6．退出Visiul Basic 的错误方法是（ ） A ．单击窗口右上角的关闭按钮 B ．选择“文件”菜单中 “退出”命令 C ．按快捷键Alt+Q D ．选择“文件” 菜单中 “关闭”命令 7．在正确安装Visiul Basic 6.0后，可以通过多种方式启动Visiul Basic 。以下方式中不能启动 Visiul Basic 的是（ ）。 A ．通过“开始”菜单中的“程序”命令 B ．通过“我的电脑”找到vb6.0.exe ，双击该文件名 C ．通过“开始”菜单中的“运行”命令 D ．进入DOS 方式，执行vb6.0.exe 文件 8．VB 6.0是一种面向（ ）的编程环境。 A ．机器 B ． 对象 C ．过程 D ．应用 9．工程资源管理器窗口中包含的文件类型有（ ）种。 A ．2 B ． 3 C ．4 D ．5 10．（ ）是用来控制对象的功能及操作的内部程序。 A ．属性 B ．方法 C ．事件 D ．代码 11．以下哪个不是事件产生的方式。（ ） A ．程序操作者触发 B ．由工程触发 C ．由系统触发 D ．代码间接触发 12．Option Explicit 语句不可以放在（ ）。 A ．窗体模块的声明段中 B ．标准模块的声明段中 C ．类模块的声明段中 D ．任何事件过程中 13．下面程序运行后，输出结果是（ ）。 Dim zxs As Integer zxs%=232 zxs=232 Print zxs%;zxs A ．232 232032 B ．232 232 C ．232.32 2232.32 D ．任何事件过程中 14．若希望在离开某过程后，还能保存该过程中局部变量的值，则应使用（ ）关键字在该过程定义局部变量。 A ．Dim B ．Private C ．Public D ．Static 15．在程序中分别将变量Inta 、B1、St 和D 定义为整型、布尔型、字符串型和日期型，下列赋值语句在执行时会出错的是（ ）。 A ．Inta=4.6 B ．B1=#True# C ．St=5 & 123.5 D ．D=#10 / 05 / 01# 16．在窗体模块的通用声明段中声明变量时，不能使用（ ）关键字。 A ．Dim B ．Public C ．Private D ．Static 17．下列表达式能产生1~6自然数的是（ ）。 A ．Int(Rnd(6)+1) B ．Int(Rnd*6) C ．Int(Rnd*7) D ．Int(Rnd*6+1) 18．方法Print ”10+6=”;10+6输出结果是（ ）。 A ．10+6=10+6 B ．10+6=16 C ．16=10+6 D ．Int(Rnd*6+1) 19．下列没有类型说明符的变量是（ ）。 A ．日期型 B ．长整型 C ．字符型 D ．货币型 20．VB6.0变量名abc#的类型是（ ）。 A ．字符串型 B ．单精度类型 C ．整型 D ．双精度类型 二、填空题 1．Visual 中的含义是 ，指的是开发 的方法。Basic 是指 代码，英文全称是 。 2．退出Visual Basic 可单击 ，也可选择 菜单中的 命令，或按 + 键。 3．Visual Basic 开发环境的中心部分称为 。 4．属性窗口有两种显示方式，一种是按 排序，另一种是按 排序。 5．Visual Basic 有两种运行程序的方法， 模式和 模式。 6．窗体模块的文件扩展名为 、标准模块的文件扩展名为 、类模块的文件扩展名为 。 7．在Visiul Basic 语言中，注释符为 、分行符为 、并行符为 。 大一VB期末考试试卷及答案 1．在代码中引用一个控件时，应使用控件的（ b ）属性。 A．Caption B．Name C．Text D．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。 A．x+a <= b-y B． x > 0 AND y < 0 C．a = b OR x>y D． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ c ）。 A．（10，80） B．（10，81） C．[10，80] D．[10，81] 4．函数Sgn(3.1416)的返回值是（ c ）。 A．-1 B．0 C．1 D．以上都不对 5．67890属于（ d ）类型数据。 A．整型 B．单精度浮点数 C．货币型 D．长整型 6．下列变量名中正确的是（ d ）。 A．3S B．Print C．Select My Name D．Select_1 7．下列赋值语句（ a ）是有效的。 A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ b ）。 A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。 A．Name B．ListIndex C．ListCount D．Text 10．下列代码的运行结果为（ b ）。 Private Sub command1_click() Dim m(10) VB期中考试题 一、填空题 1、Visual Basic是一种面向__________的可视化程序设计语言，采取了__________的编程机制。 2、在VB中工程文件的扩展名是____________，窗体文件的扩展名是____________，标准模块文件的扩展名 3、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。 4、设置控件背景颜色的属性名称是______________________。 5、 x=InputBox(___ __, , ) 6、写出显示下图信息框的MsgBox函数 MsgBox( , , ) 二、选择题 1、下面不是VB工作模式的是( ) A.设计模式 B.运行模式 C.汇编模式 D.中断模式 2、可视化编程的最大优点是( ) A.具有标准工具箱 B.一个工程文件由若干个窗体文件组成 C.不需要编写大量代码来描述图形对象 D.所见即所得 3、下列不能打开属性窗口的操作是( ) A.执行“视图”菜单中的“属性窗口”命令 B.按F4键 C.按Ctrl+T D.单击工具栏上的“属性窗口”按钮 4、下列可以打开立即窗口的操作是( ) A.Ctrl+D B.Ctrl+E C.Ctrl+F D.Ctrl+G 5、Visual Basic的编程机制是( ) A.可视化 B.面向对象 C.面向图形 D.事件驱动 6、以下能够触发文本框Change事件的操作是( ) A.文本框失去焦点 B.文本框获得焦点 C.设置文本框的焦点 D.改变文本框的内容 7、应用程序设计完成后，应将程序保存，保存的过程是( ) A.只保存窗体文件即可 B.只保存工程文件即可 C.先保存工程文件，之后保存窗体文件 D.先保存窗体文件(或标准模块文件)，之后还要保存工程文件 8、任何控件都具有的属性是( ) A.TEXT B.CAPTION https://www.wendangku.net/doc/8a9009823.html, D.FORECOLOR 5、决定控件上文字的字体、字形、大小及效果的属性是( ) A.TEXT B.CAPTION https://www.wendangku.net/doc/8a9009823.html, D.FONT 9、在窗体上建立了多个控件，如TEXT、LABEL1、COMMAND1，若要使程序一运行焦点就定位在COMMAND1控件上，应将COMMAND1控件的( )设置为0 A.INDEX B.TABINDEX C.TABSTOP D.ENABLED 10、运行时，当用户向文本框输入新的内容，或在程序代码中对文本框的TEXT属性进行赋值从而改变了文本框的TEXT属性值时，将触发文本框的( )事件 A.CLICK B.DBLCLICK C.GOTFOCUS D.CHANGE 11、以下窗体名中哪些是非法的窗体名( )。 A._aform B.3frm C.f_1 D.frm 5 E.f_1* 12、一个名称为myfrm,标题属性为form1的窗体，它的单击事件名应为( )。 A. myfrm_click B.form1_click C.form_click D.me_click 13、执行下面语句：print “5*20” 的结果是( )。 A.“5*20” B.出现错误信息 C.5*20 D.100 14、下列语句代码不可正常执行的是( )。 A、Print 32765 + 3 B、Print 5 + 7 = 14 C、Print 256 / 128 D、Print "14" + 12 15、当用户单击命令按钮时，( )属性可以使得命令按钮对激发事件无效。 A. Name B.Enabled C.Default D.Cancel 16、下列语句中的( )语句可以用来正确地声明一个动态数组。 A.Private A(n) as integer B.Dim A() as integer C.Dim A(,) as integer D.Dim a(1 to n) 16、以下选顶中，不是Visual Basic 6.0默认控件名称的是 https://www.wendangku.net/doc/8a9009823.html,mand1 B.Text1 C.Option1 https://www.wendangku.net/doc/8a9009823.html,be1 17、表达式Fix(－26.99)+Int(24.56)的值为 A.－2 B.－3 C.－1 D.0 18、用下面语句定义的数组元素个数是 Dim a(－3 T0 3，2)as Integer A.6 B.12 C.14 D.21 19、在Visual Basic 6.0的立即窗口中，表达式Print 5>2的输出是 2847VisualBasic程序设计-0006 试卷总分：100 答题时间：60分钟 客观题 单项选择题（共16题，共48分） 1. 在正确安装Visual Basic6.0后，可以通过多种方法启动Visual Basic ,以下方式中不能启动Visual Basic的是（）。 D 进入DOS方式，执行vb6.exe 2. 在VB6.0集成开发环境中有三种工作模式，下列不属于三种工作模式之一的是（）。 D 编写代码模式 3. 下列不正确的赋值语句是（）。 B x + y = 15 4. MsgBox函数的返回值的类型是（）。 A 整型 5. 下列关于属性设置的叙述错误的是（）。 A 控件具有什么属性是VB预先设计好的，用户不能改变 6. 在Visual Basic中，如果一个变量未作类型声明而直接使用，则该变量的数据类型是（）。 C 变体类型 7. 对于窗体级变量，下列说法中错误的是（）。 C 所在窗体的子程序不能访问用Private定义的窗体级变量 8. 在Visual Basic中，下列优先级最高的是（）。 A * 9. 在VB工程中，可以作为启动对象的是（）。 D Sub Main过程或任何窗体 10. 在设计菜单时，如果要在菜单中加入一个菜单分隔条，则菜单分隔条的标题必须设置为（）。 B 减号（-） 11. Dim A(1 To 6, 6) As String定义的数组包含的元素个数是（）。 C 42 12. 以下关于过程和过程参数的描述中，错误的是（）。 C 只有函数过程能够将过程中处理的信息传回到调用的程序中 13. 在窗体上画一个名称为Drive1的驱动器列表框，一个名称为Dir1的目录列表框。当改变当前驱动器时，目录列表框应该与其同步改变。设置两个控件同步的命令放在一个事件过程中，这个事件过程是( )。 B Drive1 Change 14. 重新定义图片框控件的坐标系统，可采用该图片框的方法是（）。 A Scale 15. 如果希望返回远程机器的IP地址，可以使用Winsock控件的（）属性。 C RemoteHostIP 16. Access数据库文件的扩展名是（）。 D mdb 判断题（共14题，共28分） 1. 新建工程时系统会自动将窗体标题设置为Form1。 T √ 2. 每个对象都有一系列预先定义好的对象事件，但要使对象能响应具体的事件，需要编写该对象相应的事件过程。 T √ 3. 在程序中Name 属性作为对象的标识被引用，不会显示在窗体上，而控件上显示的内容由Caption属性决定。 T √ 4. Timer控件在程序运行时是可见的。 F × 5. 任何一种循环都必须有起始语句和终端语句。 T √ 6. If x >y Then Max=x Else Max=y 程序段是求两个数中的最大数。 T √ 7. 移动框架时框架内的控件也跟随移动，所以框架内各控件的Left与Top属性值也随之改变。 F × 8. 列表框控件中最后一项的序号等于ListCount属性减1。 T √ 9. 用Private、Static定义过程只能被定义它的窗体模块及标准模块中的语句、过程调用。 T √ 高级语言程序设计（VB）试卷（A卷） 注意事项：1、本试卷共页，满分为100 分，考试时间为110 分钟。 2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔， 不得使用红颜色墨水笔。 一、单项选择题（每空1分，共30分） （请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分） 1．在VB 6.0中，扩展名为.vbp的文件称为【1】。 A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件 2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是【2】。 A) 代码窗口B) 窗体设计窗口 C) 属性窗口D) 工程资源管理器窗口 3．设有变量定义语句Dim a%，则变量a的数据类型是【3】。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4．下列表达式中，值为False的是【4】。 A) "AB"<"abc"B) "ABC" = UCase("abc") C) "ABCD"<"abc"D) Mid("ABCD",3,1)=Left("ABCD",3) 5．函数InStr("ABCDEF", "CD")的值是【5】。 A) 2B) 3C) True D) CDEF 6．下列程序运行后，单击窗体，输出结果是【6】。 Private Sub Form_Click() Dim a As Integer, b As Integer a = 3 b = 5 Print a + b; a & b End Sub A) 8 8 B) 35 35 C) 8 35 D) 35 8 7．下列程序运行后，单击窗体，输出结果是 【7】 。 Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a – b : a = a - b Print a; b End Sub A) 4 3 B) 7 3 C) 3 7 D) 10 7 8．下面程序段所表示的数学关系式是 【8】 。 If (a < b) Then If d = c Then x = 1 Else x = 2 End If A) ? ??≠≥=<=)(2) c (1 d c b a d b a x 且且 B) ? ??≠<=<=)(2) c (1 d c b a d b a x 且且 C) ?? ?≥=<=)(2) c (1b a d b a x 且 D) ?? ?≠=<=) (2) c (1 d c d b a x 且 9．下列程序运行后，单击窗体，输出结果是 【9】 。 Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A) 15 B) 10 C) 1 D) 0 10．下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k 2010年vb期中考试 满分：110分 姓名：________ 1、单项选择题(本题共计40分) 1、函数Cint(–3.5)，Int(–3.5)，Fix(–3.5)的值分别是________。( ) A、-3，–4，–3 B、-4，–4，–3 C、-3，–4，–4 D、-4，–3，–3 2、在VB中，下列关于控件的属性或方法中，搭配错误的有________个。 ①Timer1.Interval ②List1.Cls ③Text1.Print ④List1.RemoveItem ⑤Vscroll1.Value ⑥Picture1.Print ( ) A、0 B、1 C、2 D、3 3、若在一个应用程序窗体上，依次创建了CommandButton、TextBox、Label1等控件，则运行该程序显示窗体时，________会首先获得焦点。( ) A、窗体 B、CommandButton C、Label1 D、TextBox 4、下面的表达试的值为真的是________。( ) A、Mid(“Visual Basic”,1,12)=Right(“Programing Language Visual Basic”,12) B、“ABCRG”> ”abcde” C、Int(134.69) > Cint(134.69) D、78.9/32.77 < = 97.5/43.97 AND –45.4 > 4.98 5、执行语句"Print format(5459.478,"##,##0.00")"，正确的输出结果是________。( ) A、5459.48 B、5,459.48 C、5,459.478 D、5,459.47 6、有如下程序代码： Private Sub Command1_Click( ) s=Sin(3.1415926/2) MsgBox s End Sub VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5）。 九年级期末VB 考试试卷 班级：学号：姓名： 123456789101112131415 一、选择题（每题两分，共十五题） 1.下列叙述中正确的是 (c) A. 只有窗体才是VB中的对象 B.只有控件才是VB中的对象 C. 窗体和控件都是VB中的对象 D.窗体和控件不是VB中的对象 2. 下列可以激活属性窗口的操作是(D) A. 用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“工具箱”命令 C. 按 Ctrl+F4 键 D.按F4键 3. 下列不能打开工具箱窗口的操作是(B) A. 执行“视图”菜单中的“工具箱”命令 B.按 Alt+F8键 C. 单击工具栏上的“工具箱”按钮 D.按 Alt+V键，然后按 Alt+X键 4.假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先 应执行的操作是 (A) A. 单击窗体上没有控件的地方 B.单击任一个控件 C. 不执行任何操作 D.双击窗体的标题栏 5. 为了把窗体上的某个控件变为活动的，应执行的操作是(C) A. 单击窗体的边框 B.单击该控件的内部 C. 双击该控件 D.双击窗体 6. 确定一个控件在窗体上的位置的属性是(D) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 7. 确定一个窗体或控件的大小的属性是(B) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 8. 为了同时改变一个活动控件的高度和宽度，正确的操作是( B) A. 拖拉控件 4 个角上的某个小方块 B.只能拖拉位于控件右下角的小方块 C. 只能拖拉位于控件左下角的小方块 D.不能同时改变控件的高度和宽度 VB期末考试试题及答案 一、填空题 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，语句Print Format(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 * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是 C 。 VB6.0期中考试试题 班级：______________ 学号：_______________ 姓名：______________ 一、选择题：（共30分，每小题12分） 1、V isual Basic是一种面向( )的程度设计语言。 A、用户 B、事件 C、程序 D、对象 2、在V isual Basic6.0中规定窗体文件的扩展名是（）。 A、frm B、for C、vbp D、bas 3、在V isual Basic代码窗口中，将某一条语句加以注释和说明时，应在语句前加( ) 。 A、逗号（，） B、冒号（：） C、单引号（’） D、问号（?） 4、如果要改变窗体的标题,需要设置窗体对象的_____属性。 A、Name B、Caption C、BackColor D、BorderStyle 5、以下不是Visual Basic特点的选项是（）。 A．可视编程B．算法设计C．事件驱动D．面向对象 6、变量A！的类型是（）。 A．Single B．Integer C．String D．Boolean 7、下列类型的变量中占用字节数最小的是（）。 A．Integer B．Single C．Date D．Byte 8、当运行程序时，系统自动执行启动窗体的某个事件过程。这个事件过程是（）。 A)Load B)Click C)Unload D)GotFocus 9、下面的变量名合法的是（）。 A)k_name B)k ame C)name D)k-name 10、Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（）。 A)属性、控件和方法B)属性、事件和方法 C)窗体、控件和过程D)控件、过程和模块 11．Visual Basic6.0集成开发环境有三种工作模式，下列不属于三种工作模式之一的是（）。 A．设计模式B．执行模式 C．中断模式D．编写代码模式 VB 期末考试试卷及答案 一·选择题 1.Visual Basic是一种面向对象的程序设计语言，构成对象的三要素是（ B ） A 属性、控件和方法 B 属性、事件和方法 C 窗体、控件和过程 D 控件、过程和模块 2.所有控件都有一个共同的属性，这个属性是（ C ） A text B font C name D caption 3.下列叙述中错误的是（ A ） A工程文件扩展名是 .vbgB 标准模块文件的扩展名是 .basC窗体模块的扩展 名是 .frmD 类模块的扩展名是 .cls 4.当要编写一个新的 Visual Basic程序时，所做的第一件事是（ A ）A xx 一个工程 B 编写代码 C 设置属性 D 添加 Active X控件 5.下面控件中，没有caption 属性的是（ B ） A框架B组合框 C 命令按钮 D 复选按钮 6.在文件框中输入字符时，若只显示某个字符，如（* ），应设置属性是（B）A MultiLine B PasswordChar C Text D selText 7.若要将窗体从内存中卸载出去，其实现的方法是（ D ） A Show B Hide C Load D UnLoad 8.下列关于过程叙述不正确的是（ D ） A过程的传值调用是将实参的具体值传值传递给形参 B过程的传址调用是将实参在内存的地址传递给形参 C过程的传值调用参数是单向传递的，过程的传址调用参数是双向传递的 D无论过程传值调用还是传地址调用，参数传递都是双向的 9.某人创建 1 个工程，其中的窗体名为Form1，之后又添加了 1 个名为Form2 的窗体，并希望程序执行时先显示Form2 窗体，那么，他需要做的工作 是（ C ）A 在 Form1 的 Load 事件过程中加入语句Load Form2 B 在 Form2 的 Load 事件过程中加入语句Form2.Show C在“过程属性”对话框中把“启动对象”设置为 Form2 D在 Form2 的 TabIndex 属性设置为 1，把 Form1 的 TabIndex属性设置为 2 10.以下关于文件的叙述中，正确的是（ B ） A 以 Output 方式打开一个不存在的文件时，系统将显示出错信息 B 以Append 方式打开的文件，既可以进行读操作，也可以进行写操作 C 在随机文件在，每个记录的长度是固定的 D无论是顺序文件还是随机文件，其打开的语句和打开的方式都是完全相 同的 11.设 a=6，b=8，c=10则函数 IIf(a 2010—2011年度上学期期中考试试卷 科目：VB 班级：________ 姓名：________ 得分： 一.、判断题(每题1分) 1.( )在一行中有多条语句时，逗号"," 可作为语句间的分隔符。 2.( )表达式Int(Rnd * 4 + 0.5)可能的全部值是1,2,3,4。 3.( )在标准模块的声明段定义一个全局变量时，用关键字Public来声明。 4.( )命令按钮不但能响应鼠标的单击事件，而且能响应双击事件。 5.( )定时器控件的名称为time。 6.( )窗体的加载事件是load事件。 7.( )‘A’的ASCII码值是65。 8.( )VB中运行程序的快捷键是F5。 9.( )向窗体中添加控件可双击工具栏中所要的控件。 10.( )len函数表示取字符串长度的函数。 11.( )控件的属性不可以在程序运行时动态的修改。 12.( )在VB中程序注解可以在被注释语句前加“：”。 13.( ) Click事件，就是鼠标单击事件。 14.( )在VB中，变量在使用前可以不声明。 15.( )在程序执行的过程中，变量的值始终保持不变，常量的值随时改变。 二.填空题:(每空格2分) 1.下列函数的值分别为: A.int(-6.14159) ______________ B.len([abcdefg") ______________ C.left([abcdefadfag".6) ______________ D.mid([abcdefgh".4.3) ______________ 2.VB中若要产生一消息框，可用_____________函数来实现 3.常量是指在程序运行过程中，_________________的量 4.整数类型数据分别包括整型和________________数据。 5.随机函数的函数取值范围是____________ 6.定义一个整型变量a：______________ 高二第二学期期中考试VB试题 一、选择题（每题2分，20题，共40分。每题只有一个答案，请将最合适的答案填在题前的括号内，不选、选错、多选均不得分。） ( )1、以下不属于Visual Basic系统的文件类型的是： A．.frm B．.cls C．.bat D．.vbp ( )2、Visual Basic 是一种可视化、面向对象的程序设计语言，采取( )的编程机制。A．按模块顺序执行B．从主程序开始执行 C．事件驱动D．按过程顺序执行 ( )3、使用Visual Basic编程，我们把工具箱的工具称为： A．事件B．工具C．控件D．窗体 ( )4、下面（）是合法的变量名。 A．x_yz B．123ab C．integer D．x-y ( )5、表达式16/4-2^5*8 Mod 5\2 的值为（） A．14 B．4 C．20 D．2 ( )6、Visual Basic程序可以多条语句书写在一行，各语句之间的分隔符是： A．：（冒号）B．；（分号）C．□（空格）D．*（星号） ( )7、在Visual Basic 中最基本的对象是（）,它是应用程序的基石，它是其他控件的容器。 A．命令按钮B．文本框C．窗体D．标签 ( )8、下面定义窗体级变量a的语句中错误的是： A、Dim a% B、Private a% C、Private a As Integer D、Static a% ( )9、文本框没有（）属性 A、Endabled B、Visible C、BackColor D、Caption ( )10、要把一个命令按钮设置成不可见，应设置Visible属性值为（） A．True B．False C．Default D．Cancel ( )11、计时器控件中要求每隔0.1秒触发一次Timer事件，那么计时器控件的Interval 属性应该设置为（） A. 1 B.10 C. 100 D. 1000 ( )12、若要使逻辑表达式x>y And y VB期末考试试题及答案 二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外得所有菜单控件都能识别该事件。A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)得Max属性所设置得就是 A 。 A、滚动框处于最右位置时,一个滚动条位置得Value属性最大设置值 B、单击滚动条与滚动箭头之间得区域时,滚动条中滚动块得最大移动量 C、单击滚动条得箭头区域时,滚动条中滚动块得最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中得*表 示 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 。 Private Sub mand1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、VBHello!VB B、VB Hello!VB C、VB D、VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2得结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件就是容器控件 B 。 A、Image B、Picture C、 boBox D、 11、若要将窗体从内存中卸载出去,其实现得方法就是 D 。 2010~2011学年度第 2 学期期中考试试卷 [B1] 考试科目：《 Visual Basic 程序设计》考试形式：开卷 -上机考答题时间： 120 分钟班级学号姓名 一、选择题（ 2 分/题，共20 分） 1.以下有关VB 对象名称（Name）属性的叙述，正确的是。 A ）对象的Name 属性值可以为空 B ）窗体的Name 属性用来标识和引用窗体 C）可以在程序运行期间改变对象的Name 属性值 D ）窗体的Name 属性值是显示在标题栏中的字符串 2.Visual Basic6.0 集成环境的主窗口中不包括。 A ）标题栏 B ）菜单栏C）状态栏D）工具栏 3．在开发VB 应用程序时，一个工程一般至少应含有__ 。 A ）标准模块文件和类模块文件 B ）工程文件和窗体文件 C）工程文件和类模块文件 D ）工程文件和标准模块文件 4．.为了使命令按钮（名称为Command1）右移200，应使用的语句是 ____________________________________________________________ 。 A ）Command1.Move -200 B ）Command1.Move 200 C ）Command1.Left= Command1.Left+200 D ）Command1.Left= Command1.Left-200 5．当程序运行时，系统自动执行启动窗体的__ 事件过程。 A ）Click B）Load C）Unload D ）GotFocus 6．Visual Basic 有多种类型的窗口，若要在设计时看到窗体窗口，以下操作不正确的是。 A）打开“视图”菜单，选择“对象窗口 如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 能够获得一个文本框中被选取文本的内容的属性是。 以下属于Visual Basic合法的数组元素是。 设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。 VB有三种工作模式，它们分别是___________模式。 下列函数中，________函数返回的值是数值型的。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 以下控件中没有Print方法是( ) 以下叙述中错误的是 ( ) A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）保存Visual Basic程序时，应分别保存窗体文件及工程文件 C）Visual Basic应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发 下列数组声明语句中的数组a包含了_________个数组元素。( ) Dim a(4,-1 to 1,0 to 3) 复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( ) 主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义 以下不属于Visual Basic系统的文件类型是。 A）.frm B）.bat C）.vbg D）.vbp 按变量名的定义规则，是合法定义的变量名。 结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______ 执行以下程序段后，变量c$的值为________。 a$="Visual Basic Programming"VB期末考试试题及答案
2016~2017第一学期期中考试高中三年级VB试卷
大一VB期末考试试卷及答案
VB期中考试题
电大VB期末考试
VB期末试卷(A卷带答案)
2010年vb期中考试试卷及答案
大学VB期末考试试题
初三_vb期末考试试卷+答案
VB期末考试试题及答案
VB期中考试试卷
VB期末考试试卷及答案.doc
VB期中考试试卷(Visual Basic)
期中考试VB试题
VB期末考试试题及答案
VB期中考试试卷-及参考答案(B1卷)-
VB期末考试复习题目