- 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次笔试题VB04年10月
第一部分 软件技术基础(共15分)
一、是非判断题(每小题上分,共10分)
(判断下列各题是否正确,如正确,在客观答题纸上对应编号选A,否则选B)“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!(-4 to -3,2 to 4) (D)Dim ArrB(-5 to -4,-1 to 1) As Double
二、阅读分析程序(每个选择3分,共45分)
1. 阅读下面程序
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a = 2: b = 0: c = 0
For i = 1 To 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 + 1: f = a + b + c
End Function
(l)程序的执行结果是(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 Explicit
Private Sub Command1_Click()
Dim inp, out As String
Dim i As Integer
inp = 1234321
For i = 1 To 4
out = Left(inp, i) + Right(inp, i - 1)
Picture1.Print Tab(20 - i + 1); out
Next i
For i = 1 To 3
out = Left(inp, 4 - i) + Right(inp, 4 - i - 1)
Picture1.Print Ta
文档评论(0)