- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
VB程序设计试卷十
《VB程序设计》试卷十
学号____姓名____得分____
一、单选题(每小题1分,共10分)
1. 以下关于vb 语言的说法中,正确的是(1 )
a.vb 是一种面向过程的语言 b. vb 是一种面向对象语言
c. vb是一种低级语言
d. vb 是一种机器语言
2. 下列的逻辑表达式中不正确的是(2 )
a. A
b. Xyz p=
c. 12 AND 31
d. XY AND 1=2
3. vb 中的坐标系最小刻度为( 3 )
a. 缇
b. 象素
c. 厘米
d. 一个标准字符宽度
4.运行下面的程序:
CLS
LINE (100,100)-(200,50)
LINE - (150,150)
LINE -(100,100)
屏幕上显示的是( 4 ) .
a. 三条放射形直线
b. 四条放射形直线
c. 矩形
d. 三角形
5. 在中断状态下可以运行代码,也可以在运行状态中作为输出结果的窗口称为(5)
A.本地窗口 B. 立即窗口
C.观察窗口 D. 栈窗口
6.欲使标签的内容自动换行,必须设置属性(6)。
A.AutoSize B. Alignment C. left D.WordWrap
7. 当用户改变滚动条的value 属性时将激发滚动条的( 7 ) 事件
a. change
b. scroll
c. change 和scroll
d. gotfocus
8.vb 应用程序是分层管理的,其最高的层次为( 8 )
a. 工程
b. 类模块
c. 窗体
d. 过程
9.下列(9)是窗体的扩展名
a.frm
b.bas
c.cls
d.dll
10.能改变当前磁盘驱动器的是下列的哪个命令?(10)
A. ChDir
B. ChDrive
C.Close
D. CurDir$
二、判断题:(每小题1分,共10分)
1.MsgBox()函数建立的消息框能显示信息也能输入信息。(11 )
2.对象的属性或事件过程都可以重新设置或修改,但是“方法”的内容却是固定、不能修改的,而且是看不见的。(12)
3.在Visual Basic 中Dim a ,b,c as integer和Dim a as integer, b as integer,
c as integer相同。( 13)
4.当需要在同一窗体中建立几组相互独立的单选钮时,就要用框架将每一组单选钮框起来。( 14 )
5.ActiveX控件是扩展名为*.ocx的独立文件,使用时需用“工程”/“部件”载入或移去。
(15)
6.由变量名对变量的内容进行使用或修改,则使用变量就是引用变量的内容。( 16 ) 7.可以用“”,“+”合并字符串,但是用在变异变量时,“+”可能会将两个数值加起来。(17 )
8.在命令按钮的Click事件过程中,exit与end等效。(18 )
9.“菜单编辑器”中至少要填“名称”和“标题”这两个框,才能真确完成菜单栏的设计。( 19 )
10.所有的对象都有caption 属性。( 20 )
三、填空题(每空2分,共20分)
1.变量min表示___(21)_____类型的变量。
2.VB表达式log(x)+1/(1+exp(a*x-b))对应的数学表达式为______(22)______
3.X=2:Y=8:PRINT X+Y=10的结果是_______(23)_______________
4.如果:I=12:J=3:I=int(-8.6)+I\J+13/3 MOD 5,则I值是______(24)___________ 5.请写出满足以下条件的VB表达式:
若a,b,c是三角形的三边,判断是否为直角三角形______(25)____。
X为[100-200]之间的数,能被2整除,但不能被5整除___(26)_____。
6.Visual Basic 中的文本框中要使该框不允许多行输入,应设置(27)属性为false.
7.声明单精度常量PI代表3.14159 的语句为(28)。
8.Val(123.55ab456)的值是多少___(29)
9.Option Base 1的作用是确定数组的下界为(30)
四、程序阅读题:(每小题6分,共18分)
1.程序1:
Private Sub Form_Click()
Dim i As Integer ,j As Integer
Dim star As String
star=#
For i=1 To 6
For j=i To 6
Form1.Print star;
Next j
Form1.Print
Next i
End Sub
写出程序运行后,单击窗体后,Form1上输出结果为(31)。
2.程序2
Private Sub Form_Click()
Dim x As Str
文档评论(0)