- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
四川省第21次等级考试理论练习
第二部分
Visual BASIC 语言程序设计
(共85分)
一、单项选择题(1分/小题,共10分) ·
1.在ⅥsualBasic中,窗体模块的扩展名是( 16 )。
16(A)EXE (B)BAS (C)FRM (D)VBP
2.表达式Val(“2a0”) + 2 Mod 4 + 3*2^2的值是( 17 )。
17(A)16 (B)14 (C)34 (D)40
3.表达式Int(3*Rnd+2)*Int(5*Rnd-1)的取值范围是( 18 )。
18(A)[1,7] (B)[-2,12] (C)[-4,12] (D)[-4,6]
4. 设A,B,C表示三角形的三条边,表示条件:”任意两边之和大于第三边”的布尔表达式可以用( 19 )表示
19(A)A+B=C OR A+C=B OR B+C=A
(B)A+B=C OR A+C=B OR B+C=A
(C)A+BC OR A+CB OR B+CA
(D)A+BC AND A+CB AND B+CA
5.在过程定义的以下叙述中,不正确的是( 20 );
20(A)如果不指明参数传送方式,则将按引用方式将实参传送给形参
(B)如果不指明参数传送方式,则将按传值方式将实参传送给形参
(C)如果指明传值方式,则在调用该过程时,不会引起实参的值改变
(D)如果指明引用方式,则在调用该过程时,可能引起实参的值改变
6.若要使窗体启动时处于最大化状态,可设置( 21 )属性。
21(A)StartUpPosition (B)WindowState
( C)Caption (D)AutoRedraw
7.命令按钮标题热字的下划线,可通过( 22 )符号来设置。
22(A)\ (B)\ (C)_ (D)
8.当鼠标在窗体上移动时,会触发那种鼠标事件( 23 )。
23(A)MouseMove (B)MouseUp
(C)MouseDown (D)Click
9.下面关于窗体事件叙述不正确的是( 24 )。
24(A)通过代码调整窗体的大小,会触发一个Resize事件
(B)用鼠标单击窗体会产生一个Click事件
(C)每当一个窗体变成活动窗体时,就会产生一个LOAD事件
(D)调用Show方法与设置窗体Visible属性为True具有相同的效果
10. 如想存放如下数据,其中,最为恰当的数组定义方式为:( 25 ).
5 6# 7.2e3
11.9 8.1d-1 10000
25(A)Dim Arrb(2,3)as integer
(B)Dim Arrb(2,3)
(C)Dim Arrb!(-4To-3,2 To 4)
(D)Dim Arrb(-5To-4,-1To 1) as double
二、程序阅读(每个选择3分,共45分)
1.如下程序
Private Sub Commandl_ Click()
Dim a As Integer,b As Integer,c As Integer
a=2:b=0:c=0
For i=1 T0 3
Print f (a,b,c)*2
Next
End Sub
Function f (a As Integer,b As Integer,ByVal c As Integer)
b=b+1:c=c+l:f=a+b+c
End Function
(1) 程序的执行结果是( 26 )
26(A)2 2 2 (B)8 12 16 (C)8 10 12 (D)10 14 18
(2)如果将过程定义中ByVal c As Integer改为c As Integer,程序的执行结果是
( 27 )。
27(A)2 2 2 (B)8 12 16(C)8 10 12 (D)10 14 18
2.Option Explict
Private Sub Commandl_CliCk()
Dim inp
文档评论(0)