VB考试题及答案要点.pdf

《VB考试题及答案要点.pdf》由会员分享，可在线阅读，更多相关《VB考试题及答案要点.pdf（35页珍藏版）》请在三一文库上搜索。

1、VB 程序设计期末考试题 一、选择题 1 下列常量中，是Integer类型常量的是（C ） 。 A、123 C、: D、 8 将逻辑型数据转换成整型数据时，转换规则是（D ） 。 A、将 True 转换为 1 ，将 False 转换为 0 B、将 True 转换为 1 ，将 False 转换为 -1 C、将 True 转换为 0 ，将 False 转换为 -1 D、将 True 转换为 -1 ，将 False 转换为 0 9 表达式 2+3*45-SIN(X+1)/2中最先进行的运算是(D). A、SIN B、45 C、3*4 D、x+1 10 如果 x=2，则表达式 x+12 Or sin(

2、x)0.9 And 3x+3的值（B ） 。 A、不能计算 B、 True C、5 D、False 11 随机产生10，50 之间整数的正确表达式是（D ） 。 A、Round( Rnd*50) B、 Int(Rnd*40+10) C、Round( Rnd*51) D、 10+Int(Rnd*41) 12 每建立一个窗体, 工程管理器窗口中就会增加一个(C). A、类模块文件 B、工程文件 C、窗体文件 D、程序模块文件 13 INT(100*RND(1)产生的随机整数的闭区间是(B). A、1,100 B、0,99 C、0,100 D、1,99 14 下列数据类型中, 占用内存最小的是(D)

3、. A、Integer B、Single C、Boolean D、Byte 15 VisualBasic是一种 () 程序设计语言 .B A、过程式 B、非过程式 C、机器 D、低级 16 函数 Int(10*Rnd)是在 (A) 范围内的整数. A、0,9 B、0,1 C、1,9 D、1,10 17 以下合法的一组Visual Basic用户标识符是 C A、Sum 和 8abc B、a#x 和 Pi C、ForLoop 和 Total D、Const 和 DoWhile 18 函数 Len(Str(Val(“123.4“)的值为(B). A、5 B、6 C、8 D、11 19 Int(19

4、8.555*100+0.5)/100的值为B A、199.6 B、198.56 C、200 D、198 20 以下各表达式中, 计算结果为 0的是 (A). A、FIX(12.4)+FIX(-12.6) B、CINT(12.4)+CINT(-12.6) C、INT(12.4)+INT(-12.6) D、FIX(13.6)+FIX(-12.6) 21 MsgBox() 的正确语法是（D ） 。 A、 MsgBox( 标题 ，提示信息 ，按钮类型 ) B、 MsgBox( 提示信息 ，标题 ，按钮类型 ) C、MsgBox(标题 ，按钮类型 ，提示信息 ) D、 MsgBox( 提示信息 ，按钮类

5、型 ，标题 ) 22 38-3 OR 10+2 5,-1,0)后,x 的值为 (D). A、5 B、0 C、6 D、-1 25 下面关于 VB 的叙述中，不正确的是（A ） 。 A、用 VB 编写的程序可以在任何操作系统环境中运行。 B、VB 是面向对象的可视化的软件开发工具。 C、VB 是在 20世纪 60年代美国 Dartmouth 学院开发的 Basic 语言基础上发展而形成的。 D、VB 是由美国 Microsoft（微软）公司开发程序设计语言。 26 表达式 16 / 4-25*8 / 4 Mod 5 2 = ( A )。 A、4 B、0 C、-2 D、 -6 27 声明符号常量应该

6、用关键字(B). A、Private B、Const C、Static D、V26/ariant 28 下列数据类型中, 占用内存最大的是(D). A、Boolean B、Integer C、Byte D、Single 29 下列 VB数据类型中，占用内存最少的是（D ） 。 A、Currency B、Integer C、Boolean D、Byte 30 RGB 函数通过红 . 绿. 蓝三基色混合产生某种颜色, 某语法为 RGB ( 红. 绿. 蓝), 括号中红、绿、蓝三基色的成分使用0255之间 的整数 . 若使用三个滚动条分别输入三种基色, 为保证输入数值 有效 , 则应设置(B)属性

