- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
Visual Basic 6考试试卷1
Visual Basic 6.0考试试卷(A)
班级_____________ 姓名______________ 成绩___________
一、填空(40分,每个填空1分)
1.Visual Basic语言是在________语言的基础之上推出的。
2.启动中文Visual Basic的方法通常有________种。
3.工程文件的后缀是________,窗体文件的后缀是________,标准模块文件的后缀是_________,类模块文件的后缀是________。
4.对象属性的设置可以有两种方法,一种是_________,另一种是_________。
5.在VB中,属性是对象的________,方法是对象的_______。事件是对象的_______。
6.Int(-10/3)的值是________,Fix(-10/3)的值是________,12\5的值是_________,12 Mod 7的值是________。
7.产生三位正整数的式子是_________。从一个四位正整数(N)中获取个位数字的式子是________。
8.VB中变量、符号常量、自定义函数、对象、类和模块的名称以_______或_________开头,变量名称不可以超过_________个字符。一个汉字相当于_______个字符。
9.一行语句允许最多_______个字符, 一行中的多条语句之间必须用________分隔。
10.一行语句可以分多行书写,在续行的前一行末尾应加入_______。
11.Visual Basic中的数据类型可分为________和________两大类。
12.如果没有声明变量的数据类型,则该变量将被默认为是________类型。
13.Abs(-8.8)=_________,Asc(“Cde”)=________,Chr(68)= ________,Len(“A好4)=_______,Str$(-12)+Str$(12)= _______。
14.Val(“52”)+Val(“32abc”)= _______,Len(Space(8))=_______,String$(3,”中国”)=__________。
15.Left(“中华人民共和国,4)= ________,Right(“中华人民共和国,3)= _________,Mid(“中华人民共和国”,2,3)= _________,”ABC”567=_________。
16.3 * 2 = 6 Or 5 = 3的值是_________。
二、回答问题(10分)
1.表达式有几种?算术运算符包括哪些?它们的运算顺序是怎样的?
答:(4分)
2.将下列Visual Basic表达式转化为数学代数式。
(1)N1*x^2+2*N2*X+N3+15*Abs((6-3/2)+4)-20
(2)1-1/(1-(1/(1-1/X)))
答:(4分)
(1)
(2)
3.控件对象的Enabled属性和Visible属性有什么不同?
答:(2分)
(1)
(2)
三、分析程序运行结果(30分)
1.Private Sub Form_Load()
Show
If AB=ABC Then Print 1 Else Print 2
If 3 Mod 2=1 And Int(10/2)= 10/2 Then Print 1 Else Print 2
If 5 Mod 3=Int(7/2) Then Print 1 Else Print 2
End Sub
答:(3分)
2.写出程序中每一条语句的作用
Private Sub Form_Load()
Show
Dim FS As Integer
FS = InputBox(请输入成绩:)
If FS = 90 Then
Print 优!
ElseIf FS = 80 Then
Print 良!
ElseIf FS = 60 Then
Print 及格!
Else
Print 不及格!
End If
End Sub
答:(4分)
3.A=1:B=2:C=3
For I=0 To 4
X=A:A=B:B=C:C=X
Print A,B,C
Next I
答:(5分)
4.A=1:B=10:C=2
For I=A To B Step C
A=A+B:B=B+C:C=C+A
I=I+2
Print A,B,C
Next I
答:(3分)
5. Dim R As Single, L As Single, S As Si
文档评论(0)