《程序设计语言VB》课程习题集
一、单选题
1. Visual Basic是一种面向（）的程序设计语言。
A. 用户
B. 事件
C. 程序
D. 对象
2.在Visual Basic6.0中规定工程文件的扩展名是（）。
A. vbp
B. for
C. frm
D. bas
3. Visual Basic6.0中规定窗体文件的扩展名是（）。
A. for
B. frm
C. vbp
D. bas
4.如何使一个标签或按钮控件在运行时不可用（）。
A. 把它的Visible属性设置成False
B. 把它的Visible属性设置成True
C. 把它的Enabled属性设置成False
D. 把它的Enabled属性设置成True
5.控件的字体可在属性窗口的（）属性中调整？
A. Font
B. Color
C. Text
D. Caption
6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。
A. Value
B. Cancel
C. Default
D. Enabled
7.在VB中，记录对象数据的是（）。
A. 方法
B. 事件
C. 属性
8.在文本框上显示文本的属性是（）。
A. Value
B. Text
C. Print
D. Enabled
9. InputBox函数返回值的类型为（）。
A. 字符串
B. 数值
C. 变体
D. 数值或字符串（视输入的数据而定）
10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。
A. 字符串"20"
B. 字符串"120"
C. 默认值100
D. 数值120
11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。
A. Label控件
B. TextBox控件
C. Timer控件
D. CommandButton控件
12.语句PRINT "25*4"的输出结果是（）。
A. 25*4
B. "100"
C. 100
D. 出现错误信息
13.只能用来显示字符信息的控件是（）。
A. 文本框
B. 标签框
C. 图片框
D. 图像框
14.下列可作为Visual Basic变量名的是（）。
A. A%A
B. 4A
C. ?xy
D. Stemp
15.下列哪个符号不能作为VB中的变量名（）。
A. timefly
C. min4max
D. R[8]
16.在窗体内声明的变量是（）。
A. 局部变量
B. 模块变量
C. 公共变量
D. 任意变量
17.语句Dim x As Integer作用是:将x定义为（）变量。
A. 单精度型
B. 整型
C. 布尔型
D. 字符型
18.在VB中,用Boolean来表示的数据类型是（）。
A. 长整型
B. 字符型
C. 布尔型
D. 单精度型
19.定义常量需要用到的关键字是（）。
A. Const
B. Dim
C. Private
D. Public
20.如果要处理3.1415类数据，使用的变量类型应该是（）。
A. Single
B. Long
C. Integer
D. String
21.表达式2*3^2+2*8/2+3^2的值为（）。
A. 27
B. 31
C. 35
D. 42
22.数学表达式X^2+3XY对应的VB算术表达式是（）。
A. X*2+3X*Y
B. X*X+3XY
C. X*X+3*X*Y
D. X*X+3*XY
23.在VB语言中，求余运算符是（）。
B. MOD
C. *
D. /
24.判断两个逻辑关系任一满足的逻辑运算是（）。
A. Or
B. And
C. Not
D. Ok
25.表达式4+5 \ 6 * 7 / 8 Mod 9 的值是（）。
A. 4
B. 5
C. 6
D. 7
26.选拔身高T超过1.7米且体重W小于60公斤的人，表示该条件的布尔表达式为（）。
A. T>=1.7 And W<=60
B. T<=1.7 Or W>=60
C. T>1.7 And W<60
D. T>=1.7 Or W<60
27. VB中下列逻辑表达式书写正确的是（）。
A. a>b and a>c
B. a>b>c
C. a≤b
D. a≠122
28.设x=4,y=8,z=7，表达式x A. 1 B. -1 C. TRUE D. FALSE 29. Sqr(81)+Fix(3.6)的值是（）。 A. 12 B. 7 C. 8 D. 9 30.把字符串“123”转换为数值123 时应该使用的函数是（）。 A. Str B. Val C. Len D. Log 31.表达式Abs（-3）+int(3.14)的值为（）。 A. 5 B. 6 C. 0.14 D. 6.14 32. Int(Rnd * 100) 表示的是（）范围内的一个整数。 A. [0,100] B. [1,99] C. [0,99] D. [1,100] 33. Len(“Friend”)的值是（）。 A.6 B.7 C.8 D.9 34. Int(-3.14)的值是（）。 A. -3 B. -3.14 C. -4 D. 3.14 35. Right（“banana”, 4 ）的值是（）。 A. ba B. banana C. nana D. ban 36.表达式Mid( “Hello”, 2, 3)的值是（）。 A. “ll” B. “llo” C. “ell” D. “ello” 37.语句if 3*4>=10 then a=1 else a=2 执行后，a的值为（）。 A. 12 B. 10 C. 1 D. 2 38.语句If x=1 Then y=1,下列说法正确的是（）。 A. x=1和y=1 均为赋值语句 B. x=1和y=1均为关系表达式 C. x=1为关系表达式，y=1为赋值语句 D. x=1为赋值语句，y=1为关系表达 39.下面程序段中，（）不是把两个数中的大值赋给变量Ｍax。 A. Max=IIf(x>y,x,y) B. If x>y Then Max=x Else Max=y C. Max=x ：If y>=x Then Max=y D. If y>=x Then Max=y Max=x 40.在Select判断结构中，下面的表述中不正确的是（）。 A. Case 1 B. Case a > 5 C. Case 3 To 6 D. Case is <10 41.由"For i=1 To 16 Step 3"决定的循环结构被执行（）次。 A.4 B.5 C.6 D.7 42. Dim a(5, 5) As Long 定义的数组元素的个数是（）。 A.10 B.11 C.25 D.36 43.用于清空数组数据的关键字是（）。 A. Erase B. Lbound C. Ubound D. Redim 44.下列关于do while …loop 和do…loop while循环执行循环体次数的描述正确的是（）。 A. do while …loop循环和do…loop while循环至少都执行一次 B. do while …loop循环可能不执行，do…loop while循环至少执行一次 C. do while …loop循环至少执行一次，do…loop while循环可能不执行 D. do while …loop循环和do…loop while循环可能都不执行 45. For - Next 语句属于程序基本结构中的（）。 A. 顺序结构 B. 循环结构 C. 分支结构 D. 选择结构 46.下列关于Exit For 的说法，正确的是（）。 A. 它可以退出任何类型的循环 B. 一个循环只能有一个Exit For C. 每个循环必须有Exit For D. Exit For本身是无条件退出循环 47.在Visual Basic代码窗口中,将某一条语句加以注释和说明时,应在语句前加（）。 A. , B. : C. ' D. ? 48.为了将一个语句写在多行上所使用的行续接符是：（）。 A. & B. _ C. ' D. ： 49.在一个语句内写多条语句时,每个语句之间分隔符号是（）。 A. , B. ； C. : D. ' 50. Function过程的定义，不必须有的是（）。 A. 过程的名称 B. 虚参 C. End Function D. 给过程赋值 51.下列过程调用语句中，被调用的过程一定是Sub子过程的语句是（）。 A. Pro1(x) B. Print Pro2(x) C. x= Pro3(x) D. Call Pro4(x) 52. Sub过程与Function过程最根本的区别是（）。 A. Sub过程可以用Call语句直接使用过程名调用，而Function过程不可以 B. Function过程可以有形参，Sub过程不可以 C. Sub过程不能返回值，而Function过程能返回值 D. 两种过程参数的传递方式不同 53.当拖动滚动条中的滚动块时，将触发滚动条的事件是（）。 A. Move B. SetFocus C. Scroll D. Change 54.列表项选择后得到的选中索引是指（）。 A. Value B. ListValue C. Index D. ListIndex 55.定时器定时工作所触发的事件是（）。 A. Click() B. Change() C. Timer() D. Load() 56.在图片框中加载图形(c:\666.jpg)的方法是（）。 A. Loadpicture("c:\666.jpg") B. Loadpicture( ) C. print("c:\666.jpg") D. cls 57.以下关于VB列表框的叙述中（）是错误的。 A. 可通过属性“Item”，返回列表框中的项目 B. 可通过属性“Text”，得到当前列表项中的内容 C. 可通过属性“ListIndex”返回当前选中的列表项的索引 D. 可通过属性“ListCount”返回列表框中项目的数目 58.为了把焦点移到某个指定控件，所使用的方法是（）。 A. GetFocus B. Visible C. Refresh D. SetFocus 59.为了隐藏一个窗体，所使用的方法为（）。 A. Load B. Show C. Hide D. UnLoad 60.如果窗体被遮挡，通过调用（）方法，可以将其显示。 A. Hide B. Show C. Unload D. load 61. VB窗体设计器的主要功能是（）。 A. 建立用户界面 B. 画图 C. 编辑文字 D. 编写程序代码 62.窗体的（）方法可以清除窗体上的图形与文本。 B. cls C. load D. circle 63.窗体没有（）属性。 A. Caption B. Text C. Picture D. Top 64.当一个工程有多个窗体时，其中的启动窗体是（）。 A. 第一个添加的窗体 B. 最后一个添加的窗体 C. 启动VB时建立的窗体 D. 在工程属性对话框中指定的窗体 65.在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（）。 A. 工程资源管理器窗口 B. 工具箱窗口 C. 代码窗口 D. 属性窗口 66.以下哪种属性或者方法可以重新定义VB坐标系？（） A. ScaleMode属性 B. Scale方法 C. DrawWidth和DrawStyle属性 D. BorderWidth和BorderStyle 属性 67.指令Circle（2000，3000），2000，QBColor，－3.14/2，－3.14将绘制以下哪种图形？（） A. 圆 B. 椭圆 C. 扇形 D. 圆弧 68.使用Line方法时，参数B和F可以组合使用，下列组合中（）是不允许的。 A. 不使用B和F B. B C. B和F D. F 69.执行命令Line（200，200）－step（500，500）后，CurrentX＝（）。 A. 200 B. 500 C. 700 70.在Visual Basic中,以下选项中表示单击事件的是（）。 A. KeyUp B. Click C. Activate D. Load 71.下面不属于键盘事件的是（）。 A. KeyUp B. KeyDown C. KeyPress D. Click 72.每当窗体失去焦点时会触发的事件是（）。 A. Active B. Deactive C. LostFocus D. Initialize 73.设在窗体上有一通用对话框控件Commonialog1，通过调用（）语句可以建立“颜色”对话框。 A. Commonialog1.ShowOpen B. Commonialog1.Action=2 C. Commonialog1.ShowColor D. Commonialog1.Action=5 74.用语句Commonialog1.ShowOpen建立了“打开”对话框以后，要得到用户所选择文件的路径及文件名，应使用Commonialog1的（）。 A. DialogTitle属性 B. FileTitles属性 C. FileName属性 D. InitDir属性 75.用于显示弹出式菜单的方法名是()。 A. ShowOpen B. ShowMenu C. ShowPopup D. PopupMenu 76.打开菜单编辑器的快捷键是（）。 A. CTRL+F B. Alt+F C. CTRL+E D. Alt+E 77.下列叙述中，错误的是（）。 A. 顺序文件打开后，既可以读又可以写 B. 随机文件打开后，既可以读又可以写 C. 顺序文件打开后，只能读或者只能写 D. 顺序文件和随机文件的打开都使用Open语句 78. VB编程中顺序文件的处理将用到关键字是（）。 A. File B. Save C. Open D. Disk 二、填空题1 79. Private Sub Command1_Click() a=3 b=1 For i=1 To 3 f=a + b a=b b=f Next i Print f End Sub 以上程序段运行后，f的结果为。 80.设有如下通用过程： Public Sub fun(a() As Integer, x As Integer) For i = 1 To 5 x = x + a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(5) As Integer, n As Integer For i = 1 To 5 arr(i) = 2* i Next fun arr, n Text1.Text = Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是。 81.阅读下列程序段 Option Explicit Private Sub Command1_Click() Dim str1 As String Dim str2 As String str1 = "ABCDEFG" MySub str1, str2 Print str2 End Sub Private Sub MySub(ByVal a As String, b As String) Dim c As String Dim i As Integer For i = Len(a) To 1 Step -1 c = c+ Mid(a, i, 1) Next b= c End Sub 程序运行后，“print”语句的输出结果是___ _。 82.在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click() x = Int(Rnd) + 6 If x ^ 2 > 25 Then y = x ^ 2 + 5 x = Int(Rnd) + 4 If x ^ 2 < 25 Then y = x ^ 2 x = Int(Rnd) + 5 If x ^ 2 = 25 Then y = x ^ 2 - 5 Print y End Sub 程序运行后，单击命令按钮，其输出结果为__ _。 83.阅读下列程序段 Private Sub Command3_Click() Print pl(3, 6) End Sub Public Function pl(x As Single, n As Integer) As Single If n = 0 Then pl = 1 If n Mod 2 = 1 Then pl = x * x + n Else pl = x * x - n End If End If End Function 程序运行后，单击该命令按钮，屏幕上显示的结果是______。 84.阅读下列程序段 Private Sub Command2_Click() For i = 1 To 3 x = 1 For j = 1 To 3 x = 3 + j For k = 1 To 3 x = x + 3 Next k Next j Next i Print x End Sub 运行程序后，单击命令按钮，输出结果是。 85.阅读下列程序段 Private Sub Command1_Click() Dim i As Integer Dim k As Integer k = 0 For i = 0 To 10 k = k + 1 i = i + k Next Print k; i End Sub 请问其循环体共执行了次，i的值是。 86. Private Sub Command1_Click() Dim i As Integer Dim x As Integer i = 1 Do i = i + 1 x = x + i Loop Until i >= 7 Print i , x End Sub 单击命令按钮后，i和x的值分别是、。 87.下面程序运行后，a、b、c、d的结果分别。Private Sub Command1_Click() Dim a, b, c, d As Integer Do For a = 1 To 2 b = b + 1 If a = 1 Then b = 0 c = 5 d = d + 2 Next a Loop Until d > 10 Print a, b, c, d End Sub 88.假定有如下的Sub过程： Sub S(x As Single, y As Single) t = x x = t + x y = t - y End Sub Private Sub Command2_Click() Dim a As Single, b As Single a = 6 b = 4 Call S(a, b) Print a, b End Sub 程序运行后，单击命令按钮输出结果为。 89.阅读下列程序段 Dim a(3, 3) As Integer For m = 1 To 3 For n = 1 To 3 a(m, n) = (m - 1) * 3 + n Next n Next m For m = 2 To 3 For n = 1 To 2 Print a(m, n); Next n Next m 程序运行后，显示结果为：。 三、综合设计题 90.编制程序实现：在窗体上，单击按钮1，在文本框中动态显示当前时间；单击按钮2，则停止动态显示；单击按钮3，清除文本框内容。提示：可用定时器控制时间，用系统函数Now显示时间（如Text1.Text = Now）。 91.编制程序：求出100-200之间所有可以被3整除的数的总和，将结果用消息框显示输出。 92.编制程序：利用输入框输入10个不同的整数，将它们从小到大排序，并打印输出。 93.编制程序实现：设计在一框架中包含三个复选框，只有当其1,3选中而2未选中时，才在Text1中显示"Hello"字符。 94.编一程序能实现在窗体上打印出如下图所示的图形。 A AAA AAAAA AAAAAAA BBBBBBB BBBBB BBB B 95.编一程序用于判断一正整数是否为素数。（提示：只能被1和本身整除的正整数称为素数。为了判断一个数n是不是素数，可以将n被2到sqr(n)之间的所有整数除，如果都除不尽，则n就是素数，否则n是非素数。） 96.选用If和Select判断结构中任意一种编写满足下列条件的计税要求的程序：少于1600元，免税；1601-5000元，征2%的税；多于5000元，超过部分征5%的税。 97.有a、b、c三个数，编一程序实现通过文本框给a、b赋值；再调用能完成a、b比较大小的子过程，用c将大数回传。要求按值传送a、b。 98.编一程序用于求所有的"水仙花数"。所谓"水仙花数"是指一个3位数，其各位数字立 方和等于该数本身。例如：153就是一水仙花数，因为153 = 13+53+33。 99.设计一弹出式菜单，用于设置窗体的背景色，背景色包含白色、黄色、红色三种颜色。100.编写程序实现：输入三角形的三条边a,b,c的值，根据其数值判断能否构成三角形。如果能，则判断三角形是否是直角三角形，若是则计算该直角三角形的面积。 提示：判断能否构成三角形的方法是，求最长的一边，判断它的边长是否小于另外两边边长之和；或求最短的一边，判断它的边长是否大于另外两边之差。 101.编写程序：通过四个命令按钮Command1-Command4，在图片框Picture1内分别实现画点、画线、画圆、擦除等功能。 102.编写程序实现：在窗体上单击按钮1，可通过输入对话框输入两个字符串；单击按钮2，将输入的两个字符串连接为一个字符串，并计算该字符串长度，然后在消息框中显示出来。 103.编一程序：用三个文本框分别输入a、b、c，求一元二次方程ax2+bx+c=0的解x1和x2，只包括实根。 104.编一程序：利用输入对话框输入两个正整数，求最大公约数。 四、简答题 （略）…… 答案 一、单选题 1. D 2. A 3. B 4. C 5. A 6. C 7. C 8. B 9. A 10. A 11. B 13. B 14. D 15. D 16. B 17. B 18. C 19. A 20. A 21. C 22. C 23. B 24. A 25. B 26. C 27. A 28. D 29. A 30. B 31. B 32. C 33. A 34. C 35. C 36. C 37. C 38. C 39. D 40. B 41. C 42. D 43. A 44. B 45. B 46. D 47. C 48. B 49. C 50. B 52. C 53. D 54. D 55. C 56. A 57. A 58. D 59. C 60. B 61. A 62. B 63. B 64. D 65. C 66. B 67. C 68. D 69. C 70. B 71. D 72. C 73. C 74. C 75. D 76. C 77. A 78. C 二、填空题1 79. 9 80. 30 81. GFEDCBA 82. 20 83. 3 84. 15 85. 4、14 86. 7、29 87. 3、1、5、12 88. 12、2 89. 4、5、7、8 三、综合设计题 90. Private Sub Command1_Click() Timer1.Interval = 5 Timer1.Enabled = True End Sub Private Sub Command2_Click() Timer1.Enabled = False End Sub Private Sub Command3_Click() Timer1.Enabled = False Text1.Text = "" End Sub Private Sub Timer1_Timer() Text1.Text = Now End Sub 91. Private Sub Command1_Click() Dim i, s As Integer For i = 100 To 200 If i Mod 3 = 0 Then s = s + i Next i MsgBox ("100-200之间所有可以被3整除的数的总和为：" & Str(s)) End Sub 92. Private Sub Command1_Click() Dim a(9) , i, j, m As Integer For i = 0 To 9 a(i) = Val(InputBox("第" & i + 1 & "个数：")) Next i For i = 0 To 9 For j = i + 1 To 9 If a(i) > a(j) Then m = a(i) a(i) = a(j) End If Next j Next i For i = 0 To 9 Print a(i); Next i End Sub 93. Private Sub Command1_Click() If Check1.Value = 1 And Check2.Value = 1 And Check3.Value = 0 Then Text1.Text = "Hello" End If End Sub 94. Private Sub Command1_Click() Dim i, j As Integer For i = 1 To 4 For j = 1 To (2 * i - 1) Print "A"; Next j Print Next i For i = 4 To 1 Step -1 For j = (2 * i - 1) To 1 Step -1 Print "B"; Next j Print Next i End Sub 95. Private Sub Command4_Click() Dim n, k, i, temp As Integer n = InputBox("请输入一个正整数") k = Int(Sqr(n)) i = 2 temp = 0 Do While i <= k And temp = 0 If n Mod i = 0 Then temp = 1 Else i = i + 1 《VB语言程序设计》教材 林卓然编著 《VB程序设计》习题参考答案 第1章习题 一、单选题 1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B 二、多选题 1．ACDE 2．BCDE 3．CD 4. CE 三、填空题 1．事件驱动 2．解释，编译 3．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计" 编程及上机调试 1. 按要求设置窗体属性 2．在窗体上建立一个标签Label1。程序代码如下： Private Sub Form_Click() Label1.Caption = "你单击了窗体" End Sub Private Sub Form_DblClick() Label1.Caption = "你双击了窗体" End Sub 3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第2章习题 一、单选题 1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B 二、多选题 1．BD 2．CD 3．AC 4. AD 三、填空题 1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y) 《程序设计语言VB》课程习题集 一、单选题 1.Visual Basic是一种面向（）的程序设计语言。 A.用户 B.事件 C.程序 D.对象 2.在Visual Basic6.0中规定工程文件的扩展名是（）。 A.vbp B.for C.frm D.bas 3.Visual Basic6.0中规定窗体文件的扩展名是（）。 A.for B.frm C.vbp D.bas 4.如何使一个标签或按钮控件在运行时不可用（）。 A.把它的Visible属性设置成False B.把它的Visible属性设置成True C.把它的Enabled属性设置成False D.把它的Enabled属性设置成True 5.控件的字体可在属性窗口的（）属性中调整？ A.Font B.Color C.Text D.Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A.Value B.Cancel C.Default D.Enabled 7.在VB中，记录对象数据的是（）。 A.方法 B.事件 C.属性 8.在文本框上显示文本的属性是（）。 A.Value B.Text C.Print D.Enabled 9.InputBox函数返回值的类型为（）。 A.字符串 B.数值 C.变体 D.数值或字符串（视输入的数据而定） 10.设有语句：a=InputBox("请输入数值:","输入示例","100")程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A.字符串"20" B.字符串"120" C.默认值100 D.数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 https://www.doczj.com/doc/f07511201.html,bel控件 B.TextBox控件 C.Timer控件 https://www.doczj.com/doc/f07511201.html,mandButton控件 12.语句PRINT"25*4"的输出结果是（）。 A.25*4 B."100" C.100 D.出现错误信息 13.只能用来显示字符信息的控件是（）。 A.文本框 B.标签框 C.图片框 D.图像框 14.下列可作为Visual Basic变量名的是（）。 A.A%A B.4A C.?xy D.Stemp 15.下列哪个符号不能作为VB中的变量名（）。 A.timefly VB程序设计 一、判断题 1、同一Form窗体中的各控件可以相互重叠,其显示的上下层次的次序不可以调整。( X ) 2、一个对象的若能识别多个事件,我们只能对其中一个事件编程( ) 3、单选按钮与复选框对象的Value属性类型不同,且只能取值True与False。( √ ) 4、事件过程由某个用户事件或系统事件触发执行,它不能被其她过程调用。( ) 5、图片框的Move方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值。( √ ) 6、“A=B=C”就是一个合法的Visual Basic语句。( ) 7、当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时,组合框会自动把这一条目添加到它的列表框中。( ) 8、 Visual Basic程序的运行可以从 Main()过程启动,也可以从某个窗体启动。( √ ) 9、在图片框中放置的控件既可以在该图片框内移动,也可以移出该图片框外。( ) 10、对于文件系统控件,当驱动器控件Drivel中的驱动器符改变时,文件夹列表控件Dir1中显示的文件夹也作相应的改变,可以在Drive1中的Change事件中使用如下命令。Dir1、Path＝ Drive1、 Drive( √ ) 11、滚动条控件可作为用户输入数据的一种方法。( √ ) 12、单选按钮控件与复选框控件都具有Value属性,它们的作用完全相同。( ) 13、静态变量就是一种局部变量,当原过程再次被执行时,静态变量的初值就是上一次过程调用后的值。( √ ) 14、 Visual Basic提供的几种标准坐标系统的原点都就是在绘图区域的左上角,如果要把坐标原点放在其她位置,则需使用自定义坐标系统。( √ ) 15.注释语句REM可自成一语句。( √ ) 16、用鼠标选中某菜单控件时,触发Click事件;而用键盘选中该菜单控件时,触发KeyPress( ) 17、组合框兼有文本框与列表框两者的功能,用户可以通过键人文本或选择列表中的项目来进行选择。( √ ) 18、当定时器控件的Interval属性值设置为0时,会连续不断地激发Timer事件。( ) 19.执行程序 x=0:for I=2 to 10 step –2:x=x+10:next I后x的值为0。( √ ) 2、句“FontName="宋体" ”与“Form1、FontName="宋体" ”的作用完全相同,无一例外。( ) 21局变量只能在窗体的通用区内用Public或global定义。( ) 22、在盘驱动器列表框Drivel的Change事件过程中,代码Dirl、 Path＝Drivel 、 Drive 的作用就是:当Drivel的驱动器改变时,Dirl的目录列表随不同驱动器作相应改变。( √ ) 23.直到型循环至少能执行一次循环体。( √ ) VB语言程序设计 《VB语言程序设计》课程实验教学大纲 一、制定实验教学大纲的依据 根据本校《2004级本科指导性培养计划》和《VB语言程序设计》课程教学大纲制定。 二、本实验课在专业人才培养中的地位和作用 《VB语言程序设计》课程是非计算机专业的一门公共基础课，是一门实践性和实用性都非常强的课程。其主要任务是使学生掌握程序设计的思想、方法和技巧，为应用程序开发打好必要的基础。实验课是本课程重要的教学环节,其目的是使学生掌握VB程序设计的开发环境的基本操作，以及设计图形用户界面的一般方法和技巧，重点掌握程序设计的基本思想和方法。通过接受基本实验技能的训练，提高学生的动手能力和分析、解决问题的能力。 三、本实验课程讲授的基本实验理论 1、对象的概念，常用控件的设置方法和用户界面的设计技巧。 2、变量、数据类型等概念及顺序、选择、循环三大结构的程序设计。 3、数组、过程的概念和基本操作，熟悉一些常用算法。 四、本实验课学生应达到的能力 1、熟悉Visual Basic的程序设计集成开发环境，掌握图形用户界面的一般设计方法和技巧，掌握常用控件的设置方法和其相关事件的应用。 2、掌握条件语句、循环语句、数组和过程的使用，能够运用所学语言解决实际问题，熟悉一些常用算法。 3、掌握程序调试技术，当程序出错时，有能力很快地判断出错误位置和出错原因，并且能很快排除这些错误，使程序能正确运行，培养分析问题、解决问题的能力。 4、加深课堂讲授和书本内容的理解及对语法规则的理解，达到灵活运用和培养程序设计能力的目的。 5、培养良好的程序设计风格。 五、学时、教学文件 学时:本课程总学时为56学时，其中实验为20学时，占总学时的35.7%。 教学文件:教材《Visual Basic程序设计简明教程(第二版)》实验部分;实验报告学生自拟。 要求学生实验前预习实验内容，并编写出源程序或给出初步的解决方案。指导教师应概述实验的设计思想和方法等，具体实验步骤和编写、调试程序由学生独立完成。 六、实验考核办法与成绩评定 1、实验考核每次依据预习、实验完成情况、纪律等综合给出实验成绩。未参加实验者或实验成绩不 合格者，本课程不予通过。 2、实验成绩占该课程总成绩的10%。 七、仪器设备及注意事项 仪器设备:微型计算机、Visual Basic 6.0软件 注意事项:注意保护设备 八、实验项目的设置及学时分配 序号实验项目学时实验类型要求适用专业 1 熟悉VB集成开发环境 2 验证必做工业工程(管理) 第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C ) 《VB语言程序设计基础》课程教学大纲 课程编号：0806606506 课程名称：VB语言程序设计基础 英文名称：Visual Basic Language Programming Design 课程类型：专业选修课 总学时：24 讲课学时：14 上机学时：10 学分：1.5 适用对象：电气工程及自动化专业电网监控技术方向 先修课程：《大学计算机基础》、《C语言程序设计》 一、课程性质、目的和任务 本课程是电气工程及自动化专业电网监控技术方向的一门专业选修课，是一门实用性强、面向程序开发与应用的重要的专业课程。随着面向对象的程序设计方法日益成熟，人们考虑将各种图形界面和图像元素作为"对象"预先进行定义，用户在开发时只需直接调用。Visual Basic正是基于这种思想产生的一种Windows应用程序开发工具。它具备易学易用的特点，且功能相当强大，它还拥有非常庞大的Windows应用程序开发用户群。通过本课程的学习，要求学生掌握VB语言的结构及开发环境，程序设计方法与基本数据结构，掌握已有控件与函数的调用方法；通过上机实践培养学生分析具体问题、解决实际问题的能力，为其它编程工具的学习以及今后的基于专业的系统开发打下坚实的基础。 二、教学基本要求 本课程是理论与实践并重的课程，要求学生既要掌握基础理论知识，又要掌握操作计算机和运行程序的基本技能；能够熟练运用VB6.0集成开发环境编制具有中等难度的应用程序，在实践中培养独立分析问题和解决问题的能力。 本课程的基本要求如下： 1．了解VB的特点，掌握在VB集成开发环境中编辑、编译、运行、调试程序的全过程，具备较强的程序调试能力。 2．掌握VB语言的基本语法成分和面向对象程序设计方法。 3．掌握VB 常用控件的使用方法。 4．掌握VB 的用户界面、菜单与多文档界面设计方法。 本课程让学生既掌握了结构化程序设计方法又学会面向对象的编程思想，在实际应用中将两者有机结合。 三、教学内容及要求 1．Visual Basic 程序设计概述 （1）了解VB的发展，功能及特点，了解VB的安装和启动过程。 （2）掌握VB集成开发环境。 2．简单的VB程序设计 （1）掌握对象的概念。 《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 第一题 设计程序，从文本框中输入一个整数n（n<500），单击“处理”按钮是产生3个1~n 的随机整数，并分别显示在3个标签中。 程序如下： Private Sub Form_Load() ‘加载 Dim n As Integer, a As Integer ‘定义随机变量 Dim b As Integer, c As Integer Randomize ‘使rnd函数产生不同序列的随机数 n = Val(InputBox("请输入一个正整数n（n<500）")) 'inputbox函数产生对话框供用户输入数值 a = Int(n * Rnd) ‘在小于n的数随机选取一树值“下同” b = Int(n * Rnd) c = Int(n * Rnd) Label1.Caption = a ‘随机选取的数值n显示在标签上面“下同” Label2.Caption = b Label3.Caption = c End Sub ‘结束运行 第二题 设计程序，在窗体上建立5个文本框和1个命令按钮，利用4个文本框输入4个数，单击命乏按钮进行处理，求出这4个数中的最大数显示在第5个文本框中 [提示]①数值的数据类型可以定义为单精度型；②可以参考例4.2的处理方法；也可以分两组数（2个数为一组）进行比较，再从两组数中的较大数中求出最大数. 程序如下： Private Sub Command1_Click() '执行 Dim m As Single, a As Single '定义变量为单精度 Dim b As Single, c As Single Dim d As Single a = Val(Text1.Text) '为变量赋值 b = Val(Text2.Text) c = Val(Text3.Text) 中南大学现代远程教育课程（专科）考试复习题及答案 《VB程序设计与应用》 一、选择题：在每小题给出的四个选项中，只有一项是符合题目要求的，请把所选项前的字母填在 题后的括号内。 1. Visual Basic程序中分隔一行中各语句的字符是（）。[ ] A)‘ B): C)\ D)_ 2. 下列可作为Visual Basic的变量名的是（）。[ ] A: Filename B: A（A＋B）C: A%D D : Print 3. 要让菜单项无效，应将（）属性值设置为False。 [ ] A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub [ ] A: 命令按钮的单击B: 命令按钮的装载 C; 窗体的装载D: 窗体的单击 5. Vb中描述文件扩展名的是（）属性。[ ] A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中，不正确的为（）。[ ] A)事件是由Visual Basic预先定义好的，能够被对象识别的动作 B)DblClick（双击）是Visual Basic中的一种事件 C)一个对象可以识别一个或多个事件 D)对于一个系统提供的对象可以识别哪些事件，需要程序员自己定义 7. 下列控件中可设置滚动条是（）。 [ ] A. 检查框（复选框） B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体，( )不会是其默认名。 [ ] A. Form1 B. Form2 C. Formx D. Form10 9. Const One&=1，则One为（）类型的常数。[ ] A)整型 B)字节型 《VB语言程序设计》习题参考答案 第1章习题 一、单选题 1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B 二、多选题 1．ACDE 2．BCDE 3．CD 4. CE 三、填空题 1．事件驱动 2．解释，编译 3．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计" 编程及上机调试 1. 按要求设置窗体属性 2．在窗体上建立一个标签Label1。程序代码如下： Private Sub Form_Click() Label1.Caption = "你单击了窗体" End Sub Private Sub Form_DblClick() Label1.Caption = "你双击了窗体" End Sub 3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第2章习题 一、单选题 1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B 二、多选题 1．BD 2．CD 3．AC 4. AD 三、填空题 1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y) (3) a*a–3*a*b/(3+a) (4) x^(3/8)+Sqr(y*y+4*a*a/(x+y^3)) VB程序设计复习题 1．Visual Basic是一种___D___的可视化程序设计语言。 A．面向机器 B．面向过程 C．面向问题 D．面向对象2．Visual Basic主窗口中不包括____B_____。 A．标题栏 B．状态栏 C．工具栏 D．菜单栏 3．程序运行中用鼠标双击当前窗体时，会触发窗体的_____C____ 事件。 A．Load B．Unload C．DblClick D．KeyPress 4．假设窗体上已有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先要执行的操作是 ____A______。 A．单击窗体上没有控件的地方 B．单击任一个控件 C．双击任一个控件 D．双击窗体上没有控件的地方 5、要设置窗体上各控件的属性，可在 ____C___ 中进行。 A．窗体布局窗口 B．工程资源管理器窗口 C．属性窗口 D．窗体窗口 6．设变量A的值为-2，则___A___函数的执行结果与其他三个不一样。 A．Val("A") B．Int(A) C．Fix(A) D．-Abs(A) 7．要在窗体Forml的标题栏上显示"统计程序"，可用___B___语句。 A．https://www.doczj.com/doc/f07511201.html,="统计程序" B．Form1.Caption="统计程序" C. Forml.Caption=统计程序 D．https://www.doczj.com/doc/f07511201.html,=统计程序 8．函数String(n, "str")的功能是 B 。 A．把数值型数据转换为字符串 B．返回由n个字符组成的字符串 C．从字符串中取出n个字符 D．从字符串中第n个字符的位置开始取子字符串 9、定义变量如下： Dim MyVar MyVar =”come see me “ 若在立即窗口中显示MyVar的值，下面正确的是（ A ） 1、题目:（事件）单击窗体（响应)用输入框输入一自然数，判断就是＂正数”、＂负数或＂零”,并根据输入得数用消息框显示”正数"、”负数”或”零". 2、题目:（事件）单击窗体。（响应）求２０0～３0０之间既能被3整除又能被7整除得数.并求出所有数之与存入变量ＳＵＭ中 3、题目：单击窗体。（响应)已知S=1+1/４+１／9+1/1６+1/25+…+1／1０0，结果输出在窗体上。 4、题目：（事件）单击窗体.（响应）在窗体上打印数列２／1，３／2,5/3,8/5，1３/８…得前10项，并求其与，将与保存在变量s中。 5、题目：（事件）双击窗体。(响应)把一元钞票换成一分、二分与五分得硬币每种至少有一枚)，求出其所有得换法，把结果输出在窗体上。将所有得换法得数目存入变量N中 6、题目:单击窗体。）求１！+２！＋3!+4！＋5!并将结果输出到窗体上。结果存入变量S中 7、题目:（事件）单击窗体。（响应)生成一个一维数组（10个数组元素依此为: ' １5、23、７2、４3、9６、2３、３、65、88、１7 写程序求出这个数组中得最大值、最小值与平均值,并输出在窗体上。将最大值，最小值,平均值分别存入变量Max，Min，Aver中 8、题目:(事件）单击窗体。（响应)在窗体上输出100～２0０之间得所有合数。求出所有数之与存入SUＭ中所谓合数就是指自然数中能被1与本数整除以外，还能被其她数整除得数。 ９、题目：（事件）单击窗体.(响应）求10～20之间所有素数得乘积并输出在窗体上。将结果存入变量L中。 1０、题目：(事件）单击窗体。（响应)求1- 1/2＋1/3 －1/4 +……+ 1／99－1/10０得值。将结果存入变量J中。 １题 ｎ = InputＢoｘ（"输入一个自然数”） If n ＞0 Then rｅsulｔ = ”正数＂ ElseIf n < 0 Ｔhen ｒeｓult = ”负数" ElseIf n ＝ 0 Ｔhen result ＝"零＂ End If MsgＢox "输入得数据”& ｎ＆”为：”＆ rｅsuｌt 2题 Dｉｍ i As Inteｇer Fｏｒ i = 201 To 300 Ｉf ((i Mod 3） = 0) Aｎｄ((i Mod ７) = 0） Tｈen Ｐrinｔ (CStｒ(i)） sum = ｓum + i End Iｆ Ｎeｘt Ｐrint sum 3题 DiｍｉAｓ Inteｇeｒ ｓ = 0 For i = 1 To 1０ s ＝ s + 1 / (i ^ i) Next Print (s) ４题 Ｄim i，ｊ, ｋ， m As Integer s ＝ 0 :i = 2:j = １ For k = 1 To 10 s = s ＋ｉ / j ｍ＝ j Prｉnt (CSｔｒ(i)） & "／" ＆ＣＳtｒ(j) j = i ｉ = i + m Ｎexｔ 5题 Ｄｉｍ i, j，ｋAｓＩnｔegｅr For i = １ To １00 Fｏr j = 1 Ｔo 50 For k = 1 Tｏ 20 If （（i + 2 ＊j ＋ k * 5）＝ 100) Ｔｈｅn Print (CＳｔr(i)） Priｎｔ (CStr（j)） Pｒinｔ（CＳtｒ(k)） n ＝n + １ VB语言程序设计 (1/44) VB支持自定义数据类型,在某程序中我们定义了如下类型Type Student number As string name As String age As Integer End Type ?针对上述定义,如下几项用法正确的是:( )正确答案：B ?A https://www.doczj.com/doc/f07511201.html,="张三" ?B Dim s As Student https://www.doczj.com/doc/f07511201.html,＝"张红" ?C Dim s As Type Student https://www.doczj.com/doc/f07511201.html,="张三" ?D Dim s As Type https://www.doczj.com/doc/f07511201.html,="张三" (2/44) ?以下能够触发文本框Change事件的操作是( )正确答案：D ?A 文本框失去焦点 ?B 文本框获得焦点 ?C 设置文本框的焦点 ?D 改变文本框的内容 (3/44) ?下面程序运行后输出的结果是( ) 正确答案：B DIM C1,C2 C1="CHINA" C2=STRING$(2, C1) PRINT Left(C1,1) + C2 移除错题 ?A CHI ?B CCC ?C INA ?D AAA (4/44) ?设窗体上有一个文本框,名称为text1,程序运行后,要求该文本框不能接受键盘输入,但能输出信息,以下属性设置正确的是:正确答案：B ?A text1.maxlength=0 ?B text1.enabled=flase ?C text1.visible=flase ?D text1.width=0 (5/44) ?用于返回窗体可用区域宽度的属性是( )正确答案：A ?A ScaleWidth ?B ScaleLeft ?C ScaleHeight ?D ScaleTop (6/44) ?Visual Basic提供的On Error Resume next错误陷阱语句表示( )正确答案：C ?A 当发生错误时，使程序转跳到语句标号为0的程序块 ?B 当发生错误时，不使用错误处理程序块 ?C 当发生错误时，忽略错误行，继续执行下一语句 ?D 当发生错误时，终止本过程执行，继续执行下一过程 (7/44) 为了检测到用户按下键盘上的所有键,应该使用的键盘事件为( ) ?正确答案：C ?A KeyPress ?B V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… VB程序设计 一、判断题 1. 同一Form窗体中的各控件可以相互重叠，其显示的上下层次的次序不可以调整。（ X ） 2. 一个对象的若能识别多个事件，我们只能对其中一个事件编程（ ） 3. 单选按钮与复选框对象的Value属性类型不同，且只能取值True和False。（√） 4. 事件过程由某个用户事件或系统事件触发执行，它不能被其他过程调用。（ ） 5. 图片框的Move方法不仅可以移动图片框，而且还可以改变该图片框的大小，同时也会改变该图片框有关属性的值。（√） 6. “A=B=C”是一个合法的Visual Basic语句。（ ） 7. 当在一个简单组合框的文本框中输入一个它的列表框中没有的条目时，组合框会自动把这一条目添加到它的列表框中。（ ） 8. Visual Basic程序的运行可以从 Main（）过程启动，也可以从某个窗体启动。（√） 9. 在图片框中放置的控件既可以在该图片框内移动，也可以移出该图片框外。（ ） 10. 对于文件系统控件，当驱动器控件Drivel中的驱动器符改变时，文件夹列表控件Dir1中显示的文件夹也作相应的改变，可以在Drive1中的Change事件中使用如下命令。Dir1. Path＝ Drive1. Drive（√） 11. 滚动条控件可作为用户输入数据的一种方法。（√） 12. 单选按钮控件和复选框控件都具有Value属性，它们的作用完全相同。（ ） 13. 静态变量是一种局部变量，当原过程再次被执行时，静态变量的初值是上一次过程调用后的值。（√） 14. Visual Basic提供的几种标准坐标系统的原点都是在绘图区域的左上角，如果要把坐标原点放在其他位置，则需使用自定义坐标系统。（√） 15．注释语句REM可自成一语句。（√） 16. 用鼠标选中某菜单控件时，触发Click事件；而用键盘选中该菜单控件时，触发 KeyPress （ ） 17. 组合框兼有文本框和列表框两者的功能，用户可以通过键人文本或选择列表中的项目来进行选择。（√） 18. 当定时器控件的Interval属性值设置为0时，会连续不断地激发Timer事件。（ ）19．执行程序 x=0:for I=2 to 10 step –2:x=x+10:next I后x的值为0。（√） 2.句“FontName="宋体" ”与“Form1.FontName="宋体" ”的作用完全相同，无一例外。（ ） 21局变量只能在窗体的通用区内用Public或global定义。（ ） 22. 在盘驱动器列表框Drivel的Change事件过程中，代码Dirl. Path＝Drivel . Drive 的作用是：当Drivel的驱动器改变时，Dirl的目录列表随不同驱动器作相应改变。（√） VB程序设计试题及答案（一） 一、单选题 1. 是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) =“欢迎使用VB” (B) ='欢迎使用VB' (C) =欢迎使用VB (D) ="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 … … Next x Next x V B程序语言设计科学 计算器 标准化工作室编码[XX968T-XX89628-XJ668-XT689N] VB程序语言设计 课程大作业 题目名称：科学计算器设计 班级： 姓名： 学号： 课程教师：温海骏 学期：2014-2015学年第2学期 完成时间：2015年5月 一、实验内容 《科学计算器》设计 本科学计算器是一种能实现加、减、乘、除、倒数、乘方、正玄、余玄、正切、In、n!函数、进制、弧度转换等运算功能，并带有存储器、统计框等，基本实现了Windows自带计算器的所有功能。要实现计算器的这些功能就用到我们所学的VB知识编写程序来实现运算功能并解决问题，也是我们实训要达到的目的。 二、实验目的 1、通过本实验，进一步理解Visual?Basic的编程方法。 2、?提高运用Visual?Basic编程的能力。 3、培养对所学知识的综合运用能力。 4、用所学的VB知识编写程序来实现运算功能并解决问题，达到实训的目的 三、实验设备 计算机、VB软件 四、实验过程 1、课题的选材过程（设计思路） 由VB程序设计的科学计算器是一种能实现加、减、乘、除、倒数、乘方、正玄、余玄、正切、In、n!函数、进制、弧度转换等运算功能，并带有存储器、统计框等，基本实现了Windows自带计算器的所有功能。 思路：为实现上述功能，我的基本思路是在窗体上建立4个控件数组，第一个控件数组是标准型，实现简单的四则运算；第二个控件数组是科学型，用来进行正弦余弦、正切余切、正割余割、反正弦反余弦、对数和n！等函数功能；第三个控件数组为程序员，实现进制转换；另外一个按钮实现单位转换。 2、设计的将要达到的目标 实现加、减、乘、除、倒数、乘方、正玄、余玄、正切、In、n!函数、进制、弧度转换等运算功能，并带有存储器、统计框等，基本实现Windows自带计算器的所有功能。 3、总体设计结构与功能 （1）总体设计结构介绍（绘制：结构流程图） （2）各功能模块运行界面的功能、算法和操作步骤 VB程序算法如下： 4、设计结果分析（运行结果展示、正确性分析） 经调试，程序运行基本正确。运行结果如下： 五、总结 1、对学习者知识的要求： 第一套试题 一、选择题(每题2分，共30分） 1.在ＶB环境中,工程文件的扩展名是( C ) (A）.frm (B)．baｓ（Ｃ）.vbp （D).ｆrx 2．下面4项中不属于面向对象系统三要素的是( A ) (A)变量（B)事件（C)属性（D）方法 3. \、/、Ｍod、*这4个算述运算符中，优先级别最低的是( Ｃ ) （A)＼ (Ｂ）/ （C）Mod (D）* 4.要使Pｒinｔ方法在Ｆoｒm_Load事件中起作用,要对窗体的( C )属性进行设置 （A）ＢackＣoｌor （B）ForeCoｌor （Ｃ）AｕtｏRｅdraｗ（D）Cａptｉon 5．不论何控件,共同具有的属性是（ B ) （A)Text (B)Naｍe （C）FoｒeColoｒ（Ｄ）Ｃaｐtｉoｎ 6.要使Ｆoｒm1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A)Foｒm1.Capｔｉon=“欢迎使用ＶＢ”（B）Form1.Cａption＝ˊ欢迎使用VBˊ (C）Forｍ１．Caption=欢迎使用VB （D)Forｍ1．Caｐｔioｎ=〞欢迎使用ＶB〞 7.VＢ提供了结构化程序设计的３种基本结构，这3种基本结构是( D ) （Ａ)递归结构,选择结构,循环结构 (B)选择结构，过程结构，顺序结构 （C)过程结构,输入、输出结构，转向结构(Ｄ)选择结构,循环结构，顺序结构 8.给变量赋值a=1２3＋MＩD(“１23456”,３,２),a变量中的值是( D ) (A)“1２334”(B)1２3 (C）12334 （Ｄ）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是( Ｄ ) (A）Ｉf sex=“男”And agｅ＜40 And IｎStｒ(duty,“教授”)＞0 Thｅn n=n+１ （B)If sｅx=“男”And age＜40 And (duty=“教授”Or dutｙ=“副教授”) Theｎｎ=n+1 一、单项选择题 1．与传统的程序设计语言相比，VB最突出的特点是（） A）结构化程序设计B）程序开发环境 C）事件驱动编程机制D）程序调试技术 2．如果要改变窗体的标题，则需要设置的属性是（） A）Caption B) Name C) BackColor D) BorderStyle 3．下列说法正确的是（） A）窗体中活动控件只能有一个 B）若一个控件上有4个黑色的小方块，表明该控件是活动的 C）在活动窗体中只能通过拖拉右上角和左下角的小方块来同时调整高度和宽度上缩放控件 D）非活动控件在窗体上是隐藏的 4．下列不能打开代码窗口的是（） A）双击窗体上的某个控件B）双击窗体 C）按F7键D）单击窗体或控件 5．假定在窗体上有一个名称（Name属性）为Command1的命令按钮，如果把按钮的标题设为“进入系统”，则下列赋值语句正确的是（） A) Command1=“进入系统”B）Command1.Caption=“进入系统” C）Command1.Text=“进入系统”D）https://www.doczj.com/doc/f07511201.html,=“进入系统” 6．设a=2,b=3,c=4,d=5，表达式NOT a<=c OR 4*c=b^2 AND b<>a+c的值是（） A）-1 B) 1 C) True D) False 7．在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() A=InputBox(“Enter the First integer”) B=InputBox(“Enter the Second integer”) Print B+A End Sub 程序运行后，单击命令按钮，先后在两个输入对话框中输入456和123，则输出结果为（） A）579 B）123 C）456 D）123456 8．为了取消窗体的最大化功能，需要把它的一个属性设置为False，这个属性是（）A）ControlBox B) MinButton C) Enabled D) Maxbutton 9．使文本框获得焦点的方法是（） A）Change B) GotFocus C) SetFocus D) LostFocus 10．在窗体上画两上单选按钮，名称分别为Option1，Option2，标题分别为“宋体”和黑体；两个复选框，名称分别为Check1，Check2，标题分别为“粗体”和“斜体”，一个文本框，名称为Text1，Text属性为“改变文字字体，样式”。要求程序运行时，“宋体”单选钮和“粗体”复选框被选中（窗体外面如下图所示），则能够实现上述要求的语句序列是（） A）Option1.Value=True B) Option1.Value=True Check1.Value=False Check1.Value=True C) Option1.Value=False D) Option1.Value=True Check1.Value=True Check1.Value=1《VB程序设计》习题答案-林卓然编著
程序设计语言VB_习题集(含答案)
VB语言程序设计试题库
VB语言程序设计
vb程序设计试题(含答案)
(完整版)《VB语言程序设计基础》课程教学大纲.
VB程序设计 试题与答案-1
VB语言程序设计
[整理]VB程序设计复习题及答案.
《VB语言程序设计》习题参考答案
VB程序设计复习题答案
VB程序设计考试题库——考试专用
VB语言程序设计
VB程序设计试题及答案一
VB语言程序设计试题库
VB程序设计试题及答案(一)
VB程序语言设计科学计算器
vb程序设计试题(含标准答案)
《VB语言程序设计》期末试题
相关主题
文本预览