- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
2007年秋季vb考试真题
2007 年秋季vb 考试真题
21.下列语句中,正确的是__________
A .Textl .SetFocus B.Forml .Clear C .Labell .SetFocus D.Listl .Cls
22 .创建一个名为“文件”的菜单项,欲使其可用Alt+F 方式访问,则在菜单编辑器的标题
文本框中应输入_________ 。
A .文件($F) B .文件(F) C .文件(#F) D .文件( %F)
23 .数学表达式的VB 算术表达式为_______ 。
A .Sin(27)+Sqr(X+Exp3) /(X+Y)
B .Sin(27*3.14159 /180)+Sqr(X+Exp(3)) /Abs(X+y)
C .Sin(27*3.14159 /180)+Sqr(X+e^3) /Abs(X+Y)
D .Sin(27*pi /180)+Sqr(X+Exp(3) /Abs(X+Y)
24 .以下说法不正确的是____________ 。
A .使用不带关键字Preserve 的ReDim 语句可以重新定义数组的维数
B .使用不带关键字Preserve 的ReDim 语句可以改变数组各维的上、下界
c .使用不带关键字Preserve 的ReDim 语句可以改变数组的数据类型
D .使用不带关键字Preserve 的ReDim 语句可以对数组中的所有元素进行初始化
25 .下列____________是合法的变量名。
A .abs B .-al C .cdc d D .Abe_10
26 .要向文件datal.txt 添加数据,正确的文件打开命令是_____________ 。
A .Open ”datal .txt ”For Output As #1
B .Open ”datal.txt ”For Input As #1
C .Open ”datal.txt ”For Append As #5
D .Open “datal .txt “For Write As #5
27 .以下对数组参数的说明中,错误的是___________ 。
A .在过程中可以用Dim 语句对形参数组进行声明
B .形参数组只能按地址传递
c .实参为动态数组时,可用ReDim 语句改变对应形参数组的维界
D .只需把要传递的数组名作为实参,即可调用过程
28 .设a=3 ,b=2 ,c=1 ,运行print abc 的结果是____________ 。
A .True B .False C .1 D.出错
29 .下列选项中,所包含的所有表达式能够将两位整数x 的个位数与十位数对调(如将78 转
换为87)的是_______________ 。
①Val(Right(X ,1)Left(X,1))
②Val(Right(Str(X) ,1)&Left(Str(X) ,1))
③Val(Right(CStr(X) ,1)&Left(CStr(X) ,1))
④Val(Mid(X ,2 ,1)+Mid(X,1,1))
A .①② B .②③ c .②④ D .①③④
30 .下列______是正确的VB 常量。
A .D-6 B .E-6 C .5D D .5E-6
二、填空题(请将答案填写在答题纸的相应答题号内,每个答案只占一行)
1.执行下面程序,单击Commandl,则窗体上显示的第一行是 (1) ,第二行是
(3) ,第三行是(3) 。
Option Explicit
Private Sub Commandl—Click()
Dim a As String ,i As Integer
Dim X As String ,z As String
a=’’iamstudent’’
i=InStr(5 ,a ,”d ”)
Do
x=Mid(a ,i ,3)
z=Right(X ,1)
z=UCase(x &Z)
i=i-2
Print z
您可能关注的文档
- 0454 2011上海大众途安原厂维修手册带电路图8.pdf
- 05 leveling pull.pdf
- 08 modeling design objects in cad system for service-product engineering.pdf
- 1,6sigma dmaic project 项目案例 1.pdf
- 14年新人教版四年级上册六~九数学教案.doc
- 15年阳泉市直事业单位真题及答案.pdf
- 1997-2004考研英语一阅读试题.pdf
- 1997_meta-analysis review of leader-member exchange theory_ correlates and construct issues.pdf
- 1营养师基础营养引言基本概述2015.pdf
- 2 中公教你18天考上政法干警pdf第二集.pdf
最近下载
- SJG 05-2020 基坑支护技术标准.docx VIP
- 综合实践劳动课教案.docx VIP
- 2023年高校教师资格证教育心理学.doc VIP
- 海书专升本刷题测试卷15.docx VIP
- 贵司专升本磨刀进阶营大学英语第一次模拟测试.docx VIP
- 统编版语文二年级上册第四单元、第五单元复习课教案(各一套).doc VIP
- 浅谈宽带电力载波与窄带电力载波在电力抄表中的利弊关系(行业资料).doc VIP
- 护理人员分层培训现状调查.docx VIP
- 2025至2030中国IPv6行业市场发展分析及行业前景预测报告.docx VIP
- 中国临床肿瘤学会(csco)胰腺癌诊疗指南2025.docx VIP
原创力文档


文档评论(0)