7、. A、Scroll和Change B、Max 和Min C、Smallchange 和 LargeChange D、Value 31 k=12.5 ， len( str( k ) )=( B ) 。 A、 4 B、5 C、 3 D、 2 32 表达式 Abs(-5)*55/5的值是 D A、1 B、5 C、-25 D、25 33 产生 10,37之间的随机整数的VisualBasic表达式是(C). A、Int(Rnd(1)*27)+11 B、Int(Rnd(1)*28)+11 C、Int(Rnd(1)*28)+10 D、In t(Rnd(1)*27)+10 34 工具栏中的 “ 启动 “

8、按钮的作用是(B). A、工程管理窗口 B、运行一个应用程序 C、打开被选中对象的代码窗口 D、运行一个窗体 35 不需要编译，计算机便可直接执行的程序是（B ） 。 A、C语言程序 B、 机器语言程序 C、 汇编语言程序 D、 Visual Basic语言程序 36 Val (“ 123ab ” )=（D ） 。 A、0 B、 不能转换 C、1230 D、123 37 表达式 16/4-25*8/4MOD52 的值为 A A、4 B、2 C、14 D、20 38 删除字符串前导和尾随空格的函数是(D). A、Rtrim( ) B、Ltrim() C、Lcase D、Trim() 39 下列表

9、达式中,其值为 0的是(C). A、15 mod 9 B、7/9 C、79 D、7 mod 15 40 表达式 Len(“123 程序设计 ABC“)的值是 B A、17 B、10 C、14 D、20 41 Int(-3.1)+round (-4.6)=_C_。 A、-8 B、-6 C、-9 D、-7 、/ 、Mod 、* 等4个算术运算符中, 优先级最低的是(A). A、Mod B、/ C、* D、 43 下面正确的赋值语句是（D ） 。 A、x=y=1 B、x+2=y2+2 C、x+y=1 D、x=y+z1 44 Len(“实践应用能力“) 的值是(A). A、6 B、4 C、不能确定 D

10、、8 45 表达式 Mid(“SHANGHAI“,6,3)的值是(C). A、ANGH B、SHA C、HAI D、SHANGH 46 表达式 253 mod 3 *Int(4.5)的值为(B). A、1 B、8 C、4 D、5 47 下面变量名称正确的是（C ） 。 A、x 1 B、integer C、 x_1_y D、 x , y 48 不能正确表示条件“两个整型变量 A和B之一为 0, 但不能同时为0“ 的布尔表达式(D). A、A*B=0ANDAB C、A=0ANDB0AND B=0 D、A*B=0AND(A=0ORB=0) 49 如果 X 是一个正的实数, 将千分位四舍五入, 保留两

