原创力文档- 1、本文档共13页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 5、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 6、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
天津工业大学2007～2008学年第2学期
高级语言程序设计（VB）试卷（A卷）
班级学号姓名
一、单项单选题（每空1分，共30分）
（请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分）
1．下面可以正确定义两个整型变量和一个字符串变量的语句是【D】。
A）Dimn,mAsInteger,sAsStringB）Dima%，b$,cAsString
C）DimaAsInteger,b,cAsStringD）Dimx%，yAsInteger,zAsString
2．数学表达式5≤x＜10，在VB中可以用逻辑表达式【D】表示。
A）5=x10B）5=xAnd10
C）5=xOrx10D）5=xAndx10
3．设a=2，b=3，c=4，则表达式Nota=cOr4*c=b^2Andba+c的值是【D】。
A）-1B）1C）TrueD）False
4．已知A$=123456，则表达式Val(Left(A,2)+Mid(A,2,3))的值是【C】。
A）246B）357C）12234D）12345
5．【C】函数能够从字符串VisualBasic中直接取出子字符串Basic。
A）LeftB）InstrC）RightD）String
6．下列表达式中不能判断x是否为偶数的是【D】。
A）x/2=Int(x/2)B）xMod2=0C）x/2=0D）x\2=0
7．在窗体上放置一个命令按钮，名称为Command1。并编写如下代码：
PrivateSubCommand1_Click()
x=Int(Rnd+5)
y=0
Ifx=0Theny=1
Ifx=1Theny=2
Ifx=3Theny=3
第1页共13页
Printy
EndSub
运行程序后，单击该命令按钮，则输出结果是【A】。
A）3B）2C）1D）0
8．语句Ifx=2Theny=1，下列说法正确的是【B】。
A）x=2和y=1均为赋值语句B）x=2为关系表达式，y=1为赋值语句
C）x=2和y=1均为关系表达式D）x=2为赋值语句，y=1为关系表达式
9．用下面语句定义的数组的元素个数是【D】。
OptionBase0
DimA(-1To3，2)AsInteger
A）12B）10C）8D）15
10．窗体上有一个命令按钮，名称为Command1，并编写如下代码：
PrivateSubCommand1_Click()
DimA
A=Array(1,2,3,4)
s=0
Fork
文档评论（0）