- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Vb等级考试模拟试题(一)
单选题
1、下面合法的常量是______。
A) 1/2 B) abcd C) 1.2*5 D) False
2、下面_____是不合法的整常数。
A.100 B.O100 C.H100 D.%100
3、设a=6,则执行IF IIF(a5,-1,0) THEN X=0 ELSE X=1后,x的值为______。
A) 5 B) 6 C) 0
4、表达式A%+B+C!-D#的结果为______。
A)整型 B)长整型 C)单精度型 D)双精度型
5、设 x=5,表达式 10=x=20 的值是______。
A) True B) False C) 0 D) 表达式非法
6、执行 PRINT 9.4\3.7,9.4 MOD 3.7 命令后,结果为______。
A) 2 1
B) 3 0
C) 2 20
D) 1 2
7、下面的__________语句可以实现:先在窗体上输出大写字母A,然后在同一行的第10列输出小写字母b。
A. Print A;Tab(9);b B. Print A;Spc(8);b
C. Print A;Space(10);b D. Print A;Tab(8);b
8、设a=4,b=3,c=2,d=1,则表达式IIf(ab,a,IIf(cd,c,d))的结果为______。
A) 4 B) 3 C) 2
9、表达式Int(5*Rnd+1)* Int(5*Rnd-1) 值的范围是______。
A)[0,15] B)[-1,15] C)[-4,15] D)[-5,15]
10、用Select Case语句选择|x|10情况的语句为:Case______。
A) Not (-10 To 10)
B) -10 To 10
C) Is -10, Is 10
D) Abs(x)10
11、若x=0,执行语句If x Then x = 0 Else x = 1的结果是______。
A) 实时错误 B) 编译错误 C) x=1 D) x=0
12、下列程序中 s = s + j 语句共执行了______次。
Dim s As Integer
Dim i As Integer, j As Integer
For i = 1 To 10 Step 2
For j = 1 To 5 Step 2
s = s + j
Next j
Next i
Print s
A. 10 B. 20 C. 25 D. 15
13、在Visual Basic应用程序中,以下描述正确的是______。
A) 过程的定义可以嵌套,但过程的调用不能嵌套
B) 过程的定义不可以嵌套,但过程的调用可以嵌套
C) 过程的定义和过程的调用均可以嵌套
D) 过程的定义和过程的调用均不可以嵌套
14、假定有如下的Sub过程:
Sub S(x As Single, y As Single)
t = x
x = t / y
y = t Mod y
End Sub
在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
a = 5: b = 4
S a, b
Print a, b
End Sub
程序运行时,单击命令按钮得到的结果是________。
A. 5 4 B. 1 1 C. 1.25 4 D. 1.25 1
15、下列程序输出结果为______。
Private Sub Command1_Click()
For i = 1 To 3
GetValue (i)
Next i
Print GetValue(i)
End Sub
Private Function GetValue(ByVal a As Integer)
dim S As Integer
S = S + a
GetValue = S
End Function
A)
您可能关注的文档
- 建筑室内空间区位使用调查表(需配合图1勾选).doc
- 1.文件管理控制ok.doc
- 序章:琉璃圆顶.doc
- 界别召集人会议讲话稿.doc
- 第32章天下唯有德者居之.docx
- 家庭农场的目标模式——适度规模经营.doc
- 顶岗实习报告模板.doc
- [工作]品质检验流程.doc
- 冬季养生保健之保健品相关知识.doc
- 粘度单位极其换算.doc
- 上海市宝山区2025-2026学年第一学期期末考试高三英语试卷(含答案).pdf
- 云南省普洱市镇沅县第一中学2025-2026学年高二上学期期中考试语文试题(含答案).pdf
- 天津市扶轮中学2025-2026学年高一上学期第一次月考英语试题(含答案).pdf
- 上海市杨浦区2026届高三一模英语试题(含答案).pdf
- 湖北省八校联考2025-2026学年高二上学期月考语文试题(含答案).pdf
- 山西省介休市第一中学校2025-2026学年高二上学期期中考试英语试卷(含答案,无听力原文及音频).pdf
- 江苏省无锡市梅村高级中学2025-2026学年高二上学期期中英语试题(含答案).pdf
- 山东省临沂市临沭县2025-2026学年九年级(上)期中化学试卷(含答案).pdf
- 山东省菏泽市2025-2026学年高二上学期期中考试英语(B)试卷(含答案,无听力原文及音频).pdf
- IPO审核耗时与首发股票市场表现.pdf
最近下载
- 第2章化学药物工艺路线的设计和选择研究报告.ppt
- 610821017856A03BG100河西联办煤矿隐蔽致灾因素普查报告修编7.19 (2)(1).docx VIP
- InSAR滑坡识别与监测.pptx VIP
- 政治经济学课件-社会主义市场经济体制.ppt VIP
- Unit 6 Useful numbers Part A(课件)人教PEP版(2024)英语三年级上册.pptx VIP
- 美卡素治疗高血压.ppt VIP
- 医院数据沙箱管理控制 .ppt VIP
- 青岛版科学六年级上册期末综合测试卷(含答案).pdf VIP
- 12YD18 太阳能光伏发电系统设计与安装.docx VIP
- 三维细胞培养技术的发展及其在干细胞和肿瘤细胞.PDF VIP
原创力文档


文档评论(0)