11、位小数的表达式是(C). A、0.01*int(100*(x+0.05) B、0.01*int(x+0.05) C、0.01*int(100*(x+0.005) D、0.01*int(x+0.005) 50 表达式 X+1X是(D). A、非法表达式 B、字符表达式 C、算术表达式 D、关系表达式 51VisualBasic的编程机制是 (B). A、面向图形 B、事件驱动 C、面向对象 D、可视化 52 下面 4项中合法的变量名是(A). A、X_yz B、X-Y C、123abc D、integer 53 以下可以作为 VB变量名的是 (C). A、COS(X) B、X(-1) C、CO1

12、 D、SIN 54 表达式 (73+1)*(185-1)的值是 (B). A、8.76 B、6 C、6.67 D、7.8 55 下列哪个变量名的取法是不正确的(C). A、sTme B、T_12 C、T12% D、T_Temp 56 可以同时删除字符串前导和尾部空白的函数是(B). A、Ltrim B、Trim C、Mid D、Rtrim 57 VB窗体文件的扩展名是(A). A、FRM B、VBW C、VBP D、BAS 58 一个具有图形用户界面的“ 标准 EXE ” 工程必须包含的文件是（A ） 。 A、工程文件和窗体文件。 B、窗体文件和标准模块文件。 C、工程文件和资源文件。 D、工

13、程文件和标准模块文件。 59 数学式 3X5写成 VB表达式是（A ） 。 A、3=3 and 5 ” A” and Ucase$(C$)=0 AND a+cb+3 OR NOT d 的值是 _false_ 。 4. 表示 x是5的倍数或是 9的倍数的逻辑表达式为_x mod 5 = 0 OR x mod 9 = 0_。 5. 在刚建立工程时， 使窗体上的所有控件具有相同的字体格式，就对 _font_ 的属性进行设置。 6.Int(-2.6)、Int(2.6)、Fix(-2.6)、Fix(3.6)的值分别是 _-3_ 、_2_、_-2_ 、_3_。 7.Label 和 TextBox控件用来显

14、示和输入文本，如果仅需要让应用程序在窗体中显示文本信息， 可使用 _label _ 控件；若允许用户输入文本，则应使用_Textbox _ 控件。 8. 若命令按钮的名称为Cmdopen，程序要求单击该命令按钮时，打开一个窗口frm1 ，请对以 下事件过程填空。 Private Sub Cmdopen_Click()_ _frm1.show _ end sub 9. 表达式 93 7 Mod 2 2 的值是 _1_。 10. 表达式 Ucase(Mid( “ abcdefgh ” ,3,4)的值是 _CDEF_ 。 11. 当程序运行时， 要求窗体中的文本框呈现空白，则在设计时， 应当在此文本

15、框的_ 属性 _ 窗口中，把此文本框的_ text _ 属性设置成空白。 12. 已知 a=3 ， b=4 ， c=5 ， 表达式 ab and Not ca Or cb And ca And Not b 3000 Print “从1 到:“; i; “的和是 “; s End Sub 答案【学生答案】 i = i + 2 【参考答案】 i=i+1 2. - 【程序改错】 - 862 题目：以下程序段用于输出100-300 的所有素数 - Option Explicit Private Sub Form_Click() Dim n As Integer, k As Integer, i As

16、Integer, swit As Integer For n = 101 To 300 Step 2 k = Int(Sqr(n) i = 2 *ERROR* swit = 1 *ERROR* While swit = 0 If n Mod i = 0 Then swit = 1 Else *ERROR* i = i - 1 End If Wend If swit = 0 Then Print n; End If Next n End Sub 答案【学生答案】 swit = 1 【参考答案】 swit=0 【学生答案】 While swit = 0 【参考答案】 While i=i And s

17、wit=0 While swit=0 And i=i 【学生答案】 i = i - 1 【参考答案】 i=i+1 3.Option Explicit Private Sub Form_Click() Dim i As Integer, j As Integer, k As Integer Print Tab(30); “9*9 table“ Print: Print Print “ * “; For i = 1 To 9 *ERROR* Print Tab(i * 6); i Next i Print For j = 1 To 9 Print j; “ “; For k = 1 To j Pr

18、int Tab(k * 6); j * k; “ “; *ERROR* Next j Print *ERROR* Next k 答案【学生答案】 Print Tab(i * 6); i 【参考答案】 Print Tab(i * 6); i; 【学生答案】 Next j 【参考答案】 Next k 【学生答案】 Next k 【参考答案】 Next j 4.- 【程序改错】 - 题目：以下程序段用于计算5的N次方。 - Option Explicit Private Sub Form_Click() Dim n As Integer, k As Integer, s As Long n = In

19、putBox(“ Input n “) *ERROR* k = 0 *ERROR* s = 0 Do While k k Then If kmax b=max 【学生答案】 _ 【参考答案】 max=c 【学生答案】 Print a; “、“; b; “、“; c; “中最大值是 “;_ 【参考答案】 max 2. 以下程序的功能。 Private Sub Form_Click() Dim a%, b%, c%, d! Dim x1, x2 Dim p, q, r a = InputBox(“请输入 a的值 “) b = InputBox(“请输入 b的值 “) c = InputBox(“请

20、输入 c的值 “) d = b * b - 4 * a * c p = -b / (2 * a) If d = 0 Then *FILL* If _ Then r = Sqr(d) / (2 * a) x1 = p + r x2 = p - r Else x1 = p x2 = p *FILL* _ Print “x1=“; x1, “x2=“; x2 *FILL* _ q = Sqr(-d) / (2 * a) Print “x1=“; p; “+“; q; “i“, “x2=“; p; “-“; q; “i“ End If 答案【学生答案】 If _ Then 【参考答案】 d0 【学生答

21、案】 _ 【参考答案】 End if End If end if 【学生答案】 _ 【参考答案】 else Else ELSE 3. 从键盘输入学生分数，统计学生总人数和各分数段人数， 即优秀（ 90-100 ）、良好（ 80-89 ）、中等（ 70-79 ）、 及格（ 60-69 ）、不及格（60以下）的人数。 Private Sub Form_Click() Dim score%, n1%, n2%, n3%, n4%, n5% msg = “ 请输入分数（ -1 结束） “ msgtitile = “输入数据 “ score = Val(InputBox(msg, msgtitle) *

22、FILL* While _ total = total + 1 *FILL* Select Case _ Case Is = 90 n1 = n1 + 1 Case Is = 80 n2 = n2 + 1 Case Is = 70 n3 = n3 + 1 Case Is = 60 n4 = n4 + 1 Case Else n5 = n5 + 1 *FILL* _ score = Val(InputBox(msg, msgtitle) Wend Print n1, n2, n3, n4, n5, total End Sub 答案【学生答案】 While _ 【参考答案】 score=0 and

23、 score=0 and score-1 【学生答案】 Select Case _ 【参考答案】 score 【学生答案】 _ 【参考答案】 End Select 4以下程序段用于实现：输入两个正整数m 和n，求其最大 公因数和最小公倍数。 Private Sub Form_Click() Dim a%, b%, num1%, num2%, temp num1 = InputBox(“请输入一个正整数“) num2 = InputBox(“请输入一个正整数“) *FILL* If _ Then temp = num1: num1 = num2: num2 = temp End If a = n

24、um1 b = num2 *FILL* Do While _ temp = a Mod b a = b *FILL* _ Loop Print “最大公因数为：“; a Print “最小公倍数为：“; num1 * num2 / a 答案【学生答案】 If _ Then 【参考答案】 num1num1 【学生答案】 Do While _ 【参考答案】 b0 00 temp0 0“?“ Do While ch“?“ 【学生答案】 Case _ 【参考答案】 case “A“ to “Z“ Case “A“ to “Z“ 【学生答案】 _ 【参考答案】 loop Loop 窗体设计 1 在名称为

25、 Form1的窗体上画一个文本框，名称为Txt1 ；再画一个命令按钮， 名称为 C1，标题为 “移动 “ ，如图 1所示。 请编写适当的事件过程，使得在运行时，单击“ 移动 “ 按钮， 文本框水平移动到窗体的最左端如图2所示。程序中不得使用任何变量。 注意：完成题目后，必须保存工程后再关闭。 【控件】 VB.CommandButton_ 标准答案： Name=C1 学生答案： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Caption= 移动 学生答案： Caption= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Nam

26、e=Txt1 学生答案： Name= 【事件评分】错误 【事件】 Private Sub C1_Click() 标准答案： Txt1.Left = 0 学生答案： 二 1 、 利用VB设计上面的程序界面。窗体的标题为“字体修改 “ ；其中包括一名称为Label1, 标题为 “请输入 文字 “的标签； 一名称为 Text1 ，内容为空的文本框； 名称为 Command1, 标题为 “隶书 “ ，名称为 Command2, 标题为 “黑体 “ 的两个命令按钮。 2 、程序功能： 单击 “ 隶书“命令按钮时，文本框的字体设为“隶书 “ ； 单击 “ 黑体“命令按钮时，文本框的字体设置为“黑体 “ 。

27、 提示：不能使用任何变量！ 【事件】 Private Sub Command2_Click() 标准答案： Text1.Font = “黑体 “ 学生答案： 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Caption= 隶书 学生答案： Caption= 【事件评分】错误 【事件】 Private Sub Command1_Click() 标准答案： Text1.Font = “隶书 “ 学生答案： 【控件属性评分】错误 【控件】 VB.Label_ 标准答案： Caption= 请输入文字 学生答案： Caption= 三在名称为 Form1的窗体上建立一

28、个名称为List1 的列表框。 要求：在程序运行后，通过Form_Load() 事件过程加载窗体时，执行语句List1.AddItem “AAA“， 每当单击某个列表项时，都执行语句List1.AddItem List1.Text一次，如图所示。 【事件】 Private Sub Form_Load() 标准答案： List1.AddItem “AAA“ 学生答案： 【事件评分】错误 【事件】 Private Sub List1_Click() 标准答案： List1.AddItem List1.Text 四 在名称为 Form1的窗体上建立一个水平滚动条，名称为HS1 ，其最大值为100，最

29、小值为 0。 要求程序运行后，每次移动滚动框时，都执行语句Form1.Print HS1.Value， 如图所示（程序中不能使用任何变量） 【事件】 Private Sub HS1_Scroll() 标准答案： Print HS1.Value 学生答案： 【控件属性评分】错误 【控件】 VB.HScrollBar_ 标准答案： Name=HS1 学生答案： Name= 【控件属性评分】错误 【控件】 VB.HScrollBar_ 标准答案： Max=100 五 1 、在名称为 Form1的窗体上建立一个名称为l1的标签，并设置他不可见；两个名称为cmd1和 cmd2， 标题分别为 “ 显示 1

30、“和 “ 显示 2“的命令按钮。 2 、编写适当的事件过程，要求程序运行后， 如果单击 “ 显示 1“ 命令按钮，则标签可见并显示字符串“ aaa“ ； 如果单击 “ 显示 2“ 命令按钮，则标签可见并显示字符串“ bbb“。 程序中不能使用任何变量，直接显示字符串；不能使用默认属性。程序开始运行时界面如图 1所示标准答案： Caption= 显示 1 学生答案： Caption= 【控件属性评分】错误 【控件】 VB.Label_ 标准答案： Visible=0 False 学生答案： Visible= 【控件属性评分】错误 【控件】 VB.Label_ 标准答案： Name=l1 学生答案

31、： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Name=cmd2 学生答案： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Name=cmd1 学生答案： Name= 【事件评分】错误 【事件】 Private Sub cmd1_Click() 标准答案： l1.Visible = True l1.Caption = “aaa“ 学生答案： 【事件评分】错误 【事件】 Private Sub cmd2_Click() 标准答案： l1.Caption = “bbb“ 六 1 、在名称为 Form1的

32、窗体上画一个文本框，名称为Text1,且不可见；再画两个命令按钮，名 称分别为 c1和c2， 标题分别为 “ 隐藏 “ 和“显示 “ 。 2、请编写适当的事件过程，使得在运行时，如果单击“ 隐藏 “ 按钮，则文本框消失； 如果单击 “ 显示 “ 按钮，则文本框显示出来，如图1和图 2所示。程序中不得使用任何变量。 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Name=c2 学生答案： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Caption= 显示 学生答案： Caption= 【控件属性评分】错误 【控件】

33、 VB.CommandButton_ 标准答案： Name=c1 学生答案： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Caption= 隐藏 学生答案： Caption= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Visible=0 False 学生答案： Visible= 【事件评分】错误 【事件】 Private Sub c2_Click() 标准答案： Text1.Visible = True 学生答案： 【事件评分】错误 【事件】 Private Sub c1_Click() 标准答案： Text1.Visi

34、ble = False 学生答案： 七标题为 “ 输出 “的命令按钮，如图1-12所示。要求程序运行后，在文本框输入几个字符， 单击 “输出 “按钮，则在窗体上显示文本框中的文字。 注意：在程序中不能使用任何变量，不能使用默认属性。 控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Name=Cmd1 学生答案： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Caption= 输出 学生答案： Caption= 【事件评分】错误 【事件】 Private Sub Cmd1_Click() 标准答案： Print Text

35、1.Text 学生答案： 八在名为 Form1的窗体上画一个框架，名称为 Frm1，标题为 “ 框架 “ ， 高度为 2500，宽度为 4000， 框架内建立一文本框，距左边框600，距框架的上边框1200，文本框中的初始内容设置为“ 文本 框“ ， 如图所示。 注意：完成试题后，必须保存，然后关闭窗口。 【控件属性评分】错误 【控件】 VB.Frame_ 标准答案： Name=Frm1 学生答案： Name= 【控件属性评分】错误 【控件】 VB.Frame_ 标准答案： Height=2500 学生答案： Height= 【控件属性评分】错误 【控件】 VB.Frame_ 标准答案： Wi

36、dth=4000 学生答案： Width= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Left=600 学生答案： Left= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Text= 文本框 学生答案： Text= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Top=1200 学生答案： Top= 九 2、界面中窗体的标题为：密码的显示； 3 、窗体中包括两个文本框，他们的名称分别为passtxt 和showtxt , 其中： passtxt 用于密码输入，当在其中输入信息时，显示为“*“ ； 4、showtxt 文本框

37、，在程序运行时不能用 ，只能显示密码。 5 、具体功能： 程序运行时，当在文本框passtxt 中输入密码时，showtxt 中同时将输入的内容原样显示。 提示：不能使用任何变量，不能使用默认属性！ 窗体属性评分】错误 【窗体】 Form1.frm 标准答案： Caption= 密码的显示 学生答案： Caption=Form1 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Name=showtxt 学生答案： Name= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： Enabled=0 False 学生答案： Enabled= 【控件属性评分】错误

38、 【控件】 VB.TextBox_ 标准答案： Name=passtxt 学生答案： Name= 【控件属性评分】错误 【控件】 VB.TextBox_ 标准答案： PasswordChar=* 学生答案： PasswordChar= 【事件评分】错误 【事件】 Private Sub passtxt_Change() 标准答案： showtxt.Text = passtxt.Text 学生答案： 十在名称为 Form1的窗体上建立一个名称为Cmd1 ，标题为 “ 显示 “ 的命令按钮， 编写适当的事件过程。程序运行后，如果单击“ 显示 “ 命令按钮， 则在窗体上显示“ 呵呵，小菜一碟！“ ，

39、如图 1-1 所示。 程序中不能使用任何变量，直接显示字符串。 注意：完成后必须保存，然后再关闭。 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Name=Cmd1 学生答案： Name= 【控件属性评分】错误 【控件】 VB.CommandButton_ 标准答案： Caption= 显示 学生答案： Caption= 【事件评分】错误 【事件】 Private Sub Cmd1_Click() 标准答案： Print “呵呵，小菜一碟！“ 学生答案： 1-10 CABCD ACDDB 11-20 DCBDB ACBBA 21-30 DCDDA ABDDB 31-40 BDCBB DADCB 41-50 CADAC BCDCD 51-60 BACBC BAAAA 61-70CAAAD BBBCA 71-80DACAD AACAD 81-90DCDAD ADDCB 91-100CADDB ABBAC 101-110CACCC AAAAB 111-120DCDBA ADABD 121-130AAADA CBADB 131-140DCDCA BADCC 141-150ADADC DDDAD 151-CACCCDA