- 1、本文档共4页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Visual Basic 程序设计期终试卷
《Visual Basic 程序设计》模拟试卷二
考试形式:闭卷 考试时间:120分钟
站点:_________ 姓名: 学号: 成绩:
一、选择题( 8小题,共24分)
1、英文缩写“OOP”的含义是 。
A)事件驱动的编程机制 B)结构化程序设计语言
C)面向对象的程序设计 D)可视化程序设计
2、下面变量名不合法的是 。
A)abc B)abc# C) a$b D)student_num
3、数组定义中 Dim A%(-10 To 20), 数组变量A% 共有______ 元素。
A) 20 B)30 C) 31 D) 10
4、定义10个单精度实数一维数组正确的语句是 。
A)Dim Abc(9) As Single B)Option Base 1 :Dim Abc(9)
C)Dim Abc#(9) D)Dim Abc(10) As Single
5、语句 Dim s(3,4) As double 表示s是一个二维双精度数组,有_______元素。
A)20 B)12 C)16 D) 15
6、只能用来显示字符信息的控件是 。
A) 图像框 B) 图片框 C) 标签框 D) 文本框
7、菜单项能触发的事件有 。
A)MouseDown B)MouseUp,Click C)Click D)DblClick 和Click
8、方法 Print “10+6=”;10+6 输出的结果是 。
A) 10+6= 10+6 B)10+6=16 C)16=10+6 D)“10+6=”10+6
二、阅读程序写出结果(6小题,每题6分,共36分)
1、下列程序:
Private Sub Command1_Click ( )
x1 = InputBox (“请输入数据:”)
x2 = InputBox (“请输入数据:”)
Print x1 + x2
End Sub
若输入数据 3 和4, 输出结果是 。
2、下列程序:
Private Sub Command1_Click ( )
a=0
For J=1 To 15
a = a + J mod 3
Next J
Print a
End Sub
运行后输出的结果 。
3、下列程序:
Private Sub Command1_Click( )
Score = Int ( Rnd * 10) + 80
Select Case score
Case Is 60
A$ =”E”
Case 60 To 69
A$ = ”D”
Case 70 To 79
A$ =” C”
Case 80 To 89
A$= “B”
Case Else
A$ = “A”
End Select
Print A$
End Sub
运行时输出结果是 。
A)A B)B C)C D)D
4、下列程序:
Option Base 1
Private Sub Command1_Click( )
Dim arr(5) As String
For j =1 To 5
arr ( j ) = Chr( Asc(“A”) + ( j -1) )
Next j
For Each b1 In arr
Print b1 ;
Next
End Sub
运行时输出结果是 。
A) ABCDE B) abcde C) 1 2 3 4 5 D) 程序出错
5、下列程序:
Option Explicit
Private Sub triangle (str
文档评论(0)