期末综合练习一
一、单项选择题
1．后缀为.Vbp的文件表示VB 的（）
A．类模块文件B．窗体文件
C．工程文件D．标准类模块文件
2．后缀为.bas的文件表示VB 的（）。
A．窗体文件B．类模块文件
C．工程文件D．标准类模块文件
3．当需要上下文帮助时，选择要帮助的内容，希望出现MSDN窗口及显示所需的帮助信息，应按的键是（）。
A．Help B．F10 C．F1 D．Esc
4．当一个工程中含有多个窗体时，其中的启动窗体是（）。
A．启动VB时创建的第一个窗体 B．第一个添加的窗体
C．最后一个添加的窗体 D．在“工程属性”对话框中指定的窗体5．为了保存一个Visual Basic应用程序，下列说法正确的是（）。
A．只保存窗体文件（.frm）
B．只保存工程文件（.vbp）
C．分别保存工程文件和标准模块文件(.bas)
D．分别保存工程文件、窗体文件和标准模块文件
6．要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列（）属性设置就有效。
A．MaxButton B．BorderSyle
C．Width D．MinButton
7．在Visual Basic中，变量的默认类型是（）
A．Integer B．Variant
C．Double D．Currency
8．有程序代码如下：
Text1.Text = "Visual Basic"
则Text1，Text ，和"Visual Basic"分别代表（）。
A．对象，值，属性B．对象，方法，属性
C．对象，属性，值D．属性，对象，值
9．Timer控件可用于后台进程中，可在Timer事件内编程，要停止触发Timer事件，需要设置的属性是（）
A．Interval=0或Enabled=False B．Interval=0或Visible=False
C．Enabled=False 或Enabled=0 D．Interval=0且Enabled=False
10．要设置命令按钮的背景图形，必须设置的两个属性是（）。
A．Value和Icon B．Style和Icon
C．Caption和Picture D．Style和Picture
11．刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）。
A．单选按纽B．图片框
C．框架D．通用对话框
12．在VB中，下列合法的变量名是（）
A．4ab B．a-b C．a_4 D．integer
13．为使文本框显示滚动条，必须首先设置的属性是（）。
A．AutoSize B．Multiline C．Alignment D．TabStop 14．如下数组声明语句，正确的是（）。
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
15．Dim A(6, 6) As Integer定义的数组包含的元素个数是（）
A．36 B．49
C．42 D．动态变化
16．要在窗体Form1内显示“欢迎您！”，使用的语句是（）
A．Form.caption="欢迎您!" B．Form1.caption="欢迎您!"
C．Form1.print "欢迎您!" D．Form. print "欢迎您!"
17．执行Form1.Scale (-14, 14)-(14, -14)语句后，Form1窗体坐标系x轴和y轴的正方向是（）。
A．向左和向下B．向右和向上
C．向左和向上D．向右和向下
18．要设置命令按钮的背景图形，必须设置的两个属性是（）。
A．Value和Icon B．Style和Icon
C．Style和Picture D．Caption和Picture
19．如果希望以模态方式显示窗体Form1，下列正确的语句是（）
A．Form1.Show 0 B．Form1.Show
C．Form1.Show 1 D．以下都不正确
20．如果创建了命令按钮数组控件，那么Click事件的参数是（）。
A．Tag B．Caption
C．Index D．As
21．表达式8+13 Mod 2*4+3（）。
A．8 B．16 C．10 D．12
22．下列关于变量的说法不正确的是（）。
A．局部变量是指那些在过程中用Dim语句或Static语句声明的变量
B．局部变量在声明它的过程执行完毕后就被释放了
C．静态局部变量是在过程中用Static语句声明的
D．局部变量的作用域仅限于声明它的过程
23．VB程序中通常不会产生错误提示的是（）。
A．编译错误B．实时错误
C．运行时错误D．逻辑错误
24．如果创建了命令按钮数组控件，那么该命令按钮的Click事件的参数是（）A．Index B．Caption
C．Tag D．没有参数
25．使用ADO数据模型时，建立Recordset和Connection对象连接的属性是（）。
A．Execute B．CommandType
C．Open D．ActiveConnection
26．不属于VB数据库引擎的是（）。
A．ODBC B．BDE
C．Jet引擎D．OLE DB
二、填空题
1. Visual Basic提供了结构化程序设计的3种基本结构，这3种基本结构是顺序结构、
和。
2．欲设置定时器的时间间隔为2秒，则属性Interval的值为。
3．定时器（Timer）控件可识别的事件是，发生该事件的时间间隔由定时器的属性设置。
4．某个程序中要用到一个二维数组，要求数组名为A，类型为整型，第一维下标从-1到2，第二维下标从-2到2，则相应数组声明语句为。
5．Visual Basic程序开发有三种模式，即设计模式、中断模式和模式。
6．在VB中想获得帮助，需要按的键是。
7．全局变量在整个应用程序中有效，一般在标准模块中使用语句声明。
8．在控件数组中，所有元素的属性均相同，数组中的每个元素由
属性指定。
9．在Visual Basic语言中有三种形式的循环结构。其中，若循环的次数可以适先确定，可使用循环。
10．Dim i As Integer，则运行时变量i的初始值是。
11．一个VB应用程序可以包含个vbp文件。
12．在VB中，将Access称为本地数据库，SQL Server称为。
13．VB中参数传递的方式有两种，一种是参数，另一种是
参数。
14．Winsock控件主要用来编制或协议的通话程序。
15．通常可以将文本框控件的Locked属性设置为，以禁止键盘输入。
三、阅读程序题
阅读下列程序并写出程序运行结果
1．
Private Sub Form_Click()
Dim x As Integer
Static y As Integer
x = x + 3
y = x + y
Form1.Print "x="; x, "y="; y
End Sub
写出程序运行时连续单击三次窗体后，Form1上的输出结果。
2．
Private Sub Command1_Click()
Dim s As Double
Dim i As Integer
s = 5
i = 1
Do While i < 7
i = i + 2
s = s + i
Loop
Text1.Text = s
End Sub
写出程序运行时，单击命令按钮文本框Text1中的输出结果。
3．
Private Sub Form_Click()
Dim c As Integer, j As Integer, k As Integer
k = 3
c = 4
For j = 1 To 5
If j > 3 Then
c = c + 5
Exit For
Else
k = k + 1
End If
Next j
Print c, k
End Sub
写出程序运行时单击窗体后，c,k的值分别是：
4．
Function F(a As Integer)
b =3
Static c
b = b + 1
c = c + 1
F = a + b + c
End Function
Private Sub Command1_Click()
Dim a As Integer
a = 2
For i = 1 To 3
Print F(a)
Next i
End Sub
写出程序运行时，单击命令按钮在窗体上的输出结果。
4.
Private Sub Command1_Click()
Dim a As Integer: Dim b As Integer
a = 10:
b = 20
Change1 a, b
Print "A1="; a, "B1="; b
a = 10:
b = 20
Change2 a, b
Print "A2="; a, "B2="; b
End Sub
Sub Change1(x As Integer, y As Integer)
t = x: x = y: y = t
End Sub
Sub Change2(ByVal x As Integer, ByVal y As Integer)
t = x: x = y: y = t
End Sub
写出程序运行时,单击窗体Form1上的输出结果。
5. Private Sub Command1_Click()
Dim a As Integer: Dim b As Integer
a = 10:
b = 20
Change1 a, b
Print "A1="; a, "B1="; b
a = 10:
b = 20
Change2 a, b
Print "A2="; a, "B2="; b
End Sub
Sub Change1(x As Integer, y As Integer)
t = x: x = y: y = t
End Sub
Sub Change2(ByVal x As Integer, ByVal y As Integer)
t = x: x = y: y = t
End Sub
写出程序运行时,单击窗体Form1上的输出结果。
四、完善程序题
1.假设用Access创建了一个名为“学生.MDB”的数据库，并在其中创建了一张名为“学生基本情况”的数据表，表中存放了学生的基本信息，如图1所示。
现在要求利用VB编写一个数据库查询程序，程序的运行界面如图2所示，基本逻辑是：首先文本框(Text1)中输入希望查询的学生学号，然后点击“查询”按钮(Command1)，如果数据库中存在该学号，则分别在Text2、Text3、Text4中显示学号、姓名、籍贯信息，否则提示用户“记录不存在”并使Text1获得焦点，要求用户重新输入。当点击退出按钮(Command2)时关闭本窗体。
图1用Access创建的学生基本情况数据表
图2 查询程序运行界面
程序如下，请补充完整。
Private ADOcn As Connection
Private Sub Form_Load()
[1]
ADOcn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\学生.MDB" End Sub
Private Sub Command1_Click()
Dim strSQL As String
Dim ADOrs As [2] Recordset
ADOrs.ActiveConnection = ADOcn
strSQL = "Select * From 学生基本情况Where 学号=" + " ' " + Text1 + " ' "
.[3]
If [4] ADOrs.EOF Then
Text2 = ADOrs.Fields("学号")
Text3 = ADOrs.Fields("姓名")
Text4 = ADOrs.Fields("籍贯") Else
MsgBox "要查询的学号不存在，请重新输入!", vbOKOnly, "信息提示" Text1 = ""
[5] End If End Sub
Private Sub Command2_Click() UnLoad Me End
2. 程序运行界面如图3所示。要求从文本框中输入课程名称，然后按“添加”按钮，将其添加到列表框中；当选择列表框中某一项后，按“删除”按钮，则从列表框中删除该项；当选择列表框中某一项后，按“修改”按钮，把列表框中选取的项送往文本框且“修改”按钮变为“修改确认”。在文本框的内容修改好后，按“修改确认”按钮，再把文本框中修改后的信息送到列表框且“修改确认”按钮变为“修改”。
图3
程序如下，请补充完整。 Private Sub Form_Load()
List1.AddItem "计算机应用基础" List1.AddItem "程序设计基础" List1.AddItem "VB 程序设计"
List1.AddItem "SQLServer 数据库应用" List1.AddItem "网站设计技术"
List1.AddItem "系统开发规范与文档编写"
List1
Command3
Command2
Command1 Text1
List1.AddItem "信息系统测试"
End Sub
Private Sub Command1_Click()
If Text1.Text <> "" Then
List1. [1] Text1.Text'将文本框中的内容添加到列表框中
Text1.Text = ""
Else
MsgBox "请在文本框中输入信息！"
End If
End Sub
Private Sub Command2_Click()
List1.RemoveItem [2] '删除选定的项目End Sub
Private Sub Command3_Click()
If Command3.Caption = "修改" Then
Text1.Text = [3]
Text1.SetFocus
Command1.Enabled = False
Command2.Enabled = False
Command3.Caption = "修改确认"
Else
[4] = Text1.Text
Command1.Enabled = True
Command2.Enabled = True
Text1.Text = [5]
Command3.Caption = "修改"
End If
End Sub
五、编写程序题
请根据下列描述编写财务部门征收劳务酬金所得税程序，规定如下：
（1）收入在1000元以内，不扣税；
（2）收入在1000-3000元内，1000元以上部分扣税15%，
（3）收入在3000-5000元内，3000元以内按（2）的方法扣税，3000元以上部分，扣税20%，
（4）当收入达到5000元以上，1000元以上扣税25%。
程序运行界面如图4所示。
图 4
2.
编写简单的工资计算程序，要求在Text1、Text2、Text3中分别输入基本工资、奖金、扣款，单击“计算”按钮(Command1)后，首先计算“应发工资”(Text4)，然后根据“应发工资”计算个人所得税(Text5)，最后计算出实发工资(Text6)。
(1)应发工资=基本工资+奖金-扣款
(2)个人所得税的计算规则假设为：
1)当应发工资在1000元以内部分(含1000元)，不扣所得税。
2)当应发工资大于1000，但小于等于3000元时，超过1000元的部分按15%计算所得税。
3)当应发工资大于3000，按20%扣税。
程序运行结果如图5所示。
图 5
综合练习一答案
一、单项选择题
1.C
2.D
3.C
4.D
5.D
6.B
7.B
8.C
9.A 10.D 11.D 12.C 13.B 14.D 15.B 16．C 17．B 18.C 19．C 20.C 21．B 22.B 23.D 24.A 25.D 26.B
二、填空题
1．选择结构循环结构
2．2000
3．Timer Interval
4. Dim A(-1 To 2,-2 To 2) As Integer
5．执行
6.F1
7．Public
8．Name Index
9．For Next
10．0
11. 1
12．远程数据库
13．引用参数传递（或按址传递）按值传递
14．TCP/IP UDP
15．True
三、阅读程序题
1.
x=3 y=3
x=3 y=6
x=3 y=9
2.
20
3.
8 6
4.
7
8
9
5．
A1= 20 B1= 10
A2= 10 B2= 20
四、完善程序题
1.
[1] Set ADOcn = New Connection
[2] New
[3] ADOrs.Open strSQL
[4] Not
[5]Text1.SetFocus
2.
[1] AddItem
[2] List1.ListIndex
[3] List1.Text
[4] List1.List(List1.ListIndex)
[5] ""
五、编写程序题
1.参考答案
Private Sub Command1_Click()
Dim x As Integer, tax As Single
x = Val(Text1.Text)
If x <= 1000 Then
tax = 0
Else
If x <= 3000 Then
tax = (x - 1000) * 0.15
Else
If x <= 5000 Then
tax = (x - 1000) * 0.15 + (x - 3000) * 0.05
Else
tax = (x - 1000) * 0.25
End If
End If
End If
Text2.Text = tax
End Sub
2.参考答案
Private Sub Command1_Click()
Text4 = Val(Text1) + Val(Text2) - Val(Text3)
If Val(Text4) <= 1000 Then
Text5 = 0
ElseIf Val(Text4) > 1000 And Val(Text4) <= 3000 Then
Text5 = (Val(Text4) - 1000) * 0.15
Else
Text5 = Val(Text4) * 0.2
End If
Text6 = Val(Text4) - Val(Text5)
End Sub
Private Sub Command2_Click()
Unload Me
End Sub
期末综合练习二
一、单项选择题
1．在VB6.0集成开发环境中有三种工作模式，下列不属于三种工作模式之一的是（）。
A．设计模式B．中断模式
C．执行模式D．编写代码模式
2．刚建立一个新的标准EXE工程后，不在工具箱中出现的控件是（）。
A．单选按纽B．图片框
C．框架D．通用对话框
3．要在窗体的标题内显示“VB你好”,使用的语句是（）。
A．Form1.Print" VB你好" B．Form.Print" VB你好"
C．Form1.caption=" VB你好" D．Form.caption=" VB你好"
4．窗体文件的扩展名是（）。
A．.vbp B．.frm
C．.bas D．.frx
5．多窗体程序是由多个窗体组成。在缺省情况下，VB在应用程序执行时，总是把（）指定为启动窗体。
A．不包含任何控件的窗体 B．设计时的第一个窗体
C．最后一个添加的窗体 D．命名为Frm1的窗体
6．无论何种控件，共同具有的属性是（）
A．Text B．Caption
C．Name D．ForeColor
7．以下有关Visual Basic语言描述中错误的是（）。
A．不区分大小写
B．语句是一行一句，以回车键结束
C．用“,”分隔一行中的多个语句
D．一条语句放在多行中，则在前一行结束处使用续行符“_”连接下一行
8．要退出Do…Loop循环，可使用的语句是（）语句。
A．Exit B．Exit For C．Exit Do D．End Do
9．有程序代码如下：
Text1.Text = "欢迎学习VB！"
则Text1，Text ，和" 欢迎学习VB！"分别代表（）。
A．对象，值，属性B．对象，属性，值
C．对象，方法，属性D．属性，对象，值
10．下列赋值语句正确的是（）。
A．B+C =A B．5=A+B
C．-B=A D．A=B+C
11．下列关于变量的说法不正确的是（）。
A．局部变量在声明它的过程执行完毕后就被释放了
B．局部变量的作用域仅限于声明它的过程
C．静态局部变量是在过程中用Static语句声明的
D．局部变量是指那些在过程中用Dim语句或Static语句声明的变量12．表达式7+10 Mod 3*2+2（）。
A．1B．6 C．7 D．13
13．关于语句行，下列说法正确的是（）。
A．一行只能写一条语句B．长度不能超过255个字符
C．每行的首字符必须大写D．一条语句可以分多行书写
14．在VB中，要想快速获得某个相关控件或语句的帮助信息，一般可首先选中该控件或语句，然后按的键是（）
A．Help B．F10 C． F1 D．Enter
15．为了使图像框中的图形自动适应图像框的大小，则应（）。
A．将其AutoSize属性值设置为True B．将其AutoSize属性值设置为False C．将其Stretch属性值设置为True D．将其Stretch属性值设置为False 16．按照变量的作用域可将变量划分为（）。
A．公有、私有、系统B．全局变量、模块级变量、过程级变量
C．动态、常数、静态D．Public、Private、Protected
17．将数据项“China”添加到列表框（List1）中成为第一项，应使用的语句是（）。
A．List1.AddItem"China",0 B．List1.AddItem"China",1
C．List1.AddItem"China", D．List1.AddItem"1,China" 18．13．Line(200,200)-Step(500,500)将在窗体（）画一直线。
A．（200，200）到（500，500）B．（200，200）到（300，300）C．（200，200）到（700，700）D．（300，300）到（500，500）19．如果希望以模态方式显示窗体Form1，下列正确的语句是（）。
A．Form1.Show
B．Form1.Show 0
C．Form1.Show 1
D．以下都不正确
20．在设计动画时，用时钟控件来控制动画速度的属性是（）。
A．Enabled B．Interval
C．Timer D．Move
21.不属于VB数据库引擎的是（）。
A．ODBC B．BDE
C．Jet引擎D．OLE DB
22．VB程序中设置断点的按键是（）。
A．F1键B．F9键
C．F8键D．Ctrl F8键
23．下列叙述不正确的是（）。
A.注释语句是非执行语句，仅对程序的有关内容起注释作用，客观存在不被解释和
编译
B.注释语句不能放在代码中的任何位置
C.注释语句可以放在代码中的任何位置
D.代码中加入注释语句的目的是提高程序的可读性
24．用于设置在文本框中显示字符的属性是（）。
A．AutoSizi B．ScrollBars
C．MultiLine D．Passwordchar
25．使用ADO对象模型时，使Recordset和Connection对象建立连接的属性是（）。
A．Open B．Execute
C．CommandType D．ActiveConnection
26．在代码编辑器中，如果一条语句太长，无法在一行内写下（不包括注释），要折行书写，可以在行末使用续行字符（），表示下一行是当前行的继续。
A．一个下划字符”_” B．一个空格加一个下划字符”_”
C．直接回车D．一个空格加一个连字符(-)
27．下列不属于VB数据库引擎的是（）
A．ODBC B．Jet引擎
C．BDE D．OLE DB
28．要发送数据，通常使用Winsock控件的（）。
A．SendData方法B．Listen方法
C．Accept方法D．GetDate方法
二、填空题
1.变量的声明方法有隐式和显示两种，如果采用隐式声明方法，那么VB会自动将变量声明为。
2．Visual Basic程序开发有三种模式，即设计模式、模式和模式。
3．用Dim A(3,-2 To 3)语句声明二维数组后，数组A的元素共有个。
4．若窗体的左上角坐标为（-250，250），右下角坐标为（250，-250），则X轴的正向向，Y轴的正向向。
5．定时器（Timer）控件可识别的事件是，发生该事件的时间间隔由定时器的
属性设置。
6．设某个程序中要用到一个二维数组，要求数组名为A，类型为字符串类型，第一维下标从0到3，第二维下标从1到2，则相应的数组声明语句为。
7．欲设置定时器的时间间隔为0.5秒，则属性Interval的值为。
8．列表框控件中最后一项的序号等于Listcount属性减。
9．控件数组的名字由属性指定，而数组中的每个元素由属性决定。
10．表达式4 + 10 Mod 4 * 2 + 2的值是。
11．要在窗体Form1内显示“欢迎您!”，使用的语句是。
12．程序的运行结果和程序员的设想有出入时产生的错误称为。
13．任何变量在声明后均有一个初始值，一般情况下，数值型变量的初始值为。
14．一个VB应用程序可以包含个vbp文件。
15．列表框控件中最后一项的序号等于ListCount属性减。
16．在VB中想获得帮助，需要按的键是；要设置断点需要按键。
17．在VB的DAO、RDO、ADO三种数据对象模型中，主要采用OLE DB访问数据库的是。
18．Winsock控件主要用来编制TCP/IP或协议的通话程序。
19．Stretch属性设置为时，图像框可自动改变大小以适应其中的图形。
三、阅读程序题
阅读下列程序并写出程序运行结果
1．
Private Sub Command1_Click()
Dim s As Double
Dim i As Integer
s = 5
i = 1
Do While i < 10
i = i + 2
s = s + i
Loop
Text1.Text = s
End Sub
写出程序运行时,单击命令按钮显示的值。
2.
Private Sub Command1_Click()
Dim X As Integer, Y As Integer
X = 2 : Y = 2
For i = 1 To 3
For j = 1 To i
Y = Y + j
Next j
X = X + Y
Next i
Print X
End Sub
写出程序运行时单击命令按钮后，窗体Form1上的输出结果。
3．
Private Sub Command1_Click()
Dim x As Integer
Static s As Integer
x = Val(InputBox("请输入一个正整数="))
If x < 5 Then
s = s * x
Else
s = s + x
End If
Text1.Text = "s=" & Str(s)
End Sub
程序运行时连续3次单击Command1，且设输入的数据为5、4、3时，分别写出文本框Text1的值。
4.
Function F(a As Integer)
Dim b As Integer
Static c As Integer
b = b + 5
c = c + 5
F = a + b + c
End Function
Private Sub Command1_Click()
Dim a As Integer
a = 5
For i = 1 To 3
Print F(a)
Next i
End Sub
写出程序运行时，单击命令按钮在窗体上的输出结果。
5．
Private Sub Form_Click()
Dim A(1 To 3) As String
Dim c As Integer
Dim j As Integer
A(1) = "5"
A(2) = "10"
A(3) = "15"
c = 4
For j = 1 To 3
c = c + Val(A(j))
Print c
End Sub
程序运行时单击窗体后，窗体上的输出结果是：
6.
Private Sub Command1_Click()
Dim A(1 To 7) As Integer
Dim b As Integer
For b = 1 To 7
A(b) = b
Next b
Text1.Text = A(b - 2)
End Sub
写出程序运行时单击Command1后，文件框Text1中的输出结果。
7．
Function F(a As Integer)
Dim b As Integer
Static c As Integer
b = b + 5
c = c + 5
F = a + b + c
End Function
Private Sub Command1_Click()
Dim a As Integer
a = 3
For i = 1 To 3
Print F(a)
Next i
End Sub
写出程序运行时，单击命令按钮在窗体上的输出结果。
8.
Sub Change(x As Integer, ByVal y As Integer)
Dim t As Integer
x = y
y = t
Print x, y
End Sub
Private Sub Form_Click()
Dim a As Integer, b As Integer
a = 10:
b = 20
Change a, b
Print a, b
End Sub
写出程序运行时单击窗体后，Form1上的输出结果。
四、完善程序题
1．假设在C盘根目录中存在一个名为“学生.MDB”的Access数据库，其中包含一张名为“学生基本情况”的数据表，表中存放了学生的基本信息，如图1所示。
现在要求利用VB编写一个数据库记录增加程序，程序的运行界面如图2所示，基本逻辑是：分别在Text1、Text2、Text3中输入学号、姓名、籍贯信息，然后点击“保存”按钮(Command1)将该记录添加到数据库中。如果数据库中已经存在相同的学号信息，则程序应提示用户“记录已存在，请重新输入”，并将焦点置于Text1上，等待用户修改或重新输入。当点击退出按钮(Command2)时关闭本窗体。
图1用Access创建的学生基本情况数据表
二、选择题 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 。
******学院 2009-2010学年第二学期 《VB程序设计》期末考试试卷（A）附答案 一、选择题（2分/题，共60分） （1）要设置窗体上各控件的属性，可以在＿＿＿中进行。 A“窗体布局”窗口B“工程资源管理器”窗口 C“属性”窗口D“对象”窗口 （2）下面程序段＿＿＿能够正确实现目的：如果x （5）双击窗体中的对象后，VB将显示的窗口是＿＿＿。 A工具箱B“工程”窗口 C“代码”窗口D“属性”窗口 （6）下列程序段的执行结果是＿＿＿。 X=int(Rnd()+4) Selectcasex Case5 Print“优秀” Case4 Print“良好” Case3 Print”通过” Caseelse Print”不通过” Endselect A优秀B良好 C通过D不通过 （7）下列哪个不是窗体的属性＿＿＿。 ACaptionBText CControlBoxDBorderStyle （8）设组合框Combo1中有3个项目,则以下能删除最后一项的语句是＿＿＿。 ACombo1.RemoveItemTextBCombo1.RemoveItem2 CCombo1.RemoveItem3DCombo1.RemoveItemCombo1.Listcount （9）窗体BorderStyle属性的功能是＿＿＿。 A设置窗体的边框大小 B设置窗体的边框样式，是否显示标题栏，是否可以调整大小等 C决定是否显示窗体的控制菜单图标与状态控制按钮 D决定窗体的最大化或最小化按钮是否有效 （10）下列可作为VB的变量名的是＿＿＿。 《VB程序设计基础》试题 一、选择题：（每空 2 分，共 20 分） 1. 与传统的程序设计语言相比,Visual Basic最突出的特点是___________。 A. 结构化程序设计 B. 程序开发环境 C. 事件驱动编程机制 D. 程序调试技术 2. Visual Basic 是一种面向对象的程序设计语言，构成对象的三要素是________。 A. 属性、事件、方法 B. 控件、属性、事件 C. 窗体、控件、过程 D. 窗体、控件、模块 3. 窗体模块保存在一个扩展名为__________的文件中。 A. bas B. vbp C. vbg D. frm 4. 下面正确的赋值语句是_________。 A. x+y=30 B. y=π*r*r C. y=x+30 D. 3y=x 5. 设S=“492”，表达式Right（S,1）+Left（S,1）+Mid（S,2,1）的值为__________。 A.“492” B.“249” C.“294” D.“429” 6. 将数学表达式a≤b≤c写成Visual Basic表达式，正确的是__________。 A. a<=b<=c B. a<=b Or b<=c C. a<=b And b<=c D. a<=b Not b<=c 7.为了把焦点移到文本框，所使用的方法是___________。 A. SetFocus B.Visible C.Refresh D.GetFocus 8. INT（100*RND）产生的随机整数的闭区间是_____________。 A.[0，100] B.[1，100] C.[1，99] D.[0，99] 9. 一个数组说明为Dim a(0 to 5，1 to 5) As Integer，则该数组共有_________个 元素。 A. 5 B. 36 C. 30 D. 不确定 10. 下面过程定义语句合法的是____________。 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复习题 一．选择题 1．使用声明语句建立一个数值型的变量后，VB自动将该变量初始化为（B）。 A．空值 B．0 C．1 D．Null 2．使用声明语句建立一个字符型的变量后，VB自动将该变量初始化为（ A ）。 A．空值 B．0 C．1 D．Null 3．使用声明语句建立一个布尔型的变量后，VB自动将该变量初始化为（A ）。 A．False B．0 C．1 D．True 4．关于 VB 中的运算符，以下说法正确的是（）。 A．“×”是算术运算符，含义是“乘法运算” B．“≠”是关系运算符，含义是“不等于” C．“!”是逻辑运算符，含义是“非” D．“And”是逻辑运算符，含义是“与” 5．对象的三要素是（）。 A．属性、事件、程序 B．属性、事件、方法 C．窗体、事件、程序 D．语句、函数、程序 6．VB中，表达式10<2 Or Not 5>2+6的值为（）。 A．TRUE B．FALSE C．0 D．出错 7．VB中，表达式Mid$("南京工程学院",3,4)的结果是（）。A．"工程学院" B．"京工程学" C．"程学院" D．"工程" 8．在VB中，应用程序被称为（）。 A．工程 B．窗体 C．属性 D．对象 9．VB中，事件Click由（）引发。 A．移动鼠标 B．左键单击鼠标 C．双击鼠标 D．右键单击鼠标 10．VB中，隐藏窗体的方法是（）。 A．Unload B．Stop C．Hide D．Show 11．在Visual Basic中最基本的对象是（），它是应用程序的基石，也是其它控件的容器。 A．文本框 B．命令按钮 C．窗体 D．标签 12．VB窗体文件的扩展名为（）。 A．VBP B．FRM C．BAS D．EXE 《VB程序设计》期末模拟试卷 一、单项选择 （b ）1．被对象所识别的动作与对象可执行的动作分别称为对象的___________。 A．方法、事件 B．事件、方法 C．事件、属性 D．过程、属性 （ c）2．下列________是Single型变量。 A．Time% B．Name$ C．Sheight! D．CXYZ& （a ）3．以下四个VB的变量名中，合法的是____________。 A．X23 B．$Re C． Len D．3xy （ d）4．在程序中使用 Dim str1,str2 As Long 语句对变量str1、str2进行声明后，下面正确的说法是________。 A. str1是整型，str2是长整型 B. str1是长整型，str2变体型 C. str1、str2都是长整型 D. str1是变体型，str2是长整型 （b ）5．表达式(&O36>31) and (“A”>”B”) 的结果是 ____________。 A．True B．False C．”&O3631AB” D．&O3631 （c ）6．表达式“100” + 100 和表达式“100” & 100的值分别是 ____________。 A．200、200 B．“100100”、“100100” C．200、“100100” D．“100100”、200 （b ）7．以下语句执行时，从键盘上输入Zhao，并按回车键。执行结果是________。 Dim a As String A=InputBox("Input", "", "Name") Print a A．Input B．Zhao C．Name D．空字符串 （b）8．语句Print 4 + 5 \ 6 * 7 / 8 Mod 9的运行结果是________。 A．4 B．5 C．6 D．7 （ d）9．在窗体的通用段声明变量时，不能使用__________ 关键字。 A．Dim 第一部分：客观题 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 程序设计》考试题型练习 一. 填空 1. VB 中的对象具有 属性 、 事件 、和 方法 三种特性，它们是构成对象的三个基本要素。 2. VB 中的常量分为哪三种： 文字常量 、 符号常量（用户自定义常量） 系统内部常量 。 3. 变量的三要素是指： 变量的名 、 变量的数据类型 、 变量的值 。 4. VB 中日期型数据的表示格式为： #mm/dd/YYYY#或#mm-dd-YYYY# 。 5. 在VB 中，“\”是 整除 运算符；“/”是 浮点除 运算符。两个字符串可以使用连接符 &或+ 串接起来。 6. 2 22z y x z y x ++++的VB 表达式为 （x+y+z ）/sqr(x^2+y^2+z^2) 。 7. a ac b b 242-+的VB 表达式为 (b+sqr(b^2-4*a*c))/(2*a) 。 8. 计时器控件的 Interval 属性用于设置Timer 事件发生的时间间隔，为了使计时器控件Timer1每隔0.5秒触发一次Timer 事件，应将该属性设置为 500 ；为了暂时关闭计时器，应把该计时器的 Enable 属性设置为False 。 二. 单选题 1. 如果要使VB 程序运行时不能对文本框中的内容进行编辑，需将文本框的哪个属性设置为True （ D ）。 A ）MultiLine B ）Visible C ）TabStop D ）Locked 2. 表达式Right("asdf", 2)+Ucase("as" )的值为（ A ）。 A ）dfAS B ）asAS C ）dfas D ）asas 3. 执行如下语句： a ＝InputBox("Today", "Tomorrow", "Yesterday") 将显示一个输入对话框，在对话框的输入区中的默认值是（ C ）。 A) Today B) Tomorrow C) Yesterday D) Today Tomorrow Yesterday 4. 设a=3，b=5，则以下表达式值为真的是（ B ）。 A) a>=b And b>10 B) (a>b) Or (b>0) C) (a<0) Or Not (b>0) D) (-3+5>a) And (b>0) VB程序设计期末考试题 一、选择题 1 下列常量中，是Integer类型常量的是（ C ）。 A、123& B、-38844 C、123% D、32768 2 下面选项中()是字符连接运算符. A A、& B、And C、% D、Mod 3 下面关于VB的集成开发环境（IDE）的叙述中，不正确的是（ B ）。 A、IDE是设计、调试、运行VB程序的工具。 B、用户不能随意关闭IDE中的窗口。 C、"窗体设计" 窗口是用来设计应用程序界面（窗体）的。 D、打开 / 关闭各窗口的命令主要在IDE的"视图"菜单中。 4 len(“vb程序设计”)=( C ) 。 A、 5 B、2 C、 6 D、10 5 表达式 15 Mod 4 + 13 \ 5 * 2 的值是 D A、7 B、0 C、2 D、4 6 赋值语句A=123 + Mid$( “123456”,3,2) 执行后，A=（A）。 A、157 B、12334 C、123 D、"12334" 7 在一个语句内写多条语句时,用来分隔每条语句的符号是(C). A、, B、; C、: D、、 8 将逻辑型数据转换成整型数据时，转换规则是（ D ）。 A、将True转换为 1 ，将False转换为 0 B、将True转换为 1 ，将False转换为 -1 C、将True转换为 0 ，将False转换为 -1 D、将True转换为 -1 ，将False转换为 0 9 表达式2+3*4^5-SIN(X+1)/2中最先进行的运算是(D). A、SIN B、4^5 C、3*4 D、x+1 10 如果x=2，则表达式x+1>2 Or sin(x)>0.9 And 3>x+3的值（ B ）。 A、不能计算 B、 True C、5 D、False 11 随机产生[10，50] 之间整数的正确表达式是（ D ）。 A、Round( Rnd*50) B、 Int(Rnd*40+10) C、Round( Rnd*51) D、 10+Int(Rnd*41) 12 每建立一个窗体,工程管理器窗口中就会增加一个(C). A、类模块文件 B、工程文件 C、窗体文件 D、程序模块文件 13 INT(100*RND(1))产生的随机整数的闭区间是(B). A、[1,100] B、[0,99] C、[0,100] D、[1,99] 14 下列数据类型中,占用内存最小的是(D). A、Integer B、Single C、Boolean D、Byte 15 VisualBasic是一种()程序设计语言.B A、过程式 B、非过程式 C、机器 D、低级 16 函数Int(10*Rnd)是在(A)范围内的整数. A、[0,9] B、[0,1] C、[1,9] D、[1,10] 17 以下合法的一组Visual Basic用户标识符是 C A、Sum 和 8abc B、a#x 和 Pi C、ForLoop 和 Total D、Const 和 DoWhile 第一套试题 一、选择题（每题2分，共30分） 1.在VB环境中，工程文件的扩展名是( C ) （A）.frm （B）.bas （C）.vbp （D）.frx 2.下面4项中不属于面向对象系统三要素的是( A ) （A）变量（B）事件（C）属性（D）方法 3. \、/、Mod、*这4个算述运算符中，优先级别最低的是( C ) （A）\ （B）/ （C）Mod （D）* 4.要使Print方法在Form_Load事件中起作用，要对窗体的( C )属性进行设置（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption 5.不论何控件，共同具有的属性是( B ) （A）Text （B）Name （C）ForeColor （D）Caption 6.要使Form1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A）Form1.Caption=“欢迎使用VB”（B）Form1.Caption=ˊ欢迎使用VBˊ（C）Form1.Caption=欢迎使用VB （D）Form1.Caption=〞欢迎使用VB〞 7.VB提供了结构化程序设计的3种基本结构，这3种基本结构是( D ) （A）递归结构，选择结构，循环结构（B）选择结构，过程结构，顺序结构 （C）过程结构，输入、输出结构，转向结构（D）选择结构，循环结构，顺序结构 8.给变量赋值a=123+MID(“123456”,3,2)，a变量中的值是( D ) （A）“12334”（B）123 （C）12334 （D）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是( D ) （A）If sex=“男”And age＜40 And InStr(duty,“教授”)＞0 Then n=n+1 （B）If sex=“男”And age＜40 And (duty=“教授”Or duty=“副教授”) Then n=n+1 （C）If sex=“男”And age＜40 And Right(duty,2)= “教授” Then n=n+1 （D）If sex=“男”And age＜40 And duty=“教授”And duty=“副教授” Then n=n+1 10.若要清除列表框的所有内容，可用来实现的方法是( C ) VB期末考试试题A卷 一、填空题 1、VB程序设计的主要特点是（1）和（2）。 2、在VB中，最主要的两种对象是（3）和（4）。 3、工程是构成应用程序文件的（5）。 4、方法是VB提供的一种（6），用来完成一定的操作。 5、浮点类型数据包括单精度型和___（7）__数据。 6、事件是窗体或控件对象识别的___（8）____。 7、可用窗体的___（9）_ 方法在窗体中显示文字。 8、复选框控件Value属性指示复选框处于____（10）___或禁止状态(暗淡的)中的某一种。 9、在VB中，修改窗体的（11）和（12）属性值，可改变窗体的大小。 10、双击工具箱中的控件图标，可在窗体的（13）出现一个尺寸为缺省值的控件。 11、在MsgBox函数中，如果缺省title参数，则使用（14）作为消息框的标题。 12、设x＝34.58，语句Print Format(x,“000.0”)的输出结果是（15）。 13、在VB 中，数值型变量的初值为（16），Varant型变量的初值为（17），布尔型变量的初值为（18）。 14、设置窗体的（19）属性，可在窗体上显示图片。 15、程序运行工程中，清除MP图片框中的图片应使用语句（20）。 二、选择题 1、菜单控件只包括一个事件，即（1），当用鼠标单击或键盘选中后按“回车”键时触发该事件，除分隔条以外的所有菜单控件都能识别该事件。 A、GotFocus B、Load C、Click D、KeyDown 2、滚动条控件(如图所示)的Max属性所设置的是（2）。 A、滚动框处于最右位置时，一个滚动条位置的Value属性最大设置值 B、单击滚动条和滚动箭头之间的区域时，滚动条中滚动块的最大移动量 C、单击滚动条的箭头区域时，滚动条中滚动块的最大移动量 D、滚动条控件无该属性 3、SQL 语句 Select * Form student 中的 *表示（3）。 A、所有记录 B、所有字段 C、所有表 D、都不对 4、以下选项中，不属于标签的属性是（4）。 A、Enabled B、Caption C、Default D、Font 5、要求改命令按钮显示的文本，应当在属性窗口中改变的属性是（5） 《VB程序设计》期末试卷 一、判断题（每题１分，共10分） （）１、设置属性的语句格式为：“对象名．属性名＝属性值”。 （）２、在窗体或模块文件中声明为Private的过程，只能被本窗体或模块中的过程所调用。（）３、ＶＢ的赋值语句只能给变量赋值。 （）４、在ＶＢ中，字符型常量应使用＂＃＂号将其括起来。 （）５、窗体大小只能通过鼠标拖动窗体边框来设置。 （）６、VB的Double类型数据，可以精确表示其数值范围内的所有实数。 （）７、若用户在键盘上按下一个键，则会产生一个Click事件。 （）８、罗马数制是进位计数制。 （）９、事件过程可以由用户事件触发执行，也可以由其他过程所调用。 （）１０、Do While条件.....Loop和DO Until Not条件.....Loop 两条循环语句，实现循环控制是等效的。 二、单项选择题。（每小题2分，共50分） （）1．设a=“Visual Basic”，下面使b=“Visual”的语句是 A. b=Left(a,6) B. b=Mid(a,1) C. b=Rigth(a,5,5) D. b=Left(a,1,6) （）2．在立即窗口中执行？9>=9，输出结果是 A．0 B．True C．False D. －1 （）3．语句Dim var1 As Boolean作用是:将var1定义为什么类型变量 A.单精度型 B. 整型 C. 布尔型 D.字符型 （）4．Int(—0.618*10)/10的值是 A.—0.7 B.—0.6 C. —1 D. —0.1 （）5．表达式2 + 8 * 6 / 4 Mod 2的值是 A.5 B.2 C.6 D.9 （）6．在VB中快捷键F4打开哪个窗口？ A. 资源管理器窗口 B. 属性窗口 C. 代码窗口 D. 立即窗口 （）7．函数Int( 64 * RND() )的值是在哪个范围内的整数？ A. [0,63] B. [0,64] C. [1,63] D. [1,64] （）8.下列叙述中正确的是 A. 只有窗体才是Visual Basic中的对象 B. 只有控件才是Visual Basic中的对象 C. 窗体和控件都是Visual Basic中的对象 D. 窗体和控件都不是Visual Basic中的对象 （）9.用于Visual Basic程序设计的控件在 A. 工具箱中 B.工具菜单中 C. 工程窗口中 D.工具栏上 （）10．Visual Basic程序中表示续行的字符是 A. ： B. _ C. \ D. ’ （）11．决定按钮显示内容的属性是 A. Text https://www.doczj.com/doc/b617936653.html, C. Caption D.BackStyle （）12．下列可以把图形文件c:\地鼠1.jpg装入窗体FORM1中的语句为 A. Form1.Picture= LoadPicture("c:\ 地鼠1.jpg") B. Form1.Handle = " c:\ 地鼠1 .jpg" C. Form1 = LoadPicture("c:\ 地鼠1.jpg") D. Form1 = " c:\ 地鼠1.jpg" （）13．设a、b、c为整型变量，执行以下程序后a、b、c的值是 a=1:b=2:c=3 a=b:b=c:c=a A.2 3 1 B.2 3 2 C.3 2 1 D.1 3 2 （）14．将数学表达式2 2* 5 ) ( cos e b a+ +写成Visual Basic的表达式，其正确的形式是 A.Cos (a+b) ^2+5*exp(2) B.Cos^2(a+b)+ 5*exp(2) C.Cos (a+b) ^2+5*ln(2) D.Cos^2(a+b)+ 5*ln(2) （）15．下列描述图片框和图像框区别，那条是错误的 A．图像框中显示图片一般用作背景 B．图片框有拉伸属性 VB程序设计编程考试题及答案 1.输入3个数，输出最大的数 Private Sub command1_click() Dim max For i = 1 To 3 n = Val(InputBox("输入第" & i & "个数")) If n > max Then max = n End If Next Print "三个数中最大的数是" ; max End Sub 2.有一元二次方程：aX2+bX+c=0，依次输入a，b，c，判断此方程是否有实根 Private Sub Command1_Click() Dim a, b, c, n a = Text1 b = Text2 c = Text3 n = b * b - 4 * a * c If n >= 0 Then Label4 = "方程有根" Else Label4 = "方程无根" End If End Sub 3.输入一个百分制的成绩，若大于等于60，则用消息框弹出，显示“恭喜！成绩通过！”， 若小于60，则弹出消息框，显示“抱歉！成绩没有通过！ Private Sub Form_Load() Text1 = "" End Sub Private Sub Command1_Click() Dim n n = Text1 If n > =60 Then Val (MsgBox("恭喜！成绩通过！")) Else Val (MsgBox("抱歉！成绩没有通过！")) End If End Sub 4.输入一年份，判断它是否为闰年，并显示有关信息。（判断闰年的条件是：年份能被4整 除但不能被100整除，或者能被400整除） Private Sub Command1_Click() Dim y% 【HNCE网上考试系统 v9.6】本套软件使用权属于：郑州大学 考试课程: 考试时间:100分钟考场:第一考场考试日期:2013.05.24 考号：姓名：剩余时间：99:42 保存交卷退出帮助 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 命令 B 命令 C 命令 D 命令 A B C D A B C D A B C D A B C D A B C D A B C D A B C D A 模块文件 B 件的属性 C 源文件 D 包含多个工程文件及属于该工程的其他文件 A 该窗体文件并没有被删除 B 窗体文件被删除 C 程仍然包含这个窗体 D A B C D A B C D A B C D A B C D A可以实现交换两个变量值，而S2不能 B 个变量值，而S1不能 C 现交换两个变量值 D 现交换两个变量值 A B C D A B C D A 过程调用后均不保存值 B 有变量都是Static型的变量 C 所有变量都是Private型的变量 D 所有变量都是非全局Public A 用Dim语句或Static语句声明的变量 B 明它的过程 C Static语句声明的 D 程执行完毕后就被释放了 A B C D A B C D A B C D A B C D 声明段 A B C D A B C D A B C D A B C D A B C D A B C D A 同 B Sub过程不可以 C 值，而Function过程能通过过程名返回值 D 或直接使用过程名调用，而 A工程中可以有多个窗体，但最多只能有一个窗体作为启动窗体 B 声明Public类型的变量来传递数据 C 大化、最小化或正常（保持设计时大小）等三种状态 D A 菜单 B 过程代码都放在窗体文件中 C 名必须相同 D 是设计阶段时显示的位置 中南大学现代远程教育课程（专科）考试复习题及答案 《VB程序设计与应用》 一、选择题：在每小题给出的四个选项中，只有一项是符合题目要求的，请把所选项前的字母填在 题后的括号内。 1. Visual Basic程序中分隔一行中各语句的字符是（）。[ ] A)‘ B): C)\ D)_ 2. 下列可作为Visual Basic的变量名的是（）。[ ] A: Filename B: A（A＋B）C: A%D D : Print 3. 要让菜单项无效，应将（）属性值设置为False。 [ ] A. Visible B. Enabled C. Moveable D. Checked 4. 以下过程是（）事件。 Prviate Sub Form_Load( ) …… End Sub [ ] A: 命令按钮的单击B: 命令按钮的装载 C; 窗体的装载D: 窗体的单击 5. Vb中描述文件扩展名的是（）属性。[ ] A: Drive B: Pattern C: FileName D: Path 6. 关于Visual Basic中事件的说法中，不正确的为（）。[ ] A)事件是由Visual Basic预先定义好的，能够被对象识别的动作 B)DblClick（双击）是Visual Basic中的一种事件 C)一个对象可以识别一个或多个事件 D)对于一个系统提供的对象可以识别哪些事件，需要程序员自己定义 7. 下列控件中可设置滚动条是（）。 [ ] A. 检查框（复选框） B. 框架 C. 文本框 D. 标签框 8. 在Visual Basic中建立一个空窗体，( )不会是其默认名。 [ ] A. Form1 B. Form2 C. Formx D. Form10 9. Const One&=1，则One为（）类型的常数。[ ] A)整型 B)字节型 大一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) V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… 如果要将窗体中的某个命令按钮设置成运行时无法显示，应该设置它的属性。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 能够获得一个文本框中被选取文本的内容的属性是。 以下属于Visual Basic合法的数组元素是。 设置命令按钮的属性时，只有将属性设置为1，Picture属性才有效，否则无效。 VB有三种工作模式，它们分别是___________模式。 下列函数中，________函数返回的值是数值型的。 类是对象的抽象，对象则是类的具体化。在窗体上建立的一个控件称为。 以下控件中没有Print方法是( ) 以下叙述中错误的是 ( ) A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）保存Visual Basic程序时，应分别保存窗体文件及工程文件 C）Visual Basic应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发 下列数组声明语句中的数组a包含了_________个数组元素。( ) Dim a(4,-1 to 1,0 to 3) 复选框的Value属性为0时，表示( ) 复选框的Value属性为2时，表示( ) 主过程通过参数传递将一个参数传递给子过程A，并能够通过参数传递返回一个结果，下列子过程的正确定义 以下不属于Visual Basic系统的文件类型是。 A）.frm B）.bat C）.vbg D）.vbp 按变量名的定义规则，是合法定义的变量名。 结构化程序由三种基本结构组成，下面属于三种基本结构之一的是_______ 执行以下程序段后，变量c$的值为________。 a$="Visual Basic Programming" 第一套试题 一、选择题(每题2分，共30分） 1.在ＶB环境中,工程文件的扩展名是( C ) (A）.frm (B)．baｓ（Ｃ）.vbp （D).ｆrx 2．下面4项中不属于面向对象系统三要素的是( A ) (A)变量（B)事件（C)属性（D）方法 3. \、/、Ｍod、*这4个算述运算符中，优先级别最低的是( Ｃ ) （A)＼ (Ｂ）/ （C）Mod (D）* 4.要使Pｒinｔ方法在Ｆoｒm_Load事件中起作用,要对窗体的( C )属性进行设置 （A）ＢackＣoｌor （B）ForeCoｌor （Ｃ）AｕtｏRｅdraｗ（D）Cａptｉon 5．不论何控件,共同具有的属性是（ B ) （A)Text (B)Naｍe （C）FoｒeColoｒ（Ｄ）Ｃaｐtｉoｎ 6.要使Ｆoｒm1窗体的标题栏显示“欢迎使用VB”，以下语句正确的是( D ) （A)Foｒm1.Capｔｉon=“欢迎使用ＶＢ”（B）Form1.Cａption＝ˊ欢迎使用VBˊ (C）Forｍ１．Caption=欢迎使用VB （D)Forｍ1．Caｐｔioｎ=〞欢迎使用ＶB〞 7.VＢ提供了结构化程序设计的３种基本结构，这3种基本结构是( D ) （Ａ)递归结构,选择结构,循环结构 (B)选择结构，过程结构，顺序结构 （C)过程结构,输入、输出结构，转向结构(Ｄ)选择结构,循环结构，顺序结构 8.给变量赋值a=1２3＋MＩD(“１23456”,３,２),a变量中的值是( D ) (A)“1２334”(B)1２3 (C）12334 （Ｄ）157 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句是( Ｄ ) (A）Ｉf sex=“男”And agｅ＜40 And IｎStｒ(duty,“教授”)＞0 Thｅn n=n+１ （B)If sｅx=“男”And age＜40 And (duty=“教授”Or dutｙ=“副教授”) Theｎｎ=n+1VB程序设计试题与答案-1资料
vb期末考试试题
VB程序设计期末考试复习题
VB程序设计期末模拟试卷
VB期末考试试题
《VB程序设计》考试题型练习 答案
VB考试题及答案
vb程序设计试题(含答案)
大学-VB期末考试试题
VB程序设计期末试卷
VB程序设计编程考试~题及答案~
VB期末考试模拟题1讲解
[整理]VB程序设计复习题及答案.
大一VB期末考试试卷及答案
VB程序设计试题及答案一
VB期末考试复习题目
vb程序设计试题(含标准答案)
相关主题
文本预览