序号题干答案
1 VB是一种面向对象的程序设计语言。对
2 VB通过窗体管理构成应用程序的各类文件的集合。错
3 VB支持弹出菜单,所谓“弹出菜单”是指单击鼠标后打开的
菜单。
错
4 Visual Basic程序的运行,仅能从某一窗体启动,如Form1
窗体。
错
5 Visual Basic程序的运行可以从Main()过程启动,也可以从
某
个窗体启动。
对
6 Visual Basic提供的几种标准坐标系统的原点都是在绘图区
域
的左上角,如果要把坐标原点放在其它位置,则需使用自定
义
坐标系统。
对
7 单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件
任务.
错
8 Dim i, j as integer 表明i和j都是整型变量。错
9 Single 和Double型用于保存浮点数,在VB中定义单精度浮
点8位
,双浮点16位.
错
10 Visual_basic是合法的变量名。对
11 可以用"&","+"合并字符串,但是用在数值变量时,"+"可能
会
将两个数值加起来。
对
12 某一过程中的静态变量在过程结束后,静态变量及其值可以
在
其它过程中使用。
错
13 全局变量用global或public关键字声明,且仅在通用声明
处可
以定义。
错
14 如果某子程序add用public static sub add()定义,则该子
程
序的变量都是局部变量。
错
15
设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2*A>C
的值是False。
错
16 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来
定义.
错
17 在VB中,运算 "ABCDE123A" Like "[a*a] " 的结果是True。错
18 在VB中,运算 "D" Like "[! A-Z]" 的结果是True. 错
19 在VB中,运算"ABA"Like"[a?a]"的结果是False。对
20 MsgBox()函数建立的消息框能显示信息也能输入信息。错
21 MsgBox()函数建立的消息框能显示信息也能输入用户的信
息.
错
22 Picture图片框既可用来显示图片和绘制图形,也可用Print
方
法来显示文字.
错
23
在框架控件内的几个单选按钮中,可有一个或多个单选按钮
的Value属性为True。(正确答案:只有一个)
错
24 *.bmp格式的图片,如果在autosize设为False的图片框,
它会
以图片框大小完整显示出来。
错
25 “菜单编辑器”中至少要填“名称”和“标题”这两个框,
才
能正确完成菜单栏的设计。
错
26
ActiveX控件是扩展名为*.ocx的独立文件,使用时需用
“工程”/“部件”载入或移去。
对
27 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始
角、
终止角的大小相关,而且与起始角、终止角的正或负相关。
对
28 Frame控件是一种容器控件,因此它可有它自己的坐标系. 错
29 Function函数有参数传递,并且一定有返回值。错
30 Image控件不能用作容器使用。对
31 Image控件使用的资源比Picture控件使用的多. 错
32 Line(500,500) – (2500,2500) 命令能够正确画出矩形。错
33 List1.Clear是清除List1的全部列表项,所以Clear是对象
的方法。
对
34 move方法的一般形式是:对象名.move A,B[,C,D],其中A指
Left
,C 指width.
错
35 Shape控件和Line控件可以在窗体中移动,因此它们具有
Move方法。
错
36 Text与Label有许多共同特点,它们都能显示和输入文本。错
37 Variant是一种数据类型,因此只能存放象其它数据类型一
样,
无特殊值.(正确:有特殊值)
错
38 Variant是一种特殊的数据类型,Variant类型变量可以存储
除
了定长字符串数据及自定义类型外的所有系统定义类型的数
据。
Variant类型变量还可具有Empty、Error和Null等特殊值。
对
39 VB规定窗体文件的扩展名是 .vbp。错
40 VB若同一个工程有许多窗体,可以指定任一窗体为启动窗体。对
41 VB允许设计和使用用户自己设计的控件。对
42 VB允许用户使用Type语句在窗体模块的通用声明中自己定义
数
据类型。
对
43 标签控件可以用来让用户输入数据。错
44 标签没有Change事件和SetFocus方法。错
45 菜单中每一菜单项都是控件,可以通过点击菜单项或通过光
标选
择并按回车键,以触发Click事件。
对
46 除了标准控件外,还可引入其它控件及第三方厂商研制的控
件。
对
47 窗体的Enabled属性值为False时,该窗体上的按钮、文本框
等
控件就不会对用户的操作做出反应。
对
48 从几十个项目中任选其中一项或多项时可选用列表框或组合
框控
件实现.
错
49 单选钮控件和复选框控件都具有Value属性,它们的作用完
全相同。
错
50 当窗体的ScaleTop=0,ScaleLeft=0时,这个窗体Top和Left
值也是0.
错
51 当定时器控件的Interval属性值设置为0时,会连续不断地
激发错
Timer事件。
52 当需要在同一窗体中建立几组相互独立的单选钮时,就要用
框
架将每一组单选钮框起来。
对
53 当在一个简单组合框的文本框中输入一个它的列表框中的没
有
的条目时,组合框会自动将这一条目添加到它的列表框中。
错
54 定时将文本框中的数据保存到磁盘,应用于选用Timer计时
器控件。
对
55 对窗体Form内各控件不能用鼠标任意精确定位是由于窗体中
的
定位网格起作用.
对
56 对象的可见性用Enabled属性设置,可用性用Visible属性
设置。
错
57 对象的属性都可以在属性窗口中设置。错
58
对象是基本的运行实体,它既包括了数据(属性),也包括作
用于对象的操作(方法)和对象的响应动作(事件)。
对
59 对于文件系统控件,当驱动器控件Drive1中的驱动器符改变时,
文件夹列表控件Dir1中显示的文件夹也作相应改变,可以在
Drive1中的Change事件中使用如下命令:
Dir1.Path=Drive1.Drive。
对
60 方法是VB对象可以响应的用户操作。错
61 滚动条控件不可作为用户输入数据的方法。对
62 滚动条控件不可作为用户输入数据的一种方法. 错
63 滚动条控件可作为用户输入数据的一种方法. 错
64 计时器(Timer)控件的Interval属性的单位是毫秒,即若将
此
属性值设为10,则每0.01秒产生一次Timer事件。
对
65 计算机在处理数据时必须将其装入内存,在高级语言中通过
内
存单元名来访问其中的数据,命名的内存单元就是常量或变
量.
对
66 将焦点主动设置到指定的控件或窗体上,应采用Setfocus方法。
对
67 可以利用键盘光标选择菜单项,因此可响应KeyPress事件. 错
68 控件是对象,而窗体不是对象,它只是控件对象的窗口。错
69 框架控件和形状控件都不能响应用户的鼠标的单击事件。错
70 利用Private Const 声明的符号常量,在代码中不可以再赋值。
对
71 列表框包含了组合框的功能。错
72 列表框的中的项目不可以多列显示。错
73 每个对象都有一系列预先定义好的对象事件,但要使对象能
响
应具体的事件,则编写该对象相应的事件过程。
对
74 面向对象程序设计是一种以对象为基础,由事件驱动对象执
行的设计方法。
对
75 命令 Picture1.Circle(500,800),800 能够在图片框
Picture1
中画出的图形是圆心在 (500,800)的一个圆。
对
76 目录列表框中的列表项不可以通过AddItem方法进行添加。对
77 清除Combo1对象的内容是Combo1.Clear。对
78 清除list1列表框对象的内容的语句是list1.cls。错
79 如果一个菜单项的Visible属性为False,则它的子菜单也不
会显示。
对
80 如果一个列表框一共有5个选项,而当选中第三项时,这时列
表
框的ListIndex属性为2.
对
81 若要新建一个磁盘上的顺序文件,可用output,append方式
打
开文件。
对
82 若已在窗体中加入了一个通用对话框:要求在运行时,通过ShowOpen打开对话框时,只显示扩展名为 DOC 的文件,则
对通用对话框的 Filter的属性设置应该是:"(*.DOC)|
( .DOC)"。
错
83 三种方式的组合框都可以接受DblClick 事件。对
84 菜单设计中的每一个菜单项分别是一个控件,每个控件都有
自己的名字。
对
85 时钟控件的属性Interval值为0时,表示屏蔽计时器。对
86 使用驱动器列表框、目录列表框和文件列表框构成一个文件
管
理系统时,三者之间可以实现自动同步,即当在驱动器列表
框
改变驱动器时,目录列表框和文件列表框的内容立即同跟着
变。
错
87 事件过程由某个用户事件或系统事件触发执行,它不能被其
它
过程调用.
错
88 事件过程与Sub过程,它们相同点都是事件驱动,而不同的只
是
事件过程由控件属性决定,而Sub过程是由户自定义.
对
89 所有的对象都有caption属性。错
90 所有的控件在程序运行以后都是可见的。错
91 通过改变属性窗口中的Name属性,可以改变窗体上显示的标题。
错
92 通用对话框只能用SHOW方法进行调用。错
93 同一Form窗体中的各控件可以相互重叠,其显示的上下层次
的
次序不可以调整.
错
94 图片框的Move方法不仅可以移动图片框,而且还可以改变该
图
片框的大小,同时也会改变该图片框有关属性的值.
错
95 图片框的Move方法不仅可以移动图片框,而且还可以改变该
图片
框的大小,同时也会改变该图片框有关属性的值.
错
96
图片框的属性Enabled设置为FALSE,图片框上的控件仍可响
应用户操作。
错97
图象框中的Stretch属性为true时,其作用是图形自动调整
大小以适应图象控件。
对
98 文本框控件有Caption属性。错
99 文件按照数据编码方式可以分为ASCII码文件和二进制文件。对100 要使定时器控件起作用,其属性Interval不可以设置为0。对
101 移动框架内的控件时框架内的控件也跟随移动,所以框架内
各控
件的Left和Top属性值也将分别随之改变.
错
102 已知窗的fillcolor=rgb(255,0,0)
红,forecolor=rgb(0,255,0)
绿,fillstyle=0(solid)语句circle(200,100),500,,,,2的
输出
结果是红边绿心的长椭圆.
错
103 用Cls方法能清除窗体或图片框图中用Picture属性设置的
图形.
错
104 用dim语句声明的局部变量能保存上一次过程调用后的值. 错
105 用VB 6.0仅能开发具有窗口菜单的应用程序,开发的应用中
不
能支持弹出式菜单.
错
106
用鼠标选中某菜单控件时,触发Click事件;而用键盘选中该
菜单控件时,触发KeyPress事件.
错
107 由Visual Basic语言编写的应用程序有解释和编译两种执行
方式.
对
108 由变量名对变量的内容进行使用或修改,则使用变量就是引
用
变量的内容.
对
109 有的对象属性既可在属性窗口中设定又可在程序代码中设
定。
对
110 有一个程序在属性窗口中设置了它的窗体字体大小为10号,
而
程序代码若设置了它的窗体字体大小为20号,那么当程序运
行
后实际的窗体字体大小为20号。
对
111 欲在PictureBox控件上设置其它控件,可以通过把窗体上原
已
设计好的控件拖动到PictureBox控件上来实现.
错
112 在MsgBox 函数中 prompt 参数是必须的. 对113 在Sub过程中,可以用Return语句退出Sub过程。对
114 在VB 6.0中,如果要使窗体上的多个控件具有相同的尺寸,
在
选择了这些控件之后,应执行VB"格式"菜单中的命令。
对
115 在VB 6.0中,如果要增加工具箱中的控件,应执行VB"文件"
菜
单中的命令。
错
116 在VB5 中,文件菜单的"删除工程"的作用是将当前VB工程在
硬
盘中删除掉.
错
117 在VB6.0中命令按钮不仅响应Click事件,而且响应DbClick
事件.
错
118 在VB的工具栏中包括了所有的VB控件,我们不能再加载其
他的
控件。
错
119 在VB中,函数Fix(-3.6)的返回值是–4。错
120 在VB中,计时器(Timer)定期激活Timer事件,使Timer中
的
代码执行一次。
对
121 在VB中,可通过函数 Now返回计算机系统的日期和时间. 对
122 在VB中,可以将在Picture控件中绘制的图形以文件的形式
保存
在磁盘上.
对
123 在VB中,用DIM定义数组时数组元素也自动赋初值为0. 错
124 在VB中将一些通用的过程和函数编写好并封装作为方法供用
户
直接调用.
对
125 在VB中通用对话框的Filename属性返回的是一个输入或选
取的文
件名字符串.
错
126
在Visual Basic 中Dim a ,b,c as integer和
Dim a as integer, b as integer,c as integer相同。
错
127 在标准模块的声明部分中用Publice声明的变量的有效范围
是对
其所在的工程。
128 在表达式中,运算符两端的数据类型要求一致. 对
129 在程序中Name属性是作为对象的标识而引用,不会显示在窗
体
上,而控件上显示的内容由Caption属性决定.
错
130 在窗体模块的声明部分中用Private声明的变量的有效范围
是其
所在的工程。
错
131 在多文档应用中,每次只能有一个活动的子窗体可以进行输
入/编辑。
对
132 在过程中用Dim和Static定义的变量都是局部变量. 对
133 在框架控件内的几个单选按钮中,只能有一个单选按钮的
Value
属性为True。
对
134 在框架控件上放置的控件可以移动到框架控件的外面. 错
135 在利用通用对话框件显示字体对话框之前必须设置Flags属
性,
否则将发生不存在字体的错误.
对
136 在命令按钮的Click事件过程中,exit与end等效. 错
137 在盘驱动器列表框Drive1的Change事件过程中,代码
Dir1.Path=Drive1.Drive 的作用是:当Drive1的驱动器
改变
时,Dir1的目录列表随不同驱动器的作相应改变.
对
138 在图片框中放置的控件既可以在该图片框内移动,也可以移
出
该图片框外.
错
139 在一个窗体的代码中不能使用Unload语句来卸载本窗体,即
一个
窗体只能由其它窗体卸载.
错
140 直线控件可以在窗体上拖动,因此它具有MOVE方法。错
141 只要用拖拽的方法,将工具箱中所需的控件拖到窗体上即可
完成.
错
142 属性是用来描述和反映对象特征的参数,不同的对象具有各
自
不同的属性,对象的所有属性都可以在属性窗口中设置.
错
143 组合框包含了列表框的功能. 对
144 组合框兼有文本框和列表框两者的功能,用户可以通过键入
文
本或选择列表中的项目来进行选择。
对
145 过程中的静态变量是局部变量,当过程再次被执行时,静态
变量
的初值是上一次过程调用后的值。
对
146 函数过程(Function Procedure)用来完成特定的功能,但不
返
回相应的结果。
错
147 如果没有使用Public、Private或者Friend,Sub过程在缺省
情况
下是公用的、
错
148 如果在过程调用时使用按地址传递参数,则在被调过程中不
可
以改变实参的值。
错
149 如果在过程调用时使用按值传递参数,则在被调过程中可以
改
变实参的值。
错
150 多文档界面是指在一个父窗口下面可以同时打开多个子窗
口。
子窗口归属于父窗口,,当父窗口关闭时,所有子窗口全部关闭。
对
1.在多文档应用中,每次只能有一个活动的子窗体可以进行输入/编辑. 答案:Y 第11题文本框控件中将Text的内容全部显示为所定义的字符的属性项是(). A:PasswordChar B:需要编程来实现C:Password D:以上都不是答案:A
第12题下面()控件不具有Caption属性.
A:标签框B:单选钮C:命令按钮D:文本框答案:D
第2题三种方式的组合框都可以接受DblClick 事件. 答案:Y
第20题在多文档应用中,每次只能有一个活动的子窗体可以进行输入/编辑. 答案:Y
一、判断共10题(共计10分)
第1题Shape控件和Line控件可以在窗体中移动,因此它们具有Move方法. 答案:N
第2题Visual Basic程序的运行可以从Main()过程启动,也可以从某个窗体启动. 答案:Y 第3题图片框的属性Enabled设置为FALSE, 图片框上的控件仍可响应用户操作. 答案:N 第4题若已在窗体中加入了一个通用对话框:要求在运行时,通过ShowOpen打开对话框时,只显示扩展名为DOC 的文件,则对通用对话框的Filter的属性设置应该是:" (*.DOC)| ( .DOC)" . N
第5题设计菜单中每一个菜单项分别是一个控件,每个控件都有自己的名字. 答案:Y
第6题清除list1列表框对象的内容的语句是list1.cls. 答案:N
第7题图片框的Move方法不仅可以移动图片框,而且还可以改变该图片框的大小,同时也会改变该图片框有关属性的值. 答案:N
第8题当窗体的ScaleTop=0,ScaleLeft=0时,这个窗体Top和Left值也是0. 答案:N
第9题框架控件和形状控件都不能响应用户的鼠标的单击事件. 答案:Y
第10题通用对话框只能用SHOW方法进行调用. 答案:N
二、单项选择共10题(共计10分)
第1题用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见.
A:Hide B:Checked C:Visible D:Enabled 答案:C
第2题定时器的Interval属性以()为单位指定Timer事件之间的时间间隔.
A:分B:秒C:毫秒D:微秒答案:C
第3题要在图片框P1中打印字符串" HowAreYou" ,应使用语句().
A:Picture1.Print=" HowAreYou" B:P1.Picture=LoadPicture(" HowAreYou" )
C:P1.Print" HowAreYou" D:Print" HowAreYou" 答案:C
第4题下列关于设置控件属性的叙述正确的是().
A:用户必须设置属性值B:所有的属性值都可以由用户随意设定
C:属性值不必一一重新设置D:不同控件的属性项都完全一样答案:C
第5题启动VisualBasic后,系统为用户新建的工程起一个名为()的临时名称.
A:工程1 B:窗体1 C:工程D:窗体答案:A
第6题设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是().
A:True B:False C:1 D:出错信息答案:B
第7题MSGBOX函数中有4个参数,其中必须写明的参数是().
A:指定对话框中显示按钮的数目B:设置对话框标题C:提示信息D:所有参数都是可选的C
第8题应用程序设计完成后,应将程序保存,保存的过程是().
A:只保存窗体文件即可B:只保存工程文件即可C:先保存工程文件,之后保存窗体文件
D:先保存窗体文件(或标准模块文件),之后还要保存工程文件答案:D
第9题改变控件在窗体中的左右位置应修改该控件的()属性.
A:Top B:Left C:Width D:Right 答案:B
第10题VB认为下面()组变量是同一个变量.
A:A1和a1 B:SUM和SUMMARY C:A VER和A VERAGE D:A1和A_1 答案:A 三、程序填空共3题(共计30分)
第1题'【程序填空】
'功能:以下程序的功能如(图1)。
'-------------------------------------------------------
Private Sub Form_Click()
Dim a%, b%, c%, d!
Dim x1, x2
Dim p, q, r
a = InputBox(" 请输入a的值" )
b = InputBox(" 请输入b的值" )
c = InputBox(" 请输入c的值" )
d = b * b - 4 * a * c
p = -b / (2 * a)
If d >= 0 Then
'**********SPACE**********
If 【?】Then
r = Sqr(d) / (2 * a)
x1 = p + r
x2 = p - r
Else
x1 = p
x2 = p
'**********SPACE**********
【?】
Print " x1=" ; x1, " x2=" ; x2
'**********SPACE**********
【?】
q = Sqr(-d) / (2 * a)
Print " x1=" ; p; " +" ; q; " i" , " x2=" ; p; " -" ; q; " i"
End If
End Sub
答案:1). d > 0 或0 < d 2). End If 3). Else
第2题'【程序填空】
'功能:完成程序,使程序输出值为15
'-------------------------------------------------------
Private Sub Command1_Click()
'**********SPACE**********
Dim i, j, x,【?】As Integer
For i = 1 To 4
x = 4
For j = 1 To 3
x = 3
'**********SPACE**********
For 【?】= 1 To 2
'**********SPACE**********
x = x + 【?】
Next k
Next j
Next i
Print x
End Sub
答案:1). k 2). k 3). 6
第3题'【程序填空】
'功能:用输入对话框输入x,根据如图公式计算对应的y,
' 在窗体上输出y的值。
'-------------------------------------------------------
Private Sub Command1_Click()
'**********SPACE**********
Dim x As Single, 【?】As Single
'**********SPACE**********
x = Val(【?】(" Please input x :" , " 输入X的值" ))
If x = 10 Then
'**********SPACE**********
【?】
ElseIf x > 10 Then
'**********SPACE**********
y = Sqr(x) 【?】
Else
y = 2 * x ^ 3 + 6
End If
Print y
End Sub
答案:1). y 2). InputBox 3). y = 0 4). + Sin(x)
四、程序改错共3题(共计30分)
第1题'【程序改错】
'题目:设窗体中有图片框Pic1,现要求在其中绘制10个同心圆,' 然后将此图以Test.BMP作文件名存入磁盘。
'------------------------------------------------
Option Explicit
Private Sub Command1_Click()
Dim X As Integer
Dim Y As Integer
Dim I As Integer
Dim rad(9) As Integer
X = Pic1.ScaleWidth / 2
Y = Pic1.ScaleHeight / 2
'**********FOUND**********
For I = 1 To 9
rad(I) = 500 * Rnd
Next I
I = 9
'**********FOUND**********
Do Until I < 1
Pic1.Circle (X, Y), rad(I), RGB(256 * Rnd, 256 * Rnd, 256 * Rnd) '**********FOUND**********
I = I + 1
Loop
SavePicture Pic1.Image, " Test.BMP"
End Sub
答案:1). for i=0 to 9 或for i=0 to 9 step 1
2). Do Until I < 0 或do until 0>i
3). I = I - 1 或i=-1+i
第2题'【程序改错】
'题目:从计算机输入三个数, 找出中间数
'------------------------------------------------
Option Explicit
Private Sub FindMidNum()
Dim x As Integer, y As Integer, z As Integer, A As Integer
x = InputBox(" PLEASE INPUT THE FIRST NUMBER" )
y = InputBox(" PLEASE INPUT THE SECOND NUMBER" )
z = InputBox(" PLESSE INPUT THE THIRD NUMBER" )
'**********FOUND**********
If x > y Then
A = x
x = y
y = A
End If
'**********FOUND**********
If y = z Then
Print y
'**********FOUND**********
ElseIf x = z Then
Print z
Else
Print x
End If
End Sub
Private Sub Form_Click()
FindMidNum
End Sub
答案:1). If x < y Then 或If y > x Then
2). If y >= z Then 或If z <= y Then
3). ElseIf x >= z Then 或ElseIf z <= x Then
第3题'【程序改错】
'题目:输出40以内能够被3整除的数,要求输出结果为5
' 个数一行。
'------------------------------------------------
Option Explicit
Private Sub Form_Click()
Cls
Dim x As Integer
Dim i As Integer
'**********FOUND**********
i = 1
For x = 1 To 40
If (x / 3) = (x \ 3) Then
'**********FOUND**********
Print x
i = i + 1
End If
'**********FOUND**********
If i Mod 3 = 0 Then
End If
Next x
End Sub
答案:1). i = 0 2). Print x; 3). if i mod 5=0 then
五、程序设计共2题(共计20分)
第1题'【程序设计】
'题目:编写函数fun其功能是:根据整型形参m,计算如下公式的值:y=1/5+1/6+1/7+1/8+1/9+1/10...+1/(m+5)例如:若m=9,则应输出:1.168229'要求:函数中用到的中间变量必须声明为Single类型。
'-------------------------------------------------
答案:----------------------
Dim y As Double
Dim i As Integer
For i = 0 To m
y = y + 1 / (i + 5)
Next
Fun = y
----------------------
第2题(10.0分)题号:488
'【程序设计】
'题目:(事件)单击窗体。(响应)已知sum=1/2!-1/4!+1/6!-1/8!+1/10!,请将sum结果值输出到窗体上。使用do while...loop语句完成程序
'----------------------------------------
答案:----------------------
Dim i As Integer
Dim n As Integer
i = 1
p = 1
Do While i <= 10
p = p * i
If i Mod 2 = 0 Then
n = n + 1
sum = sum + (-1) ^ (n - 1) / p
End If
i = i + 1
Loop
Print sum
----------------------
一、判断共10题(共计10分)
第1题所有的对象都有caption 属性. 答案:N
第2题事件过程由某个用户事件或系统事件触发执行,它不能被其它过程调用. 答案:N
第3题当定时器控件的interval属性值设置为0时,会连续不断地激发Timer事件.答案:N 第4题当需要在同一窗体中建立几组相互独立的单选钮时,就要用框架将每一组单选钮框起来.答案:Y
第5题在窗体模块的声明部分中用Private声明的变量的有效范围是其所在的工程. 答案:N 第6题Visual Basic程序的运行可以从Main()过程启动,也可以从某个窗体启动. 答案:Y
第7题VB允许设计和使用用户自己设计的控件. 答案:Y
第8题在VB中,可以将在Picture控件中绘制的图形以文件的形式保存在磁盘上. 答案:Y 第9题Function函数有参数传递,并且一定有返回值. 答案:N
第10题在VB的工具栏中包括了所有的VB控件,我们不能再加载其他的控件.答案:N
置顶
二、单项选择共10题(共计10分)
第1题代数式x1-|a|+ln10+sin(x2+2л)/cos(57o)对应的VisualBasic表达式是().
A:X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57*3.14/180)
B:X1-Abs(A)+Log(10)+Sin(X2+2*л)/Cos(57*3.14/180)
C:X1-Abs(A)+Log(10)+Sin(X2+2*3.14)/Cos(57)
D:X1-Abs(A)+Log(10)+Sin(X2+2*л)/Cos(57) 答案:A
第2题设计动画通常使用时钟控件()来控制动画速度.
A:Enabled B:Interval C:Timer D:Move 答案:B
第3题要把一个命令按钮设置成无效,应设置其哪一属性值().
A:Visible B:Enabled C:Default D:Cancel 答案:B
第4题设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是().
A:True B:False C:1 D:出错信息答案:B
第5题任何控件都具有的属性是().
A:TEXT B:CAPTION C:NAME D:FORECOLOR 答案:C
第6题当事件能被触发时,()就会对该事件作出响应.
A:对象B:程序C:控件D:窗体答案:A
第7题下列叙述正确的是().
A:对象是包含数据又包含对象数据进行操作的方法的物理实体
B:对象的属性只能在属性窗口中设置
C:不同的对象能识别不同的事件
D:事件过程都要由用户点击对象来触发答案:C
第8题下列关于设置控件属性的叙述正确的是().
A:用户必须设置属性值B:所有的属性值都可以由用户随意设定
C:属性值不必一一重新设置D:不同控件的属性项都完全一样答案:C
第9题表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是().
A:4^5 B:3*4 C:x+1 D:SIN 答案:C
第10题一个对象可以执行的动作和可被对象识别的动作分别称为().
A:事件、方法B:方法、事件C:属性、方法D:过程、事件答案:A
三、程序填空共3题(共计30分)
第1题'【程序填空】
'下面过程max()用于求3个数中最大值,利用这个过程求5个数中最大值。'-------------------------------------------------------
Private Sub Form_Click()
Print " 5个数34、124、68、73、352的最大值是:"
max1 = max(34, 124, 68)
'**********SPACE**********
max1 =【?】
Print max1
End Sub
Public Function max(ByVal a%, ByVal b%, ByVal c%)
'**********SPACE**********
If 【?】Then
m = a
Else
m = b
End If
'**********SPACE**********
If 【?】Then
max = m
Else
max = c
End If
End Function
答案:1). max(max1, 73, 352) 2). a>b 或b c 或 c < m
第2题'【程序填空】
'功能:输入数字1-7,显示其对应是星期几(例:输入1,显示星期日,
' 如果输入其它内容,一律显示" 输入错误" )
'-------------------------------------------------------
Private Sub Command1_Click()
dim x as integer
dim y as string
x=val(text1.text)
'**********SPACE**********
【?】
case 1
y=" 今天是星期日"
case 2
y=" 星期一"
case 3
y=" 星期二"
case 4
y= " 星期三"
case 5
y=" 星期四"
case 6
'**********SPACE**********
【?】
case 7
y= " 星期六"
'**********SPACE**********
【?】
y = " 输入错误"
end select
Text2.Text = y
End Sub
答案:1). select case x 2). y=" 星期五" 3). Case Else 第3题'【程序填空】
'功能:以下程序段用于求∑n!
'------------------------------------------------------- Private Sub Form_Click()
Dim sum As Integer, n As Integer
n = InputBox(" 请输入一个正整数" )
sum = 0
For i = 1 To n
'**********SPACE**********
sum =【?】
Next i
Print sum
End Sub
Private Function mul(ByVal x As Integer)
Dim s As Integer, i As Integer
s = 1
'**********SPACE**********
For i = 1 To 【?】
s = s * i
Next i
'**********SPACE**********
【?】
End Function
答案:1). sum + mul(i) 2). x 3). mul = s
四、程序改错共3题(共计30分)
第1题'【程序改错】
'题目:输出40以内能够被3整除的数,要求输出结果为5个数一行。'------------------------------------------------
Option Explicit
Private Sub Form_Click()
Cls
Dim x As Integer
Dim i As Integer
'**********FOUND**********
i = 1
For x = 1 To 40
If (x / 3) = (x \ 3) Then
'**********FOUND**********
Print x
i = i + 1
End If
If i Mod 5 = 0 Then
End If
'**********FOUND**********
step i
End Sub
答案:1). i = 0 2). Print x ; 或? x ; 3). Next x 或Next
第2题'【程序改错】
'题目:程序功能为求解一元二次方程的实根,请修正程序中错误。
'------------------------------------------------
Option Explicit
Private Sub Form_Load()
Dim a!, b!, c!, root1#, root2#, work As Double
a = Val(InputBox(" 请输入系数a的值" ))
b = Val(InputBox(" 请输入系数b的值" ))
c = Val(InputBox(" 请输入系数c的值" ))
'**********FOUND**********
work = b * 2 - 4 * a * c
If work >= 0 And a <> 0 Then
'**********FOUND**********
root1 = (Sqr(work)) / (2 * a)
'**********FOUND**********
root2 = (Sqr(work)) / (2 * a)
Debug.Print " 有二个实根" + Str$(root1) + " ," + Str$(root2)
Else
Debug.Print " 无实根!"
End If
End Sub
答案:1). work = b ^ 2 - 4 * a * c 或work = b *b - 4 * a * c
2). root1 = (-b + Sqr(work)) / (2 * a) 或root1 = ( Sqr(work) -b ) / (2 * a) 或root1 = (-b + Sqr(work)) / ( a*2)
3). root2 = (-b - Sqr(work)) / (2 * a) 或root2 = (- Sqr(work) - b) / (2 * a) 或root2 = (-b - Sqr(work)) / ( a*2)
第3题'【程序改错】
'题目:本程序求3~100之间的所有素数(质数)并统计个数;同时将这些素数从小到大依次写入顺序文件c:\dataout.txt;素数的个数显示在窗体Form1上。
'------------------------------------------------
Option Explicit
Private Sub Command1_Click()
Dim Count As Integer, Flag As Boolean
Dim t1 As Integer, t2 As Integer
'**********FOUND**********
Open " dataout.txt" For Input As #1
Count = 0
For t1 = 3 To 100
Flag = True
For t2 = 2 To Int(Sqr(t1))
If t1 Mod t2 = 0 Then Flag = False
Next t2
'**********FOUND**********
If Flag = False Then
Count = Count + 1
'**********FOUND**********
Write #1, t2
End If
Next t1
Form1.Print " 素数个数" ; Count
Close #1
End Sub
1). Open " dataout.txt" For Output As #1 或Open " dataout.txt" For Output As 1
2). If Flag Then 或If Flag=true Then
3). Write #1, t1 或Write 1, t1
五、程序设计共2题(共计20分)
第1题'【程序设计】
判断题: 1、VB中,每一种对象有着不同的属性设置,每一种对象能识别的事件也不同。(对) 2、Val(“123hello”) 和Val(“hello123”)返回值一样。(错) 3、赋值语句X=123+”123”和X=”123”+123中,X的值一样。(对) 4、赋值语句X=”123”+”123”和X=”123”+123中,X的值一样。(错) 5、执行Print 5*8 和Print “5*8 ”语句运行结果一样。(错) 6、标签框和文本框内容的最大区别就是在程序运行过程中标签框的内容不可编辑,而文本框的内容可编辑。(对) 7、用vb编写程序时,标签控件能代替文本框控件使用. (错) 8、VB程序代码中,Label1.Caption=””的作用是该标签框中得内容清除。(对) 9、变量名的长度最长可达1024个字符。(错)225个 10、sum和int.sum都可以作为VB的变量名。(错) 11、下列程序的运行结果是15 (对) Dim s as Double Dim i as Integer S=0 I=1 Do While i<=5 I=i+2 S=s+i Loop Label1.Caption=s 12、对于熟练的程序员,可以省略程序的调试过程。(错) 13、在VB中,使用if语句就可以根据条件改变程序的执行路径。(对) 14、VB编程的一般步骤应该是:分析问题——设计界面——编写代码——调试与运行程序。(对) 单项选择题 1、小明想用VB设计一个加法器程序,做了如下规划,下列说法错误的是。(D) A、程序运行时标题栏显示加法器 B、前两个标签框显示的内容分别为“+”和“=” C、Command1用来计算出结果 D、使用了三个命令按钮、两个标签框和三个文本框 2、从下面的对象属性可以看出,该对象的标题为(A)
2016年计算机二级《VB》基础练习题及答案(2) 1[简答题]在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性,满足如下要求: ①Text2可以显示多行文本,并且有垂直和水平两个滚动条; ②程序运行时在Textl中显示输入的字符为“*”。 程序运行后的窗体如图所示。 注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjtl.vbp,窗体文件名保存为sjtl.frm。 参考解析: 【考点分析】本题考点有:窗体的Caption属性,文本框的Name、Width、Hei【ght、PasswordChar、Text、MuhiLine、ScrollBars属性。 【解题思路】文本框控件的MuhiLine属性用于设置文本框是否显示多行文本,值为Tr ue表示是,值为False则表示否。ScrollBars属性设置文本框是否有水平或垂直滚动条,它有0、l、2和3这4个值,0表示没有滚动条(默认值),1表示只有水平滚动条,2表示只有垂直滚动条,3表示有水平和垂直滚动条。文本框的PasswordChar属性常用于设置用某字符(如“*”)屏蔽用户在文本框中键入的内容,常用于口令输入。 【操作步骤】 步骤1:新建一个窗体,按照题目要求建立文本框控件并设置其属性,程序中涉及的控件及属性见表3.8和表3.9。
步骤2:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】由于ScrollBars属性的设置值较多,易混乱,请考生牢记4个值分别设置的文本框滚动条属性。 2[单选题]在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。 A.外模式 B.内模式 C.概念模式 D.逻辑模式 参考答案:B 参考解析:数据库系统的三级模式是概念模式、外模式和内模式。概念模式是数据库系统中全局数据逻辑结构的描述,是全体用户公共数据视图。外模式也称子模式或用户模式,它是用户的数据视图,给出了每个用户的局部数据描述。内模式又称物理模式,它给出了数据库物理存储结构与物理存取方法,所以选择B。 3[单选题]以下关系表达式中,其值为True的是()。 A.1f.XYZ”>”XYz” B.”VisualBasic”<>”visualbasic” C.P the-.=’’there·t D.”Integer”<”Int” 参考答案:B 参考解析:用关系运算符比较两个操作敷时,如果两个操作数是字符型的,按字符的A SCIl码从左到右一一比较,即先比较第1个,若相同再比较第2个,依次比较,直到比较
VB测验选择题真题精选
————————————————————————————————作者:————————————————————————————————日期:
VB考试真题精选,考前必备神器20 开通黄钻 21, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( b )。(1分) A、Sub plus(sum, a , b ): sum = a + b: End Sub B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub D、 D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub 22、通过关键字( c )声明的局部变量,在整个程序运行中一直存在。(1分) A、Dim B、Public C、Static D、Private 23、过程的作用域分为( c )。(1分) A、窗体级和局部级 B、模块级和局部级 C、窗体/模块级和全局级 D、窗体/模块级和局部级 24、在窗体的通用段声明变量时,不能使用( d )关键字。(1分) A、Dim B、Public C、Private D、Static 25、能在一个工程的所有程序中使用的变量,称为( b )。(1分) A、局部变量 B、全局变量 C、窗体级变量 D、模块级变量 27、使用Public Const语句声明一个全局的符号常量时,应该将该语句放在( b )。(1分)
序号题干答案 1 VB是一种面向对象的程序设计语言。对 2 VB通过窗体管理构成应用程序的各类文件的集合。错 3 VB支持弹出菜单,所谓“弹出菜单”是指单击鼠标后打开的 菜单。 错 4 Visual Basic程序的运行,仅能从某一窗体启动,如Form1 窗体。 错 5 Visual Basic程序的运行可以从Main()过程启动,也可以从 某 个窗体启动。 对 6 Visual Basic提供的几种标准坐标系统的原点都是在绘图区 域 的左上角,如果要把坐标原点放在其它位置,则需使用自定 义 坐标系统。 对 7 单击并拖拽工具箱中所需的控件到窗体上即可完成添加控件 任务. 错 8 Dim i, j as integer 表明i和j都是整型变量。错 9 Single 和Double型用于保存浮点数,在VB中定义单精度浮 点8位 ,双浮点16位. 错 10 Visual_basic是合法的变量名。对 11 可以用"&","+"合并字符串,但是用在数值变量时,"+"可能 会 将两个数值加起来。 对 12 某一过程中的静态变量在过程结束后,静态变量及其值可以 在 其它过程中使用。 错 13 全局变量用global或public关键字声明,且仅在通用声明 处可 以定义。 错 14 如果某子程序add用public static sub add()定义,则该子 程 序的变量都是局部变量。 错
15 设A=3,B=4,C=5,D=6,则表达式A>B And C<=D Or 2*A>C 的值是False。 错 16 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来 定义. 错 17 在VB中,运算 "ABCDE123A" Like "[a*a] " 的结果是True。错 18 在VB中,运算 "D" Like "[! A-Z]" 的结果是True. 错 19 在VB中,运算"ABA"Like"[a?a]"的结果是False。对 20 MsgBox()函数建立的消息框能显示信息也能输入信息。错 21 MsgBox()函数建立的消息框能显示信息也能输入用户的信 息. 错 22 Picture图片框既可用来显示图片和绘制图形,也可用Print 方 法来显示文字. 错 23 在框架控件内的几个单选按钮中,可有一个或多个单选按钮 的Value属性为True。(正确答案:只有一个) 错 24 *.bmp格式的图片,如果在autosize设为False的图片框, 它会 以图片框大小完整显示出来。 错 25 “菜单编辑器”中至少要填“名称”和“标题”这两个框, 才 能正确完成菜单栏的设计。 错 26 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 “工程”/“部件”载入或移去。 对 27 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始 角、 终止角的大小相关,而且与起始角、终止角的正或负相关。 对 28 Frame控件是一种容器控件,因此它可有它自己的坐标系. 错 29 Function函数有参数传递,并且一定有返回值。错 30 Image控件不能用作容器使用。对 31 Image控件使用的资源比Picture控件使用的多. 错 32 Line(500,500) – (2500,2500) 命令能够正确画出矩形。错 33 List1.Clear是清除List1的全部列表项,所以Clear是对象 的方法。 对 34 move方法的一般形式是:对象名.move A,B[,C,D],其中A指 Left ,C 指width. 错
第一部分 1 在窗体上添加一个命令按钮(名称为Cmd1,标题为"输出平均值")。程序运行后,单击命令按钮完成以下工作: ①随机产生20个0到1000的整数,将其放入一个一维数组中 ②求出所有元素的平均值,并显示在窗体上(如下图所示) Private Sub Cmd1_Click() Dim a%(19), i%, sum!, aver! Randomize For i = 0 To 19 a(i) = Int(Rnd * 1001) sum = sum + a(i) Next i aver = sum / 20 Print aver End Sub 2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为"转换"的命令按钮,如下图所示。在程序运行时,单击"转换"按钮,可以把Text1中的小写字母转换为大写,把大写字母转换为小写,其他字符不变。 Private Sub C1_Click() Dim ch As String, ch1 As String, i% ch = Text1 For i = 1 To Len(ch) If Asc(Mid(ch, i, 1)) >= 65 And Asc(Mid(ch, i, 1)) <= 90 Then ch1 = ch1 + LCase(Mid(ch, i, 1)) Else
ch1 = ch1 + UCase(Mid(ch, i, 1)) End If Next i Text1 = Text1 + vbCrLf Text1 = Text1 + ch1 End Sub 3 在窗体上添加一个命令按钮(名称为MyCmd1,标题为"输出最大值")。程序运行后,单击命令按钮完成以下工作: ①随机产生30个0~1000的整数,将其放入一个一维数组中 ②求出其中的最大值,并显示在窗体上。 Private Sub MyCmd1_Click() Dim a%(29), i%, max% Randomize For i = 0 To 29 a(i) = Int(Rnd * 1001) Next i max = a(0) For i = 1 To 29 If a(i) > max Then max = a(i) Next i Print max End Sub 4 请设计如下图所示窗体界面。程序运行时,在选中一个或两个复选框和一个单选按钮时,单击命令按钮,则对文本框中的文本内容做相应的设置。请编写适当的事件过程,完成上述功能。
1、下列叙述中,错误的是( A )。(1分) A、一条语句可以分为多行书写,但要在上行末加上VBCrLf B、在同一行上书写多条语句,应在两两语句中加上:号 C、可以用Rem或'注释单行语句 D、VB程序代码不区分字母的大小写 2、下列叙述正确的是( D )。(1分) A、Visual Basic的事件是由用户定义的 B、Visual Basic程序从主窗体开始执行 C、Visual Basic程序是过程驱动的 D、保存一个Visual Basic程序,应分别保存其窗体模块、标准模块和工程文件 3、被对象所识别的动作与对象可执行的动作分别称为对象的( A )。(1分) A、方法、事件 B、事件、方法 C、事件、属性 D、过程、属性 4、下列关于VB编码规则的叙述中,正确的是( C )。(1分) A、一条语句可以分为多行书写 B、多条语句不能书写在同一行上 C、每条语句以分号;结尾 D、应用程序代码字母是区分大小写的 5、( D )不属于面向对象系统的三要素。(1分) A、事件 B、属性 C、方法 D、变量 6、下列叙述中,不正确的叙述是( C )。(1分) A、注释语句是非执行语句,仅对程序的有关内容起注释作用,客观存在不被解释和编译 B、注释语句能放在整个代码程序的最后 C、注释语句可以放在代码中的任何位置 D、代码中加入注释语句的目的是提高程序的可读性 7、下列叙述错误的是( B )。(1分) A、不允许使用行号与标号 B、单条语句可分行书写 C、同一行上可以书写多条语句 D、VB代码不区分字母的大小写 8、窗体设计器是用来设计( B )。(1分) A、应用程序的代码段 B、应用程序的界面 C、对象的属性 D、对象的事件 9、启动Visual Basic后,系统为用户新建的工程起一个名为( A )的临时名称。(1分) A、工程1 B、窗体1 C、工程 D、窗体 10、在界面设计时,双击窗体中的对象后,Visual Basic将显示的窗口是( C )。(1分) A、立即窗口 B、属性窗口 C、代码窗口 D、工程资源管理器窗口 11、VB应用程序在( A )模式下不能编辑代码和设计界面。(1分) A、运行 B、中断 C、设计 D、以上均不能 12、如果要向工具箱中加入控件的部件,可以利用“工程”菜单中的( B )命令(1分) A、引用 B、部件 C、工程属性 D、加窗体 13、如果Visual Basic环境中缺少某个窗口,一般应该从主菜单的( D )下拉菜单中寻找并打开。(1分) A、编辑 B、文件 C、调试 D、视图 14、标准控件不包括( D )控件。(1分) A、驱动器列表框 B、目录列表框 C、文件列表框 D、通用对话框 15、在设计窗体时,如果窗体上没有显示网格会感到不方便,( c )可以使网格出现。(1分) A、使用“编辑”菜单上的相关命令 B、使用“格式”菜单上的相关命令 C、使用“工具”菜单上的相关命令 D、使用“工程”菜单上的相关命令 16、在Visual Basic中,某一事件对应的程序叫( b )。(1分)
套号题号题目选项A 选项B 答案 01 01 01 01 01 01 01 01 01 02 03 04 05 06 07 08 每当一个窗体成为活动窗口时将触发Show事件。对 对 对 对 对 对 对 错 错 错 错 错 错 错 B B B A B A A Integer、Long、Single、Double是数值类型数据,但Byte不是。 在打开某窗体时,初始化窗体中的各控件,应选用Load事件。 若行If语句中逻辑表达式值为True,则关键字Then后的若干语句都要执行。 函数过程与Sub过程必须用关键字Private或Public声明。 标签控件可以响应Click事件。 屏幕(Screen)对象可作为窗体的容器,但它只能提供缺省的坐标系统,即坐标刻度不能改变 用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体” 的错误。 运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。 对 对 对 错 错 错 A B A 01 01 09 10 将组合框的Style属性设置为0时,组合框称为“下拉式组合框”,其选项可以从下拉列表框 的列表项中选择,也可以由用户输入。 窗体启动位置可在“窗体布局窗口”中直接设置。 02 02 02 02 02 02 02 02 01 02 03 04 05 06 07 08 对 对 对 对 对 对 对 错 错 错 错 错 错 错 A A B B A A B 在所有的数据类型中,Byte型占用的内存空间最小,只要用一个字节。 表达式5>4>3的计算结果是True。 在行If语句中,关键字End If是必不可少的。 用Function过程在过程中必须被赋值。 单击组合框中的任一表项,该表项的文本就会替换这一组合框控件的Text属性值。 QBcolor函数的参数是一个介于0~255的整数。 用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体” 的错误。 运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。 对错 A 02 02 03 03 03 03 09 10 01 02 03 04 对 对 对 对 对 错 错 错 错 错 B A A A B 当对DrawWidth进行设置后,将影响Line、Circle、Pset方法,但不会影响Line、Shape控件。 在VB中,对象是代码和数据的集合。 Boolean类型数据,可以用来保存逻辑值True和False。 如果B是一个字节型变量,那么B可以用来保存数值-1。 如果在定义过程时,一个形式参数使用地址传递方式说明,则调用过程时与之对应的实参只能 按地址方式传递。 在行If语句中,关键字End If可以缺省。 对错 A 03 03 03 03 03 05 06 07 08 09 对 对 对 对 错 错 错 错 B A B A 定时器控件只能响应Timer事件。 从几十个项目中任选其中一项或多项时可选用列表框或组合框控件来实现。 执行语句“C=Point(50,100)”,可将窗体坐标(50,100)处点的颜色值存入变量C。 在设计Windows应用程序时,用户可以使用系统本身提供的某些对话框,这些对话框可以直接 从系统调入而不必由用户用“自定义”的方式进行设计。 Print #语句的作用是将数据从文件中读出并显示在窗体上。 对错 A 03 04 04 04 04 04 04 04 04 04 04 05 05 05 05 05 05 05 05 10 01 02 03 04 05 06 07 08 09 10 01 02 03 04 05 06 07 08 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 对 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 错 B B B A A B B A B A B A B A B A B B 方法是VB预先定义的、只有用户可直接使用的过程。 整型变量A、B,如果A的值是1,B的值是256,那么变量B比变量A需要占用更多内存。 用语句Dim Str1 As String声明的变量Str1,可以保存由100万个字符组成的字符串数据。 块If结构中的Else子句是不可缺省的。 事件过程只能由系统调用,在程序中不能直接调用。 单选按钮与复选框对象的Value属性类型不同,单选按钮只能取值0或1。 列表框和文本框一样都具有Text属性。 执行语句“Form1.BackColor = &HFF&”可以将窗体的背景色设置为蓝色。 通过Open语句打开一个文件,操作完成后,必须用Close语句将其关闭。 在窗体上绘制CommonDialog控件时,控件的大小、位置可由用户自己加以设定。 在“工程资源管理器”,可以实现多窗体的所有操作。 由于Single型变量的取值范围比Long型变量大,所以Single型变量开销内存也比Long型多。 语句Const A=100是将A声明为一个常量。 块If结构中的Else子句可以缺省。 定义一个过程时,有几个形参,则在调用该过程时就必须提供几个实参。 列表框控件List1的最后一个表项为List1.List (List1.ListCount)。 移动框架时框架内控件也跟随移动,因此框架内控件的Left和Top属性值也随之改变。 通过设置影像框的Picture属性可改变影像框中显示的图片,若要清除图片也是通过设置 Picture属性来实现。 在消息框(MsgBox)中,“Prompt”(消息)是必选项,最大长度为64个字符。 对 对 错 错 A B 05 09
v b判断题
第一套 一、判断题 1:将组合框的Style属性设置为0时,组合框称为“下拉式组合框”,其选项可以从下拉列表框的列表项中选择,也可以由用户输入。对 2:运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。错 3:用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体”的错误。对 4:屏幕(Screen)对象可作为窗体的容器,但它只能提供缺省的坐标系统,即坐标刻度不能改变。对 5:标签控件可以响应Click事件。对 6:函数过程与Sub过程必须用关键字Private或Public声明。错 7:若行If语句中逻辑表达式值为True,则关键字Then后的若干语句都要执行。对 8:在打开某窗体时,初始化窗体中的各控件,可选用Load事件。对 9:Integer、Long、Single、Double是数值类型数据,但Byte不是。错 10:每当一个窗体成为活动窗口时将触发Show事件。错 第二套 一、判断题 1:当对DrawWidth进行设置后,将影响Line、Circle、Pset方法,但不会影响Line、Shape控件。对
2:运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。错 3:用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体”的错误。对 4:QBcolor函数的参数是一个介于0~255的整数。错 5:单击组合框中的任一表项,该表项的文本就会替换这一组合框控件的Text 属性值。对 6:函数过程必须用关键字Private声明。错 7:在行If语句中,关键字End If是必不可少的。错 8:表达式5>4>3的计算结果是True。错 9:在所有的数据类型中,Byte型占用的内存空间最小,只要用一个字节。 对 10:窗体启动位置可在“窗体布局窗口”中直接设置。对 一、判断题 1:Print #语句的作用是将数据从文件中读出并显示在窗体上。错 2:在设计Windows应用程序时,用户可以使用系统本身提供的某些对话框,这些对话框可以直接从系统调入而不必由用户用“自定义”的方式进行设计。 对 3:执行语句“C=Point(50,100)”,可将窗体坐标(50,100)处点的颜色值存入变量C。对 4:从几十个项目中任选其中一项或多项时可选用列表框或组合框控件来实现。错
单选题复习总结第二部分 1. 运行下列程序段后,其输出结果为_______。 For j=10 To 6 Step -1 k=j next j Print k;j A、5 5 B、5 6 C、6 5 D、6 6, C 2. 在Visual Basic中要在一行中书写多条语句,各语句之间使用_____符号来分隔。 A、: B、* C、_ D、@,A 3. 下面语句的功能是求两个数中的小数,不正确的是_______。 A、Min = IIf(x > y, y, x) B、If x < y Then Min = x Else Min = y C、If y <= x Then Min = y:Min = x D、If y <= x Then Min= y:If y> x Then Min= x,C 4. 以下叙述中错误的是______。 A、窗体的Hide方法和Unload方法的作用完全相同 B、若工程文件中有多个窗体,可以根据需要指定一个窗体为启动窗体 C、一个工程中只能有一个Sub Main过程 D、窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体 ,A 5.x=InputBox("输入数值","0","示例") 程序运行后,如果从键盘输入数值10并按回车键,下列叙述正确的是______。 A、变量X的值是数值10 B、在InputBox对话框标题栏中显示的是"示例" C、0是默认值 D、变量X的值是字符串"10",D 6.下列_____________组语句可实现将变量x、y互换。 A、x = y : y = x B、y = y+2*x : x = y-2*x : y =(y-x)/2 C、x =x+y : x=x-y : y = x-y D、y = y+2x : x = y-2x : y =(y-x)/2,B 7.假设Text1文本框中输入了学生的成绩,以A、B、C、D、E字符表示不同的等级,下列语句中________可用于判断输入数据是否正确。 A、If "A" <= Text1<= "E" Then MsgBox "输入正确" Else MsgBox "输入错误" B、If "A" <= Text1 Or Text1 <= "E" Then MsgBox "输入正确" Else MsgBox "输入错误" C、If A <= Text1 And Text1 <= E Then MsgBox "输入正确" Else MsgBox "输入错误" D、If "A" <= Text1 And Text1 <= "E" Then MsgBox "输入正确" Else MsgBox "输入错误",D 8.在使用 InputBox时,必须设置的参数是__________。 A、缺省 B、提示 C、标题 D、无,B 9. 以下叙述中正确的是_________。 A、窗体的Name属性指定窗体的名称,用来标识一个窗体 B、窗体的Name属性的值是显示在窗体标题栏中的文本 C、可以在运行期间改变对象的Name属性的值 D、对象的Name属性值可以为空,A 10. 设有变量声明:Dim TestDate As Date ,则为变量TestDate正确赋值的表达方式是____________。 A、TextDate=#1/1/2002# B、TestDate=#"1/1/2002"# C、TextDate=date("1/1/2002") D、TestDate=2002年1月1日,A 11. 在Visual Basic 中要将一个窗体装载到内存中进行预处理,但不显示,应该使用语句______ 。 A、show B、hide C、load D、unload,C 12. 假设Text1文本框中输入了学生的成绩,规定成绩范围在0~100,下列语句中_____________可用于判断输入数据是否正确。 A、If 0 <= Text1 <= 100 Then MsgBox "输入正确" Else MsgBox "输入错误" B、If 0 <= Text1 Or Text1 <= 100 Then MsgBox "输入正确" Else MsgBox "输入错误" C、If 0 <= Val(Text1) And Val(Text1) <= 100 Then MsgBox "输入正确" Else MsgBox "输入错误" D、If 0 <= Val(Text1) <= 100 Then MsgBox "输入正确" Else MsgBox "输入错误",C 13.下列数组声明语句中正确的是 A、Dim a【3,4】as integer B、Dim a(3,4) as integer C、Dim a(n,n) as integer D、Dim a(3 4) as integer,B 14. 要将3×3方阵中的数据存入a数组中(不能浪费空间),声明数组a的正确语句是
套号题号题目选项A选项B答案0101每当一个窗体成为活动窗口时将触发Show事件。对错B 0102Integer、Long、Single、Double是数值类型数据,但Byte不是。对错B 0103在打开某窗体时,初始化窗体中的各控件,应选用Load事件。对错B 0104若行If语句中逻辑表达式值为True,则关键字Then后的若干语句都要执行。对错A 0105函数过程与Sub过程必须用关键字Private或Public声明。对错B 0106 标签控件可以响应Click事件。对错A 0107屏幕(Screen)对象可作为窗体的容器,但它只能提供缺省的坐标系统,即坐标刻度不能改变。对错A 0108用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体” 的错误。 对错A 0109运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。对错B 0110 将组合框的Style属性设置为0时,组合框称为“下拉式组合框”,其选项可以从下拉列表框 的列表项中选择,也可以由用户输入。 对错A 0201窗体启动位置可在“窗体布局窗口”中直接设置。对错A 0202在所有的数据类型中,Byte型占用的内存空间最小,只要用一个字节。对错A 0203表达式5>4>3的计算结果是True。对错B 0204在行If语句中,关键字End If是必不可少的。对错B 0205用Function过程在过程中必须被赋值。对错A 0206 单击组合框中的任一表项,该表项的文本就会替换这一组合框控件的Text属性值。对错A 0207QBcolor函数的参数是一个介于0~255的整数。对错B 0208用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体” 的错误。 对错A 0209运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。对错B 0210当对DrawWidth进行设置后,将影响Line、Circle、Pset方法,但不会影响Line、Shape控件。对错A 0301在VB中,对象是代码和数据的集合。对错A 0302Boolean类型数据,可以用来保存逻辑值True和False。对错A 0303如果B是一个字节型变量,那么B可以用来保存数值-1。对错B 0304如果在定义过程时,一个形式参数使用地址传递方式说明,则调用过程时与之对应的实参只能 按地址方式传递。 对错A 0305在行If语句中,关键字End If可以缺省。对错B 0306定时器控件只能响应Timer事件。对错A 0307从几十个项目中任选其中一项或多项时可选用列表框或组合框控件来实现。对错B 0308执行语句“C=Point(50,100)”,可将窗体坐标(50,100)处点的颜色值存入变量C。对错A 0309在设计Windows应用程序时,用户可以使用系统本身提供的某些对话框,这些对话框可以直接 从系统调入而不必由用户用“自定义”的方式进行设计。 对错A 0310Print #语句的作用是将数据从文件中读出并显示在窗体上。对错B 0401方法是VB预先定义的、只有用户可直接使用的过程。对错B 0402整型变量A、B,如果A的值是1,B的值是256,那么变量B比变量A需要占用更多内存。对错B 0403用语句Dim Str1 As String声明的变量Str1,可以保存由100万个字符组成的字符串数据。对错A 0404块If结构中的Else子句是不可缺省的。对错A 0405事件过程只能由系统调用,在程序中不能直接调用。对错B 0406单选按钮与复选框对象的Value属性类型不同,单选按钮只能取值0或1。对错B 0407列表框和文本框一样都具有Text属性。对错A 0408执行语句“Form1.BackColor = &HFF&”可以将窗体的背景色设置为蓝色。对错B 0409通过Open语句打开一个文件,操作完成后,必须用Close语句将其关闭。对错A 0410在窗体上绘制CommonDialog控件时,控件的大小、位置可由用户自己加以设定。对错B 0501在“工程资源管理器”,可以实现多窗体的所有操作。对错A 0502由于Single型变量的取值范围比Long型变量大,所以Single型变量开销内存也比Long型多。对错B 0503语句Const A=100是将A声明为一个常量。对错A 0504块If结构中的Else子句可以缺省。对错B 0505定义一个过程时,有几个形参,则在调用该过程时就必须提供几个实参。对错A 0506 列表框控件List1的最后一个表项为List1.List (List1.ListCount)。对错B 0507 移动框架时框架内控件也跟随移动,因此框架内控件的Left和Top属性值也随之改变。对错B 0508通过设置影像框的Picture属性可改变影像框中显示的图片,若要清除图片也是通过设置 Picture属性来实现。 对错A 0509在消息框(MsgBox)中,“Prompt”(消息)是必选项,最大长度为64个字符。对错B
卷1 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中,最主要的两种对象是窗体 (form)和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序,用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中,修改窗体的高度(height)和宽度(width)属性值,可改变窗体的大小。 10、双击工具箱中的控件图标,可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中,如果缺省title参数,则使用工程1 作为消息框的标题。 12、设x=34.58,语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中,数值型变量的初值为0 ,Varant型变量的初值 为空,布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性,可在窗体上显示图片。 15、程序运行工程中,清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对
VB考试试题及答案
卷1 一、填空题 1、VB程序设计的主要特点是可视化设计和事 件编程。2、在VB中,最主要的两种对象是窗体 (form)和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序,用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中,修改窗体的高度(height)和宽度(width)属性值,可改变窗体的大小。 10、双击工具箱中的控件图标,可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中,如果缺省title参数,则使用工程1 作为消息框的标题。 12、设x=34.58,语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中,数值型变量的初值为0 ,Varant型变量的初值 为空,布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性,可在窗体上显示图片。 15、程序运行工程中,清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对
VB考试真题精选,考前必备神器20 ? 开通黄钻 21, a = 1: b = 2: plus S, a, b: Print S:不能使其输出结果为3的plus过程为( b )。(1分) A、Sub plus(sum, a , b ): sum = a + b: End Sub B、Sub plus(ByVal sum , a , b ): sum = a + b: End Sub C、Sub plus(sum , ByVal a, ByVal b ): sum = a + b: End Sub D、 D、Sub plus(sum , ByRef a , ByRef b ): sum = a + b: End Sub 22、通过关键字( c )声明的局部变量,在整个程序运行中一直存在。(1分) A、Dim B、Public C、Static D、Private 23、过程的作用域分为( c )。(1分) A、窗体级和局部级 B、模块级和局部级 C、窗体/模块级和全局级 D、窗体/模块级和局部级 24、在窗体的通用段声明变量时,不能使用( d )关键字。(1分) A、Dim B、Public C、Private D、Static 25、能在一个工程的所有程序中使用的变量,称为( b )。(1分) A、局部变量 B、全局变量 C、窗体级变量 D、模块级变量 27、使用Public Const语句声明一个全局的符号常量时,应该将该语句放在( b )。(1分)
A、过程中 B、窗体模块的通用声明段 C、标准模块的通用声明段 D、窗体模块或标准模块的通用声明段 28、在窗体中,用( d )语句声明的变量是静态变量。(1分) A、Dim Z As Integer B、Public Z As Integer C、Private Z As Integer D、Static Z As Integer 29、变量的可用范围习惯上称为( a )。(1分) A、作用域 B、过程段 C、局部变量 D、全局变量 30、在定义过程时,过程名后面括号中的标识符被称为( c )。(1分) A、属性 B、形参 C、实参 D、变量 31、下列说法中,正确的说法是( b )。(1分) A、在定义子过程时,应至少有一个形式参量 B、若形参名字的前面没有ByVal,则默认传值 C、只要使用了子过程,就一定会返回多个结果值 D、在函数过程体中,函数过程名至少被赋值一次 33、以下关于函数过程的叙述中,正确的是( a )。(1分) A、函数过程形参的类型与函数返回值的类型没有关系 B、在函数过程中,可以通过函数名返回一个值 C、当数组作为函数过程的参数时,只能以传值方式传递,不能以传址方式传递 D、如果不指明函数过程参数的类型,则该参数没有数据类型 34、关于Function过程与Sub过程两者的异同,下列叙述错误的是( c )。(1分) A、Function过程与Sub过程都必须有形参 B、Function过程与Sub过程都有各自的变量声明和各自的过程体
VB期末考试试题及答案 一、填空题 1、VB程序设计的主要特点是可视化设计和事件 编程。2、在VB中,最主要的两种对象是窗体 (form)和控件。 3、工程是构成应用程序文件的集合。 4、方法是VB提供的一种特殊子程序,用来完成一定的操作。 5、浮点类型数据包括单精度型和___双精度__数据。 6、事件是窗体或控件对象识别的__动作____。 7、可用窗体的__print_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____选中___或禁止状态(暗淡的)中的某一种。 9、在VB中,修改窗体的高度(height)和宽度(width)属性值,可改变窗体的大小。 10、双击工具箱中的控件图标,可在窗体的中央出现一个尺寸为缺省值的控件。 11、在MsgBox函数中,如果缺省title参数,则使用工程1 作为消息框的标题。 12、设x=34.58,语句Print Format(x,“000.0”)的输出结果是34.6 。 13、在VB 中,数值型变量的初值为0 ,Varant型变量的初值 为空,布尔型变量的初值为FALSE 。 14、设置窗体的picture 属性,可在窗体上显示图片。 15、程序运行工程中,清除MP图片框中的图片应使用语句cls 。 二、选择题 1、菜单控件只包括一个事件,即 C ,当用鼠标单击或键盘选中后按“回车”键时触发该事件,除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、 Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是 A 。 A、滚动框处于最右位置时,一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时,滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时,滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句Select * Form student 中的*表 示 B 。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中,不属于标签的属性是 C 。
第一套 一、判断题 1:将组合框的Style属性设置为0时,组合框称为“下拉式组合框”,其选项可以从下拉列表框的列表项中选择,也可以由用户输入。对 2:运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。错 3:用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体”的错误。对 4:屏幕(Screen)对象可作为窗体的容器,但它只能提供缺省的坐标系统,即坐标刻度不能改变。对 5:标签控件可以响应Click事件。对 6:函数过程与Sub过程必须用关键字Private或Public声明。错 7:若行If语句中逻辑表达式值为True,则关键字Then后的若干语句都要执行。对 8:在打开某窗体时,初始化窗体中的各控件,可选用Load事件。对 9:Integer、Long、Single、Double是数值类型数据,但Byte不是。错 10:每当一个窗体成为活动窗口时将触发Show事件。错 第二套 一、判断题 1:当对DrawWidth进行设置后,将影响Line、Circle、Pset方法,但不会影响Line、Shape 控件。对 2:运行时目录列表框的List属性可以用AddItem和RemoveItem两种方法来改变。错 3:用通用对话框控件显示“字体”对话框前,必须先设置Flags属性,否则将发生“不存在字体”的错误。对 4:QBcolor函数的参数是一个介于0~255的整数。错 5:单击组合框中的任一表项,该表项的文本就会替换这一组合框控件的Text属性值。对 6:函数过程必须用关键字Private声明。错 7:在行If语句中,关键字End If是必不可少的。错 8:表达式5>4>3的计算结果是True。错 9:在所有的数据类型中,Byte型占用的内存空间最小,只要用一个字节。对 10:窗体启动位置可在“窗体布局窗口”中直接设置。对 一、判断题 1:Print #语句的作用是将数据从文件中读出并显示在窗体上。错 2:在设计Windows应用程序时,用户可以使用系统本身提供的某些对话框,这些对话框可以直接从系统调入而不必由用户用“自定义”的方式进行设计。对3:执行语句“C=Point(50,100)”,可将窗体坐标(50,100)处点的颜色值存入变量C。对 4:从几十个项目中任选其中一项或多项时可选用列表框或组合框控件来实现。错5:定时器控件只能响应Timer事件。对 6:在行If语句中,关键字End If必不可少。 7:如果在定义过程时,一个形式参数使用地址传递方式说明,则调用过程时与之对应的实参只能按地址方式传递。对 8:如果B是一个字节型变量,那么B可以用来保存数值-1。错 9:Boolean类型数据,可以用来保存逻辑值True和False。对