VB练习题
1.项目文件的扩展名是（）
A． .vb B．.sln C..exe D．.vbproj
2.集成开发环境有两类窗口：浮动和固定，下面的（）窗口不是浮动窗口。
A．工具箱 B．属性 C.即时 D．窗体
3.要使窗体的标题为“演示实例”，应修改窗体的（）属性。
A．Caption B．Tip C．Item D．Text
4.在https://www.wendangku.net/doc/3f12519563.html,中，下面属于方法的是（）。
A.Focus
B.SelectedText
C.LostFocus
D.Keypress
5.一条语句要在下一行继续写，可用（）符号作为续行符。
A.+
B.-
C.空格和 _
D. ...
6.若要使命令按钮不可操作，要对（）属性进行设置。
A.Enabled
B.Visible
C.BackColor
D.Text
7.在https://www.wendangku.net/doc/3f12519563.html,集成环境中创建https://www.wendangku.net/doc/3f12519563.html,应用程序时，除了工具箱窗口、窗体窗口和属性窗口
外，必不可少的窗口是（）
A．窗体布局窗口 B．立即窗口
C．代码窗口 D．监视窗口
8.当运行程序时，系统自动执行启动窗体的（）事件过程
A．Load B．Click C．Unload D． GotFocus 9.当文本框的ScrollBars属性设置了非None值，却没有效果，原因是（）
A．文本框没有内容 B．文本框的MultiLine属性为False C．文本框的MultiLine属性为True D．文本框的Locked属性为True
10.若要使标签控件显示时不要覆盖窗体的背景图案，要对（）属性进行设置
A．BackColor B． BorderStyle C．ForeColor D． BackStyle 11.数据类型为Long的类型标识符为（）。
A．% B． & C．! D． #
12.下面（）是日期型常量。
A．“5/17/12” B．5/17/12
C．#5/17/12# D．(5/17/12)
13.下面的（）是合法的单精度型变量。
A.num!
B.sum%
C.char!
D.mm#
14.下面的（）是合法变量名。
A.X_yz
B.123abc
C.Integer
D.X-Y
15.Rnd函数不可能为下列的（）值。
A.0
B.1
C.0.1234
D.0.0005
16.图片框控件（PictureBox）是专门用于显示图片的控件，主要属性image用于设置显示
在控件上的图片，使用（）语句可以在程序中消除已装入的图片。
A.PictureBox控件名.image=””
B．PictureBox控件名.image=Nothing
C．PictureBox控件名.image=Image.FromFile(“”)
D．PictureBox控件名.image=Image.FromFile(Nothing)
17.表达式16/4-2^5*8/4 Mod 5\2的值为（）
A.14
B.4
C.20
D.2
18.表达式Len（“123程序设计ABC”）的值是（）
A.10
B.14
C.20
D.17
19.为了给x,y,z三个整型变量赋初值1，正确的赋值语句是（）。
A.x=1: y=1: z=1
B.x=1，y=1，z=1
C.x=y=z=1
D.xyz=1
20.已知a=12,b=20，复合赋值语句“a*=b+10”执行后，a变量中的值是()
A.50
B.250
C.30
D.360
21.关于语句If x=1 Then y=1，下列说法中正确的是。
A.x=1和y=1均为赋值语句
B.x=1和y=1均为关系表达式
C.x=1为关系表达式，y=1均为赋值语句
D.x=1为赋值语句，y=1为关系表达式
https://www.wendangku.net/doc/3f12519563.html,提供了结构化程序设计的三种基本结构，分别是（）。
A.递归结构、选择结构、循环结构
B.选择结构、过程结构、顺序结构
C.过程结构、输入/输出结构、转向结构
D. 顺序结构、选择结构、循环结构
23.Visual https://www.wendangku.net/doc/3f12519563.html,是一种集成开发环境，集成开发环境一般简称为（）
A. CLR
B.IDE
C. https://www.wendangku.net/doc/3f12519563.html,
D.XML
24.在https://www.wendangku.net/doc/3f12519563.html,中要把属性窗口打开，可以选择（）
A. 按F5键打开属性窗口
B. “解决方案资源管理器”窗口中的“属性”菜单项
C. “视图”菜单中的“属性窗口”或F4键
D . “编辑”菜单中的“属性窗口”
25.若要使命令按钮不可操作，要对（）属性进行设置。
A．Enabled B．Visible C．BackColor D．Text
26.要判断在文本框中是否按了Enter键，应在文本框的（）事件中进行判断。
A．Change B． KeyDown C．Click D． KeyPress
27.在https://www.wendangku.net/doc/3f12519563.html,中，下面属于方法的是（）。
A.Hide
B.SelectedText
C.LostFocus
D.Keypress
28.在一行内要写多条语句时，每个语句之间用（）符号分隔。
A. ，
B.：
C. 、
D. ；
29.要使窗体的标题为“演示实例”，应修改窗体的（）属性
A. Caption
B.Tip
C. Item
D.Text
30.表达式Num += 3代表的意思是（）
A. Num = 3
B. Num = Num +3
C. Num +3= Num
D. 3 = Num
https://www.wendangku.net/doc/3f12519563.html,代码是否区分大小写
A．不区分 B．区分
32.当创建一个名为“引例”的项目时，该项目的所有代码文件将保存在（）文件夹下。
A．My Documents B．https://www.wendangku.net/doc/3f12519563.html, C．引例 D．Windows
33.数据类型为String的类型标识符为（）。
A．% B． $ C．! D． #
34.下面的（）是不合法的整型常量。
A.123
B.&O144
C.&O18
D.&H5A
35.下面的（）是合法变量名。
A.My_Integer
B.123Integer
C.Integer
D. .My-Integer
36.Rnd函数产生值的范围是（）。
A.[0,1]
B. [0,1)
C. (0,1]
D. (0,1)
37.图片框控件（PictureBox）是专门用于显示图片的控件，主要属性image用于设置显示
在控件上的图片，使用（）语句可以在程序中装入已有的图片。
A.PictureBox控件名.image=“图片文件名”
B．PictureBox控件名.image=image.load(“图片文件名”)
C．PictureBox控件名.image=Image.FromFile(“图片文件名”)
D．PictureBox控件名.image=Image.LoadFile(“图片文件名”)
38.表达式28/4-2^5*8/4 MOD 5\2 的值为（）。
A．7 B．4 C．20 D．2
39.在使用 MsgBox时，必须设置的参数是_______。
A.按钮
B.无
C.标题
D.提示
40.下列各赋值语句，语法不正确的是（）。
A.iNum=15
B.x+y=5
C.slength=x+y
https://www.wendangku.net/doc/3f12519563.html,bel1.text="abc"
41.以下叙述中正确的是（）
A. 窗体的Name属性指定窗体的名称，用来标识一个窗体
B. 窗体的Name属性的值是显示在窗体标题栏中的文本
C. 可以在运行期间改变对象的Name属性的值
D. 对象的Name属性值可以为空
42.借助变量t，交换变量x和y值的语句哪个是正确的_______。
A. x=t
B. t=x
C. y=t
D. t=y
t=y y=t x=y y=x
y=t x=y x=t x=t
43.用来判断表达式的值是否与条件列表中的值相匹配的多路判断语句是（）
A.For
B.IF
C.Select Case
D. 以上都不是
44.结构化程序设计的三种基本结构，分别是（）。
A.递归结构、选择结构、循环结构
B.选择结构、过程结构、顺序结构
C.过程结构、输入/输出结构、转向结构
D. 顺序结构、选择结构、循环结构
45.计算如下分段函数
下面不正确的程序段是（）
A.If x>=1 Then f=Math.Sqrt(x+1)
B. If x>=1 Then f=Math.Sqrt(x+1)
f=x*x+3 If x<1 Then f=x*x+3
C. f=IIf(x>=1, Math.Sqrt(x+1), x*x+3)
D. If x<1 Then f=x*x+3 _
Else f=Math.Sqrt(x+1)
46.下面的程序段运行后，显示的结果是（）。
Dim x%
x=int(rnd)+3
Select Case x
Case 5
MsgBox（“优秀”）
Case 4
MsgBox（“良好”）
Case 3
MsgBox（“通过”）
Case Else
MsgBox（“不通过”）
End Select
A.优秀
B.良好
C.通过
D.不通过
47.在以下运算符中，优先级最低的运算符是_________
A. ^
B. ／
C.\
D. Mod
48.以下（）是正确的For...Next结构
A．For 1 To 10 Step
...
Next
B．For i=3 To -3 Step -3
...
Next i
C．For i To 10
...
Next i
D．For i=3 To 10 Step 3
...
Next j
49.下列循环体能正常结束的是（）。
A. i=100
Do While i>100
i=i Mod 100+1 Loop B. i=100
Do Until i>100
i=i Mod 100+1 Loop
C. i=100
Do
i=i Mod 100 Loop While i<100 D. i=100
Do
i=i Mod 100+1 Loop Until i>100
50.循环语句For K=3.5 TO 5.5 Step 0.5的循环次数是（）。
A．0 B．5 C．3 D．4 51.当在文本框输入“ABCD”四个字符时，窗体上显示是()
Sub TextBox1_KeyPress(……) Handles TextBox1.KeyPress
Label1.Text &= TextBox1.Text
End Sub
A．ABCD B．ABC C．AABABC D．A AB
ABC
ABCD 52.参考以下代码，正确的是（）
Dim k as integer =10
DO While k=0
k=k-1
Loop
A.循环语句执行10次
B. 是无限循环
C.循环体语句一次也不执行
D. 循环语句执行一次
https://www.wendangku.net/doc/3f12519563.html,中有数组dim a%(5)，其含义是
A.定义了一个整型数组，数组的元素个数是5个
B.定义了一个整型数组，数组的元素个数是6个
C.定义了一个长整型数组，数组的元素个数是5个
D.定义了一个长整型数组，数组的元素个数是6个
54.以下程序执行后，TextBox1.Text的结果为_______。
Dim n As Integer
Dim a(,) As String={{"a1","a2","a3"}，{"b1","b2","b3"}}
TextBox1.Text=””
For n=0 To 1
TextBox1.Text &= a（n, 1）
Next n
A.a2a3
B.a1a2
C. a2b2
D.a3a3
55.要分配存放12元素的整型数组，不符合要求的是（）
A.dim a%(12)
B. dim a%(1,5)
C. dim a%(2,3)
D. dim a%(1,1,2)
56.语句Dim A%(9，11)声明的数组A包含（）个数组元素
A. 120
B. 75
C. 60
D. 13
57.如下数组声明语句，（）是正确的。
A.Dim a(9) As Single={1,2,3,4,5,6,7,8,9,10}
B.Dim a() As Single={1,2,3,4,5,6,7,8,9,10}
C.Dim a() As Single={1,"a","bc",4,5,6,7,8,9,10}
D.Dim a(,) As Integer={1,"a",3,4,5,6,7,8,9,10}
58.要想从子过程调用后返回两个结果，下面子过程语句说明合法的是（）
A. sub f2(Byval n%,Byval m%)
B. sub f2(ByRef n%,Byval m%)
C. sub f2(ByRef n%,ByRef m%)
D. sub f2(Byval n%,ByRef m%)
59.下面说明合法的是______ 。
A.Function f1%（f1%）
B.Function f1%（ByVal n%）
C.Sub s1（Byval n%()）
D.Sub s1(n As Integer）as Integer
60.在窗体上画一个名称为Button1的命令按钮，再画两个名称分别为Label1、Label2的标
签，然后编写如下程序代码：
Dim X,Y As Integer
Private Sub Button1_Click(……) Handles Button1.Click
X = 5
Y = 3
Call proc(X, Y)
Label1.Text = X
Label2.Text = Y
End Sub
Sub proc(ByVal a As Integer, ByRef b As Integer)
a = a * a
b = b + b
End Sub
程序运行后，单击命令按钮，则两个标签中显示的内容分别是_______。
A. 形参a 采用值传递，其结果不会影响实参X
B. 形参a 采用值传递，其结果将会影响实参X
C. 形参a 采用地址传递，其结果不会影响实参X
D. 形参a 采用地址传递，其结果将会影响实参X
61. 复选框的CheckState 属性为_______时，表示复选框内有灰色的勾即不可选。
A.checked
B.Indeterminate
C. Unchecked
D.None
62. 如要实现菜单功能，应向菜单项的_________事件添加代码。
https://www.wendangku.net/doc/3f12519563.html,mand
B.Click
C.Popup
D.Select
63. 在下列关于菜单的说法中，错误的是（）
A.建立菜单分隔线的方法是在标题栏输入一个“-”（减号）
B.建立热键的方法是在热键字符前面加上一个“&”符号，显示时下面就有下划线
C.若菜单项的Option 值为True ，则菜单项左边显示一个标记“√”表示选中
D.若菜单项的Checked 值为True ，则菜单项左边显示一个标记“√”表示选中
1. 对象的属性是指__________________(1)________________________________。
2. 表示x 是5的倍数或是9的倍数的逻辑表达式为___________(2)______________。
3. 要使下列For 语句循环执行的20次，循环变量的初值应当是
For k=___(3)_____ to -5 Step -2
4. 隐藏窗体的方法是____(4)_________。
5. VB 中的变量按其作用域可分为全局变量、模块级变量、___(5)________和块级变量。
6. 下面程序段执行后，Label1对象显示为_______(6)_______
x=35:y=20
Label1.Text=”(“ & x & ”\” & y & “)*” & y & “=” & (x\y)*y
7.
8. 显示窗体的方法是____(2)_________。
9. 数学表达式d c ab
的VB 算术表达式为________（3）______ 。
10. 表示字符变量s 是字母字符（不区分大小写字母）的表达式为______（4）_____。
11. VB 中的变量按其作用域可分为全局变量、___(5)________、过程级变量和块级变量。
12. 下面程序段执行后，Label1对象显示为_______(6)_______
x=35:y=20
Label1.Text=”(“ & x & ”Mod ” & y & “)*” & y & “=” & (x Mod y)*y
13. 以下命令按钮的事件过程用于求n!，请填空。
Private Sub Button1_Click(…) Handles Button1.Click
Dim s%，n%, i%
n=Val(InputBox(“输入n”))
s= （7）
For i=1 to n
s= （8）
Next
Msgbox(“n!=” & s)
End Sub
14.编一程序计算一个班100个学生的平均成绩，学生成绩由20-100之间的随机整数生成，
然后统计高于平均成绩的人数，请填空。
Private Sub Button1_Click(…) Handles Button1.Click
Dim mark%(99)，aver!, overn%, i%
aver=0 : overn = 0
Randomize()
For i = 0 To 99
mark(i) = （9）
aver = aver + mark(i)
Next i
aver = aver / 100
For i = 0 To 99
If （10）Then overn = overn + 1
Next i
Msgbox（"平均分："& aver &"高于平均成绩的人数："& overn）
End Sub
三、程序阅读题（每题4分，共4X5=20分）
1.以下程序段运行后TextBox1中的结果为。
Dim a As Integer=0，j As Integer
For j=1 To 5 Step 2
a=a+j\5
Next j
TextBox1.Text=a
2.下面的程序段输出结果为。
Private Sub Button1_Click(…) Handles Button1.Click
Dim i As Integer, x As Integer
For i = 1 To 4
If i = 1 Then x = 0
x=x+1
Next i
Msgbox（x）
End Sub
3.下面程序的运行结果是___________
Private Sub Button1_Click(……) Handles Button1.Click
Dim x$, n%, a%
n = 20
Do While n <> 0
a = n Mod 8
n = n \ 8
x = a & x
Loop
MsgBox("x=" & x)
End Sub
程序运行后，单击命令按钮，标签输出结果为。
4.下面程序的运行后，Label1的结果是___________
Private Sub Button1_Click(……) Handles Button1.Click
Dim i%, j%,s%
Dim b(,)As Integer = {{1, 2, 3}, {4, 5, 6}, {7, 8, 9}}
label1.text = ""
For i = 1 To 3
s=0
For j = 1 To 3
s +=b(i,j)
Next j
Label1.Text &= s & vbCrLf
Next
End Sub
5.在窗体上画一个命令按钮和文本框，然后编写如下程序,程序运行后，单击命令按钮，文
本框显示的内容是。
Function Fun(ByVal x As Integer,ByVal y As Integer) As Integer
If x Fun=x Else Fun=y End If End Function Private Sub Button1_Click(…) Handles Button1.Click Dim a As Integer,b As Integer a=5：b=3 TextBox1.Text=Fun(a，b) End Sub 四、编程题（每题10分，共20分） 1.分别统计1～1000中，满足3的倍数、7的倍数的数各为多少？ 2.编写事件处理过程Button1_Click，判断TextBox1中的整数是否是闰年。结果在TextBox2 中显示。参考程序运行结果如下图。闰年的条件是符合下面两个条件之一： （1）能被4整除，但不能被100整除；（2）能被400整除。 Private Sub Button1_Click(……) Handles Button1.Click …. End Sub 参考答案 一、单项选择题（每题1分，共40分） BDADA BDBAC BCABC ADBAD CDACD BABCC BCAAB CBABB 二、填空题（每空2分，共2X10=20分） 对象的动作、行为 Show() (a+b)/(c*d) s>="a" And s<="z" Or s>="A"Ands<="Z" 或Ucase（s）>="A" And Ucase（s）<="Z" 或Lcase（s）>="a" And Lcase（s）<="z" 模块级变 (35 Mod 20)*20=300 1 s*i Int（Rnd*81+20） mark(i) > aver 三、程序阅读题（每题4分，共4X5=20分） 1 3 X=24 6 15 24 3 程序运行后，输出的结果是。 Private Sub Button1_Click(…) Handles Button1.Click Dim x%，y% x=12 y=14 Call F1(x,y) Msgbox（x &" "& y） End Sub Public Sub F1(Byval n As Integer, Byval m As Integer) n=n +1 m=m-1 End Sub 3. 12 14 1. _________________ GBK 字符集共有 C 汉字。 A 、6000 多 B 、10000 多 C 、20000 多 D 、30000 多 2. 美国标准信息交换码（ASCII 码）中，共有128个字符，包括___B_ 32个控制字符。 A 、52 B 、96 C 、116 D 、101 3. 在计算机中，西文字符最常用的编 码是 __C ―。 A 、原码 B 、反码 C 、ASCII 码 D 、补码 4?下列四个选项中，按照其 ASCII 码值从小到大排列的是 A Q A 、 数字、英文大写字母、英文小写字母 B 、 数字、英文小写字母、英文大写字母 C 、 英文大写字母、英文小写字母、数字 D 英文小写字母、英文大写字母、数字 5?下列字符中，其 ASCII 编码值最大的是__B ________ Q A 、9 B 、D C 、A D 、空格 6. 中文标点符号“。”在计算 机中存储时占用 —B_个字节。 A 、1 B 、2 C 、3 D 、4 7. GBK 是汉字内码 的一种扩充规范，下面叙述中错误的是 _B _ Q A. 它共有20000多个汉字 B. 、它使用双字节表示，字节的最高位均为 0 C. 、它与GB2312保持向下兼容 D 它不但有简体字，也有繁体字 &汉字从录入到打印，至少涉及三种编码，汉字输入码，字型码和 _D A 、BCD 码 B 、ASCII 码 C 、区位码 D 、机内码 9. 在下列汉字编码标准中，不支持繁体汉字的 是 _A Q 个可打印字符和 其原因不可能 A、GB2312 B、GBK C、BIG5 D、GB18030 10.在利用拼音输入汉字时，有时虽正确输入拼音码但却找不到所要的汉字, 是A ______ Q A 、计算机显示器的分辨率不支持该汉字的显示 B 、汉字显示程序不能正常工作 C 、操作系统当前所支持的汉字字符集不含该汉字 D 、汉字输入软件出错 11 ?将字符信息输入计算机的方法中，目前使用最普遍的是_A _ 。 A、键盘输入 B 、笔输入. C语音输入D、印刷体识别输入 12?汉字的键盘输入方案数以百计，能被用户广泛接受的编码方案应_C _ 。 A、必须易学易记 B可输入字数多 C.、易学易记，效率要高 D重码要少，效率要高 13. ________________ MP3音乐采用 C 编码方法。 A、MPEG-1层1 B、MPEG-1 层2 C 、MPEG-1 层3 D、MPEG-2audio 14.Windows操作系统中的“帮助”文件，为方便用户使用，提供了超文本功能，超文本采 用的信息组织形式为_C _______ 。 A 、线性结构 B 、层次结构 C 、网状结构 D 、顺序结构 15?使用计算机进行文本编辑与文本处理是常用的两种操作，下列不属于文本处理的是_ C_。 A.、文本检索 B 、字数统计 C文字输入 D 、文语转换 二、选择题 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 。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是 A 。 A、Caption B、Name C、Text D、Label 6、设置一个单选按钮(OptionButton)所代表选项的选中状态，应当在属性窗口中改变的属性是 D 。 A、Caption B、Name C、Text D、Value 7、允许在菜单项的左边设置打勾标记，下面哪种论述是正确的 D 。 A、在标题项中输入&，然后打勾 B、在索引项中打勾 C、在有效项中打勾 D、在复选项中打勾 8、当执行以下过程时，在窗体上将显示 A 。 Private Sub Command1_Click( ) Print "VB"; Print "Hello! "; Print "VB" End Sub A、 VBHello!VB B、 VB Hello!VB C、 VB D、 VB Hello! VB Hello! VB 9、语句Print "The answer is:";20/4-2的结果为 B 。 A、The answer is 20/4-2 B、The answer is 3 C、The answer is "20/4-2" D、非法语句 10、下列哪个控件是容器控件 B 。 A、Image B、Picture C、ComboBox D、FileListBox 11、若要将窗体从内存中卸载出去，其实现的方法是 D 。 12、以下选项中，不是 Visual Basic控件的是 A 。 A.窗体 B.定时器 C.单选框 D.命令按钮 13、双击窗体中的对象后，Visual Basic将显示的窗口是 A 。 A.代码窗口 B．工具箱 C．项目（工程）窗口 D．属性窗口 14、可决定窗体的左上角是否有控制菜单的属性是 A 。 15、设有如下语句： Strl＝InputBox（"输人"，""，"练习"） 从键盘上输人字符“示例”后，Strl的值是 D 。 A．“输入” B．“” C．“练习” D．“示例” 16、窗体Form1的Name属性是Frm1,它的单击事件过程名是 C 。 A. Form1_Click C. Frm1_Click D. Me_Click 17、窗体的hide属性的含义是 A 。 A.隐藏 B.展现 C.装入 D.卸载 18、若要设置定时器控件的定时时间，需设置的属性是 C 。 A．Enabled B．Value C．Interval D．Text 19、能够改变复选框中背景颜色的属性是 C 。 《程序设计语言VB》课程习题集 一、单选题 1. Visual Basic是一种面向（）的程序设计语言。 A. 用户 B. 事件 C. 程序 D. 对象 2.在Visual Basic6.0中规定工程文件的扩展名是（）。 A. vbp B. for C. frm D. bas 3. Visual Basic6.0中规定窗体文件的扩展名是（）。 A. for B. frm C. vbp D. bas 4.如何使一个标签或按钮控件在运行时不可用（）。 A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True 5.控件的字体可在属性窗口的（）属性中调整？ A. Font B. Color C. Text D. Caption 6.若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（）。 A. Value B. Cancel C. Default D. Enabled 7.在VB中，记录对象数据的是（）。 A. 方法 B. 事件 C. 属性 8.在文本框上显示文本的属性是（）。 A. Value B. Text C. Print D. Enabled 9. InputBox函数返回值的类型为（）。 A. 字符串 B. 数值 C. 变体 D. 数值或字符串（视输入的数据而定） 10.设有语句：a = InputBox("请输入数值:","输入示例", "100") 程序执行后,若从键盘上输入数值20并按回车键,则变量a的值是（）。 A. 字符串"20" B. 字符串"120" C. 默认值100 D. 数值120 11.下列控件中可用于接受用户输入文本，又可用于显示文本的是（）。 A. Label控件 B. TextBox控件 C. Timer控件 D. CommandButton控件 12.语句PRINT "25*4"的输出结果是（）。 A. 25*4 B. "100" C. 100 D. 出现错误信息 13.只能用来显示字符信息的控件是（）。 A. 文本框 B. 标签框 C. 图片框 D. 图像框 14.下列可作为Visual Basic变量名的是（）。 A. A%A B. 4A C. ?xy D. Stemp 15.下列哪个符号不能作为VB中的变量名（）。 A. timefly 第1题（1.0分）题号:227 表达式1 and 0的值【1】.答案：1). False 第2题（1.0分）题号:222 把整数0赋给一个逻辑型变量,则逻辑变量的值为【1】. 答案：1). False 第3题（1.0分）题号:60 a 和b 中有仅只有一个为1,相应的Visual Basic逻辑表达式为【1】. 答案：1). a=1 xor b=1 第5题（1.0分）题号:244 设x为一个两位数,将x个位数和十位数交换后所得两位数VB的表达式是【1】. 答案：1). (x mod 10) * 10 + int(x/10) 第7题（1.0分）题号:226 表达式32\7 MOD 3^2 的值是【1】. 答案：1). 4 第8题（1.0分）题号:288 文件按照存取方式及其组成结构可以分为顺序文件和【1】. 答案1). 随机文件或随机 第9题（1.0分）题号:319 Option Base 1的作用是确定数组的下界为【1】. 答案：1). 1 第1题（1.0分）题号:236 所有的VB 的变量,都有隐含说明字符和强调声明两种方法来定义. 答案：N 第2题（1.0分）题号:246 ActiveX控件是扩展名为*.ocx的独立文件,使用时需用 "工程"/"部件"载入或移去. 答案：Y 第3题（1.0分）题号:289 框架控件和形状控件都不能响应用户的鼠标的单击事件. 答案：Y 第4题（1.0分）题号:350 在窗体模块的声明部分中用Private声明的变量的有效范围是其 所在的工程. 答案：N 第5题（1.0分）题号:354 在框架控件上放置的控件可以移动到框架控件的外面. 答案：N 第6题（1.0分）题号:231 可以用"&","+"合并字符串,但是用在变异变量时,"+"可能会将两个数值加起来.答案：Y 第8题（1.0分）题号:247 Circle方法绘制扇形或圆弧图形时,图形的形状不仅与起始角、终止角的大小相关,而且与起始角、终止角的正或负相关.答案：Y 第9题（1.0分）题号:330 有一个程序在属性窗口中设置了它的窗体字体大小为10号,而程序代码若设置了它的窗体字体大小为20号,那么当程序运行后实际的窗体字体大小为20号.答案：Y 第10题（1.0分）题号:225 Visual Basic程序的运行可以从Main()过程启动,也可以从某 个窗体启动. 答案：Y 第1题（1.0分）题号:319 能够改变窗体边框线类型的属性是(). A:FontStyleB:BorderStyleC:BackStyleD:Bord er 答案：B 第2题（1.0分）题号:822 以下()对象不具有Clear方法. A:列表框B:组合框C:剪贴板D:图片框 答案：D 第3题（1.0分）题号:258 常量-0.00013579的科学计数法是(). A:-1,3579E+0.4B:.00013579C:-13.579E-5D:-1.3579E-0.4 答案：C 第4题（1.0分）题号:230 vb 应用程序是分层管理的,其最高的层次为(). A:工程B:模块C:窗体D:过程 答案：A 第5题（1.0分）题号:837 用户可以通过设置菜单项的()属性值为FALSE来使该菜单项不可见. A:HideB:CheckedC:VisibleD:Enabled答案：C 第6题（1.0分）题号:334 若要使标签控件显示时,不覆盖其背景内容, 九江学院期末考试复习题（政法A1111）第一套 一、判断题 1、Visual Basic?序开发的特点是面向对象的事件驱动。（J 2、Print_Text 是一个不合法的变量名。（为 3、窗体的AutoRedraw属性实现了屏幕图像的重建。（翌 4、设置字体大小应使用Font属性（为 5、Sub过程可以实现嵌套调用（寸 6、IIF函数中的三个参数都不能省略。（寸 7、块结构条件语句以End If结束，而单行结构条件语句没有End旧（明 8、当终值小于初值时，步长为负数。（5 9、执行While-Wend循环时，如果一开始条件就不成立，则语句块一次也不会执行。（寸 10、关于数组的引用，在程序中，凡是简单变量可以出现的地方都可以出现数组元素的引用（/） 二、单项选择题 1. Print Format （123, ” ###说执行之后的结果为 A）# 123B） 123C） 123# D） # # # # 【答案】B 2. 下面可以表示注释语句开头的为 A）R e B R C Rem。dim 【答案】C 3. 下列选项中窗体载入事件为 A) Load 事件B) Click事件C) DblClick事件D) Unload 事件 【答案】A 4. Timer控件可以使用下列哪种事件 A) Click事件B) Timer 事件C) Dblclick 事件D) Change事件 【答案】B 5. 在InputBox函数中哪一个参数是必须的 A) Prompt B) Buttons C) Title D) Context 【答案】A 6. 以下叙述中错误的是： A)如果过程被定义为Static类型，则该过程中的局部变量都是Static类型 B) Sub过程中不能嵌套定义Sub过程 C) Sub过程可以嵌套调用Sub过程 D) 事件过程可以像通用过程一样由用户定义过程名 【答案】C 乙要填加一个标准模块，可使用“ 单中的添加模块”命令。 A)文件B)视图C)工程D)工具 【答案】C 8 .在块结构条件语句If-Then / Endif中 (A) 必须至少有一个Elseif语句 (B )可以有任意多个ElseIf-Then语句 (C)如果没有Else语句，运行时将出现错误 vb 练习题及答案 【篇一：vb 习题(含答案)】 lass=txt>1 、vb 程序中，通常不会产生错误提示的是( )。（1 分） a、编译错误 b、逻辑错误 c、运行时错误 d、实时错误 2、在设计阶段，双击窗体上任一空白处，打开的窗口是( )。（1 分） a、工程资源管理器窗口 b、代码窗口 c、工具箱窗口 d、属性窗口 3、下列说法中，正确的说法是( )。（1 分） a、窗体名称和该窗体文件名必须一致 b、窗体名称和该窗体文件名 可以不相同 c、窗体名称和该窗体文件名不能使用汉字 d、窗体名称不能使用汉字、但该窗体文件名能使用汉字 4、visual basic 有完备的help 联机帮助功能，可以通过按下功能 键( )得到帮助。（ 1 分） a、f9 b 、f8 c、f1 d 、f5 5、以下( )控件可作为容器使用。（ 1 分） a、label b 、picturebox c、textbox d 、image 6、将窗体的boderstyle 属性设置为( )可使窗口不显示标题栏。（ 1 分） a、0 b 、1 c、2 d 、5 7、文本框没有( )属性（1 分） a、text b 、name c、caption d 、borderstyle 23、下列( )是不合法的常量。（ 1 分） a、100 b 、10e02 c、100.0 d 、10e0.5 24、下列对变量的定义中，定义x 为变体型变量的是( )。（1 分） a、dim x as double b 、dim x c、dim x! d 、x%=23 25、设有如下变量声明：dim testdate as date ，为变量testdate 正确赋值的表达方式是( )。（1 分） a、textdate=#1/1/2002# b 、testdate=#1/1/2002# c、textdate=date(1/1/2002) d 、 testdate=format(m/d/yy,1/1/2002) 26、在立即窗口中运行以下语句，a=beijing :b=shanghai :print a,b 对其输出结果的描述中，正确的是( )。（1 分） a、beijing 和shanghai 中间没有空格 b、beijing 和shanghai 中 间有1 个空格 c、beijing 和shanghai 中间有 6 个空格 d、beijing 和shanghai 前面有7 个空格 27、语句段a=3: b=5:t=a ：a=b: b=t 执行后( )。（1 分） a、a 值为3，b 值为3 b 、a 值为3，b 值为5 c、a 值为5，b 值为5 d 、a 值为5，b 值为3 28、下列语句中，正确的是( )。（1 分） a、if x3*y and xy then y=x^3 b 、if x3*y and xy then y=3x c、if x3*y : xy then y=x^3 d 、if x3*y and xy then y=x**3 29、下面程序段dim x%: x=5: if x then y=x+1 else y=x 运行后， y 结果是( )。（1 分） a、5 b 、6 c、1 d 、显示出错信息 30、执行语句 a = inputbox(today, tomorrow, yesterday, 5, 5) ， 将显示一个输入对话框，在对话框的输入区中显示的信息是( )。（1 分） a、today b 、tomorrow c、yesterday d 、5 31、窗体上有一个命令按钮command1, 编写如下事件过 程: private sub command1_click() :x = val(inputbox(x=)) : y = inputbox(y=) : print x + y : end sub, 单击命令按钮，先后在两个输 入对话框中输入123 和321 ，窗体显示的内容是( )。（1 分） a、444 b 、123321 c、123+321 d 、出错信息 32、执行语句msgbox aaa, 2, bbb 后，所产生的消息框的标题是 ( )。（1 分） a、aaa b 、bbb 第一部分：客观题 1、 单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（ ） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是 （ ） A、工程资源管理器窗口 B、工具箱窗口 C、 属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（ ）方法来实现。 Ａ、Refresh Ｂ、Setfocus Ｃ、Gotfocus Ｄ、Value 4、下列不可作为VB变量名的是（ ） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是 （ ） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（ ） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（ ）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（ ） Ａ、Click Ｂ、MouseDown Ｃ、MouseUp Ｄ、DblClick 9、下列为整型变量的是（ ） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是 （ ） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 VB试卷 一、单项选择题(每题2分,共40分) 1. 窗体的标题栏显示内容由窗体对象的属性决定。 A) BackColor B)BackStyle C)Text D)Caption 2. 窗体的示意图标可用属性来设置。 A) Picture B) Image C) Icon D) MouseIcon 3. 窗体的控制菜单的有无由窗体对象的属性决定。 A) ControlBox B) MinButton C) MaxButton D) BorderStyle 4. 若要取消窗体的最大化功能，则可设置属性为False来实现。 A) ControlBox B) MinButton C) MaxButton D) Enabled 5. 以下4个选项，不属于VB的工作模式。 A) 编译 B) 设计 C) 运行 D) 中断 6. 窗体的边框样式由窗体对象的属性来设置。 A) BackStyle B) BorderStyle C) WindowState D) FillStyle 7. 若要以程序代码方式设置在窗体中显示文本的字体大小，则可用窗体对象的属性来实现。 A) FontName B) Font C) FontSize D) FontBold 8. 命令按钮的标题文字由属性来设置。 A) Text B) Caption C) Name D) (名称) 9. VB是面向对象的程序设计，以下4个选项，不属于面向对象的三要素。 A) 变量 B) 属性 C) 事件 D) 方法 10. 若要将某命令按钮设置为默认命令按钮，可设置属性为True来实现。 A) Value B) Cancel C) Default D) Enabled 11. 若要使命令按钮不可见，可设置属性为False来实现。 A) Value B) Enabled C) Visible D) Cancel 12. 运行程序时，系统自动执行窗体的事件。 A) load B) click C) unload D) GotFocus 13. 若要设置文本框最大可接收的字符数，可通过属性来实现。 A) MultiLine B) Length C) Max D) MaxLength 14. 若要使某命令按钮获得控制焦点，可使用方法来设置。 A) Refresh B) SetFocus C) GotFocus D) Value 15. 若要使命令钮可响应事件，可通过设置属性的取值来实现。 A) Visible B) Enabled C) Default D) Value 16. 在运行时，若要调用某命令按钮的Click事件过程，可设置该命令按钮对象的 属性为True来实现。 A) Enabled B) Value C) Default D) Cancel 17. 标签框的边框，由属性的设置值决定。 2011-2012学年第一学期算法与程序设计期末考试题 班级：姓名：分数： 一、单项选择题（每题4分） 1.算法是解决问题的( ) A.程序代码 B.方法与步骤 C.计算公式 D.最终结果 2.以下不能作为vb常量的的是( ) A.“Good Luck” B. PI C. 1.5E-3 D. 16.34 3.以下各表达式中, 计算结果为0的是( ) A. INT(12.4)+INT(-12.6) B. CINT(12.4)+CINT(-12.6) C. FIX(13.6)+FIX(-12.6) D. FIX(12.4)+FIX(-12.6) 4.设a=″Visual Basic″，下面使b=″Basic″的语句是( ) A.b=Left(a，8，12) B.b=Mid(a，8，5) C.b=Right(a，5，5) D.b=Left(a，8,5) 5.inputbox() 函数返回值类型为( ) A.数值 B.字符串 C.数值和字符串 D.变体 6.下列关于For…Next语句的说法正确的是( ) A. 循环变量、初值、终值和步长都必须为数值型 B.Step后的步长只能为正数 C. 初值必须小于终值 D.初值必须大于终值 7.下列符号中，只有( )是合法的VB变量名。 A．xy23 B．23xy C．Sub D．xy8[1] 8.数学表达式Sin30°写成VB表达式是( ) A．Sin30 B．Sin(30) C．Sin(30°) D．Sin(30*3.14/180) 9.在VB的运算中，级别最高的是( ) A．= B．And C．Or D．Not 10.判断任意3条线段a、b、c能否构成三角形的表达式为( ) A．a+b>=c Or a+c>=b Or b+c>=a B．Not(a+b 九年级期末VB 考试试卷 班级：学号：姓名： 123456789101112131415 一、选择题（每题两分，共十五题） 1.下列叙述中正确的是 (c) A. 只有窗体才是VB中的对象 B.只有控件才是VB中的对象 C. 窗体和控件都是VB中的对象 D.窗体和控件不是VB中的对象 2. 下列可以激活属性窗口的操作是(D) A. 用鼠标双击窗体的任何部位 B.执行“工程”菜单中的“工具箱”命令 C. 按 Ctrl+F4 键 D.按F4键 3. 下列不能打开工具箱窗口的操作是(B) A. 执行“视图”菜单中的“工具箱”命令 B.按 Alt+F8键 C. 单击工具栏上的“工具箱”按钮 D.按 Alt+V键，然后按 Alt+X键 4.假定已在窗体上画了多个控件，并有一个控件是活动的，为了在属性窗口中设置窗体的属性，预先 应执行的操作是 (A) A. 单击窗体上没有控件的地方 B.单击任一个控件 C. 不执行任何操作 D.双击窗体的标题栏 5. 为了把窗体上的某个控件变为活动的，应执行的操作是(C) A. 单击窗体的边框 B.单击该控件的内部 C. 双击该控件 D.双击窗体 6. 确定一个控件在窗体上的位置的属性是(D) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 7. 确定一个窗体或控件的大小的属性是(B) A. Width 或 Height B. Width和 Height C. Top 或 Left D. Top和 Left 8. 为了同时改变一个活动控件的高度和宽度，正确的操作是( B) A. 拖拉控件 4 个角上的某个小方块 B.只能拖拉位于控件右下角的小方块 C. 只能拖拉位于控件左下角的小方块 D.不能同时改变控件的高度和宽度 | 最新VB题库及答案 一、选择题 第1部分 1、在窗体（名称为Form1）上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写一个事件过程。程序运行后，如果在文本框中输入一个字符，则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是 A、Private Sub Text1_Change() = "计算机等级考试" End Sub ] B、Private Sub Command1_Click() Caption = "计算机等级考试" End Sub C、Private Sub Form_Click() = "计算机等级考试" End Sub D、Private Sub Command1_Click() = "计算机等级考试" { End Sub 2、在一行内写多条语句时，每个语句之间用（）符号分隔。 A、 , B、： C、. D、； 3、下面（）是合法的变量名。 A、X_YZ B、123ABC C、INTEGER D、X-Y ] 4、下面（）是合法的字符常量。 A、 ABC$ B、“ABC” C、‘ABC’ D、 ABC 5、表达式16/4 - 2^5*8 MOD 5\2的值为（）。 A、14 B、 4 C、20 D、2 6、设a=”MicrosoftVisualBasic”，则以下使变量的b值为”VisualBasic”的语句是 A、b=Left(a,10) B、b=Mid(a,10) — C、b=Right(a,10) D、b=Mid(a,11,10) 7、设a="a"，b="b"，c="c"，d="d"，执行语句x = IIf((a < b) Or (c > d), "A", 以下答案由叶阿飞童鞋友情提供。 1. 何谓VB对象，他们都是可见的吗？每种分别举两个例子。 窗口以及窗口中的每一个部件。不都可见；可视：窗口、菜单、按钮等；不可视：公共对话框、定时器等。 2.何谓对象的成员，分别加以说明。 属性，方法和事件。 ·属性：对象的数据（设置和特性），例如，颜色、大小、位置等。 ·方法：一种可在对象上操作的过程，例如，移动等。 ·事件：对象可识别的动作，例如，单击鼠标和按下键盘键。可编写代码来响应事件。 3.何谓事件驱动和事件过程。说明并举例。 只有在窗口中有关位置进行键盘输入或单击鼠标，程序才会作出响应的程序运行方式称为事件驱动方式。{所谓事件驱动就是利用事件来触发消息，系统再对相应的消息进行处理的一个机制（网上找的，不是书上的，不能确定是否正确）}。 ·vb应用程序中的某个事件被触发时，对象就会对该事件做出响应，响应某个时间后所执行的代码段就是事件过程。 4.VB集成开发环境的工作模式有哪些？分别说明每一种工作模式所能完成的功能。 <1>设计模式：创建应用程序的大多数工作都是在设计时完成的。在设计时，可以设计窗体、绘制空间、编写代码并使用“属性”窗口来设置或查看属性设置值。 <2>运行模式：代码正在运行的时期，用户可与应用程序交流，可查看代码，但不能改动它。 <3>中断模式：程序在运行的中途被停止执行。在中断模式下，用户可查看各变量及不是属性的当前值，了解程序执行是否正常。还可以修改程序代码，检查、调试、重置、单步执行或继续执行程序。 5.VB集成开发环境的控件种类有哪些？每一种分别举例说明。 <1>内部控件。主要有标签、文本框、命令按钮等。 <2>ActiveX控件。如数据绑定网络控件、数据绑定绑定组合框控件等 <3>可插入的对象。主要指microsoft office中的excel工作表或ppt幻灯片等。 6·何谓VB控件，向窗体中添加控件的方法有哪些？举例说明。 在窗体上用于输入、输出信息的图形或文字符号称为控件。 <1>单击工具箱中的控件图标，可以看到鼠标指针变成十字指针，然后在窗体的空白处按住鼠标左键拖动鼠标到合适的位置放开，即可画出对应的控件。 <2>双击工具箱中的控件图标，即可将控件添加到窗体中。 以下答案由妞仔仔童鞋友情提供。 7.试述VB编程步骤，对每一步进行必要的解释。 创建工程→界面设计→属性设置→ 代码编辑→文件保存→程序运行和调试。 创建工程 启动Visual Basic 6.0 后，在“新建工程”对话框中选择“标准EXE”文件，单击“确定”按钮。此时，工程资源管理器窗口中显示已创建了一个工程，默认名字为“工程1” 并创建了一个窗体，默认名称为“Form1” 。界面设计 新建窗体后，利用工具箱可以在窗体上依次添加控件对象。选择工具箱中的标签，通过双击或鼠标拖动将其对象拖放在窗体的合适位置； 属性设置 控件对象的默认属性值显然不能满足程序的要求，因此，我们要对每一个控件对象通过属性窗口设置属性。 代码编辑 应用程序进行到现在仅仅只做了一个空壳，当程序运行，我们单击任何命令按钮，并没有事情发生，这是因为我们还没有进行最重要的一个步骤——代码编辑。根据题目要求，我们要 第一部分：客观题 一、单项选择题 1、在窗体模块的通用段中声明变量时，不能使用的关键字是（） A、 Dim B、 Public C、Private D、 Static 2、在设计阶段，当双击窗体上的某个控件时，所打开的窗口是（） A、工程资源管理器窗口 B、工具箱窗口 C、属性窗口 D、代码窗口 3、若要使某可见控件获得焦点，可使用（）方法来实现。 Ａ、RefreshＢ、SetfocusＣ、GotfocusＤ、Value 4、下列不可作为VB变量名的是（） A、ABT1 B、Alpha C、ABC D、4*Delta 5、表达式 5 Mod 3+3\5*2的值是（） A、 0 B、 6 C、4 D、 2 6、下列语句中，正确的赋值语句是（） A、 i + j = 10 B、 2i = j C、 j = i + j D、 i * j = 0 7、执行下列程序段后，x的值是（）。 n = 4: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n A、 2 B、 6 C、 10 D、 14 8、当用户在窗体上单击鼠标时，不会触发的事件是（） Ａ、ClickＢ、MouseDownＣ、MouseUpＤ、DblClick 9、下列为整型变量的是（） A、 x! B、 x# C、x$ D、 x% 10、要从For循环中直接退出循环，可使用的语句( )。 A、Exit Do B、Exit Loop C、Exit For D、Stop 11、下列逻辑表达式中，能正确表示条件“x，y都是奇数”的是（） A、x Mod 2 =1 Or y Mod 2 =1 B、x Mod 2 =0 Or y Mod 2=0 C、x Mod 2 =0 And y Mod 2=0 D、x Mod 2 =1 And y Mod 2 =1 12、在通用声明中给出Option Base 1语句，则数组a包含（）个数组元素。 Dim a(3, -2 To 1, 5) As Integer A、60 B、75 C、120 D、13 大一VB期末考试试卷及答案 1．在代码中引用一个控件时，应使用控件的（ b ）属性。 A．Caption B．Name C．Text D．Index 2．设变量x = 4，y = -1，a = 7，b = -8,下面表达式（ a ）的值为“假”。 A．x+a <= b-y B． x > 0 AND y < 0 C．a = b OR x>y D． x+y > a+b AND NOT (y < b) 3．表达式Int(Rnd*71)+10产生的随机整数范围是（ c ）。 A．（10，80） B．（10，81） C．[10，80] D．[10，81] 4．函数Sgn(3.1416)的返回值是（ c ）。 A．-1 B．0 C．1 D．以上都不对 5．67890属于（ d ）类型数据。 A．整型 B．单精度浮点数 C．货币型 D．长整型 6．下列变量名中正确的是（ d ）。 A．3S B．Print C．Select My Name D．Select_1 7．下列赋值语句（ a ）是有效的。 A．sum = sum -sum B．x+2 = x + 2 C．x + y = sum D．last = y / 0 8．以下的控件或方法具有输入和输出双重功能的为（ b ）。 A．Print B．Textbox C．Optionbutton D．Checkbox 9．若要获得列表框中被选中的列表项的内容，可以通过访问（ d ）属性来实现。 A．Name B．ListIndex C．ListCount D．Text 10．下列代码的运行结果为（ b ）。 Private Sub command1_click() Dim m(10) 1、在考生文件夹下有工程文件wy7、vbp及窗体文件wy7、frm,该程序就是不完整的,请在有？号的地方填入正确的程序代码,然后删除？及所有注释符号(即 '号),但不能修改其它部分。修改后的程序文件都保存,存盘时不得修改文件夹与文件名。 本题描述如下: 在窗体上有一个名为Text1的文本框,有三个命令按钮,名称分别就是C1、C2与C3,标题分别就是"读入"、"加密"与"存盘"。要求程序运行后,点击"读入"按钮,将文本文件in7、txt(该文件在考生文件夹下)中的文本信息读入文本框Text1中;点击"加密"按钮将Text1中的英文字母加密转换,并将转换后的结果显示到Text1中。转换方式为转换成该字母对应字母表中后两个位置的字母。例如,转换前的字母就是"a",则转换后的就是"c",转换前就是"E",转换后就是"G";点击"存盘"按钮, 则将转换后的文本框中的文本保存到out7、txt 文件中(该文件保存到考生文件夹下)。 Private Sub C1_Click() Dim strinfo As String Open "in7、txt" For Input As 1 Input #1, strinfo Close #1 Text1、Text = strinfo End Sub Private Sub C2_Click() Dim strchange As String Dim i As Integer For i = 1 To Len(Text1、Text) strchange = strchange + Chr(Asc(Mid(Text1、Text, i, 1)) + 2) Next Text1、Text = strchange End Sub Private Sub C3_Click() Open "out7、txt" For Output As 1 Print #1, Text1、Text Close #1 End Sub 2、(1)在考生文件夹下有工程文件wy5、vbp及窗体文件wy5、frm,该程序就是不完整的,请在有？号的地方填入正确内容,然后删除？及所有注释符(即'号),但不能修改其它部分。存盘时不得改变文件名与文件夹。本题描述如下: 在窗口中有一个RichText文本框控件(名称为rtx1)与一个文本框控件(名称为Text1),两个命令按钮,名称 分别为Command1与Command2,标题分别为"加入WY01、TXT"、"统计字符个数"。要求程序运行后,单击command1将考生文件夹下的wy01、txt的内容显示到rtx1中;单击"统计字符个数"按钮统计Text1中有多少个字符,将结果显示在Text1中。 VB程序设计试题及答案（三） 一、单选题 1. Visual Basic是一种面向对象的可视化程序设计语言，采取了 A 的编程机制。 (A) 事件驱动(B) 按过程顺序执行 (C) 从主程序开始执行(D) 按模块顺序执行 2. 若要使标签控件显示时不覆盖其背景内容，要对 D 属性进行设置。 (A) Backcolor (B) BorderStyle (C) Forecolor (D) Backstyle 3. 在Visual Basic中最基本的对象是 C ，它是应用程序的基石，是其他控件的容器。 (A) 文本框(B) 命令按钮 (C) 窗体(D) 标签 4. 要判断在文本框是否按下Enter键，应在文本框的 D 事件中判断。 (A) Change (B)KeyDown (C) Click (D)KeyPress 5. 数学表达式3≤x 高级语言程序设计（VB）试卷（A卷） 注意事项：1、本试卷共页，满分为100 分，考试时间为110 分钟。 2、标准答题卡使用2B铅笔涂写；文字题答题时请使用蓝、黑钢笔或圆珠笔， 不得使用红颜色墨水笔。 一、单项选择题（每空1分，共30分） （请将答案按照题干上【】内的序号涂写“标准答题卡”，否则不得分） 1．在VB 6.0中，扩展名为.vbp的文件称为【1】。 A) 工程文件B) 窗体文件C) 类模块文件D) 标准模块文件 2．在VB 6.0集成开发环境的设计模式下，用鼠标双击窗体上的某个对象后，打开的窗口是【2】。 A) 代码窗口B) 窗体设计窗口 C) 属性窗口D) 工程资源管理器窗口 3．设有变量定义语句Dim a%，则变量a的数据类型是【3】。 A) 整型B) 单精度类型C) 双精度类型D) 字符串类型4．下列表达式中，值为False的是【4】。 A) "AB"<"abc" B) "ABC" = UCase("abc") C) "ABCD"<"abc" D) Mid("ABCD",3,1)=Left("ABCD",3) 5．函数InStr("ABCDEF", "CD")的值是【5】。 A) 2 B) 3 C) True D) CDEF 6．下列程序运行后，单击窗体，输出结果是【6】。 Private Sub Form_Click() Dim a As Integer, b As Integer a = 3 b = 5 Print a + b; a & b End Sub A) 8 8 B) 35 35 C) 8 35 D) 35 8 7．下列程序运行后，单击窗体，输出结果是 【7】 。 Private Sub Form_Click() a = 3: b = 7 a = a + b : b = a – b : a = a - b Print a; b End Sub A) 4 3 B) 7 3 C) 3 7 D) 10 7 8．下面程序段所表示的数学关系式是 【8】 。 If (a < b) Then If d = c Then x = 1 Else x = 2 End If A) ?? ?≠≥=<=) (2) c (1 d c b a d b a x 且且 B) ?? ?≠<=<=)(2) c (1 d c b a d b a x 且且 C) ? ? ?≥=<=)(2) c (1b a d b a x 且 D) ? ? ?≠=<=)(2) c (1 d c d b a x 且 9．下列程序运行后，单击窗体，输出结果是 【9】 。 Private Sub Form_Click() s = 0: k = 1 Do s = s + k: k = k + 1 Loop Until k <= 5 Print s End Sub A) 15 B) 10 C) 1 D) 0 10．下列程序段的输出结果是 【10】 。 For k = 4 To 2 Step -2 m = k Next k Print m; k; A) 2 2 B) 2 0 C) 2 1 D) 0 0VB习题及答案
VB期末考试试题及答案
程序设计语言VB_习题集(含答案)
vb期末考试试题
九江学院VB期末考试题目及详细答案
vb练习题及答案.doc
VB期末考试试题
vb试题及答案
vb期末考试试题
初三_vb期末考试试卷+答案
vb题库及答案
VB试题及答案
VB期末考试试题及答案 (1)
大一VB期末考试试卷及答案
vb经典题目及答案
VB程序设计试题及答案
VB期末试卷(A卷带答案 )