- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
期末考试模练习
第二部分 Visual Basic语言程序设计
一、单项选择题(每小题1分,共10分)
下列各题A)、B)、C)、D)四个选项中,只有一个选项是正确的。请将正确选项填涂在答题卡相应位置上,答在试卷上不得分。
(16)如果要改变窗体的标题,则需要设置的属性是( )
A)Caption B)Name C)FontName D)Text
(17)下列可作为VB6.0变量名的是( )
A)#A B)4A C)?xY D)constA
(18)表达式 -72\9/3Mod(1-2*3^2) 的输出结果是( )
A)15 B)7 C)-7 D)30
(19)假设变量X的值为100,则表达式10=X OR 100=Sgn(-100)的值为( )
A)100 B)-100 C)True D)False
(20)假定有如下语句
Private Sub Form_Click()
K = 2
If K = 1 Then A = 3
If K = 2 Then A = 2
If K = 3 Then A = 1
Print A
End Sub
运行时,输出的结果是( )
A)1 B)2 C)3 D)出错
(21)设a=5,b=10,则执行c=Int((b-a)*Rnd+a)+1后,c的值为( )
A)5~10 B)6~9 C)6~10 D)5~9
(22)如果在立即窗口中执行以下操作:
a=8 CR (CR是回车键,下同)
b=9 CR
Print ab CR
则输出结果是( )
A)-1 B)0 C)False D)True
(23)为了在按下回车键时执行某个命令按钮的事件过程,需要把该命令按钮的一个属性设置为True,这个属性是( )
A)Value B)Default C)Cancel D)Enabled
(24)执行下面的程序段后,k的值为( )
Private Sub Command1_Click()
x = 20
For i = 1 To x Step 2
k = k + i \ 5
x = x + 1
Next i
Print k
End Sub
A)16 B)21 C)60 D)程序进入“死循环”,无法输出k
(25)如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是( )
A)任何时刻最多只有一个窗体是活动窗体
B)不能把标准模块设置为启动模块
C)用Hide方法只是隐藏一个窗体,不能从内存中清除该窗体
D)如果工程中含有Sub Main过程,则程序一定首先执行该过程
二、阅读分析程序(每个选择3分,共45分)
1. 阅读下面程序,如有以下程序代码:
Option Explicit
Private Sub Command1_Click()
Dim i As Integer, j As Integer, k As Integer
k = 0
For i = 0 To 10 Step 3
For j = 1 To 10
If j 5 Then k = k + 4: Exit For
k = k + 1
Next j
L1: If i 8 Then Exit For
Next i
Print i, k
End Sub
(1)运行程序的结果是( )
A)3 18 B)6 27 C)9 36 D)12 45
(2)如果将L1语句删除,则程序运行结果为( )
A)6 27 B)9 16 C)9 36 D)12 36
(3)语句Option Explicit的作用是( )
A)表明此模块内变量必须先声明后使用
B)表明此模块没有通用过程
C)表明此模块的通用过程不能被其他模块调用
D)表明次模块变量不声明可以直接使用
2. 阅读下面程序,如有以下程序代码:
Dim x As Integer
Private Sub Form_Load()
Timer1.Interval = 1000
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
L1: Call sub1(x)
x = x + 1
If x = 5 Then Timer1.Enabled = False
End Sub
Public Sub sub1(n As Integer)
n = n + 1
Print n;
End Sub
(1)运行程序的结果是( )
A)1 2 3 B)1 3 5 C)1 2 3 4 5 D)1 1 1 1 1
(2)若将L1语句改为:L1: Call sub1((x)),则程序运行结果为( )
A)1 2 3
文档评论(0)