《Visual Basic程序设计》课后习题
第一章VB程序设计概述习题
1.简述VB 6.0的主要特点。
2.Visual Basic 6.0有多种类型的窗口，若要在设计时看到代码窗口，应怎样操作？
3.叙述建立一个完整应用程序的过程。
4.当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。试问该工程涉及多少
个要保存的文件？若要保存该工程中的所有文件，应先保存什么文件，再保存什么文件？若不这样做，系统会出现什么信息？
5.Visual Basic
6. 0窗体设计器的主要功能是什么？
6.如何使用VB 6.0的帮助系统？
第二章VB编程基础习题
1.要判断在文本框中是否按下Enter键，应在文本框的（）事件中判断。
2.文本框中的Scrollbars属性设置了非零值，却没有效果，原因是（）。
3.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对（）属性
设置就有效。
4.要使控件在运行时不可显示，应对（）属性进行设置。
5.要使Forml窗体的标题栏显示“欢迎使用”语句应写为（）
6.不论任何控件，共同具有的属性是（）。
7.要使命令按钮不可操作，要对（）属性设置。
8.在窗体上建立了文本框对象Textl，可以通过（）事件获得输入键盘的KeyAscii码。
9.在新建工程时，使窗体上的所有控件具有相同的字体格式，应对（）的（）属性进
行设置。
第三章VB语言基础习题
1.下列哪些是VB的合法常量，分别指出其类型。
(1)100. 0(2)%100(3) 1E1 (5)123,456(6)0100(7) ASDF (9)#2000/10/7#(10)100#(11)
&0100
(14) T
2.把下列算术表达式写成VB表达式(4) 123D3
(8) "12345”
(12) &H123(13)true
10X+V3F,, s z …e10 +lnl0
（1）~XY~（2）\X + Y\ + Z5（3） Sin（45"） + ,（4）（1+XY）
11J X + P + I
3.根据条件写出相应的VB表达式
（1）产生“C”到“L”范围内的一个大写字符。visual basic pdf
（2）产生100到200 （包括100和200）范围内的一个正整数。
（3）取字符型变量S中从第五个字符起的6个字符。
（4）将变量X的值按四舍五入保留小数点后两位。
（5）将任意一个两位数X的个位数与十位数对换。
4，写出下列表达式的值
（1）123+23 Mod 10\7 + Asc（ "A” ）
(2)100+ “100” & 100
(3)Int (68. 55*100+0.5) /100
(4)已知A$= “87654321”，求表达式Vai (Left$ (A$, 4) +Mid$ (A$, 4, 2))的值。
第四章控制结构习题
1.求A、B、C三个数中的最大值(A、B、C为任意整数)。
2.计算S=1+1X2+1X2X3+1X2X3X4+....+ X 10
3.编一个程序，计算某个学生的奖学金等级是否为一等奖学金，以三门功课成绩ml、m2
和m3为评奖依据，奖学金一等奖评定标准如下：
(1)平均分大于95分。
(2)有两门成绩是100分，且第三门功课不低于80分。
4.输入一个数字(0-7)，显示对应的星期一至星期日。
5.求二次方程ax2+bx+c=0的实数根。
r
X2+l xXk
6.计算分段函数：y= \ … x-n
\ V A—U♦-
-1 x<(k
7.随机产生20个0—100之间的整数，求小于50的整数之和。
第五章数组习题
1.在VB6.0中，数组的下界默认为0，用什么语句可以重新定义数组的默认下界？
2.要分配存放12个元素的整型数组，下列数组声明(下界若无，按默认规定)哪些符合要求？
(1) n=12(2) Dim a%()
Di m a( 1 To n ) AS Integer n=ll
ReDim a(n)
⑶
D
im
a% [2, 3](4) Dim a(l, 1, 2 ) AS Integer
⑸D
im a% (10)(6) Dim a!()
ReDim a(l To 20)ReDim a(3 To 2) AS Integer
⑺Dim a% (2, 3)(8) Dim a(l To 3 ITo 4 ) AS Integer
3.已知下面的数组声明，写出它的数组名、数组类型、维数、各维的上下界、数组的大小、并按行的顺序列出各元素。
Dim a(-l To 2 , 3) As Intger
4，声明一个一维字符类型数组，有20个元素，每个元素最多放10个字符，要求：
(1)由随机数形成小写字母构成的数组，每个元素的字符个数由随机数产生，范围1〜10。
(2)要求将生成的数组分4行显示，规定每个元素宽度为10。
(3)显示生成的字符数组中字符最多的元素。
第六章过程习题
1、子过程和函数过程的异同点是什么？
2、什么是形参？什么是实参？
3、调用子过程或函数过程时，实参与形参的对应关系如何？应注意什么问题？
4、值传递与地址传递的选择及其特点是什么？
5、要使变量在某事件过程中保值，有哪几种变量声明的方法？
6、下面程序的输出结果是()
Private Sub commandlClick () ch=
〃ACBFDE〃 proc ch Print ch
End Sub
Private Sub proc (ch As String) S= 〃〃
For k=Len (ch) To 1 Step-1 s=s &
Mid (ch , k , 1)
Next k ch=s
End Sub
A)EDFBCA B) FEDCBA C) A D) F
7、在窗体上画一个名称为Commandl的命令按钮，并编写以下程序
Private Sub Command1_C1ick()
Print fun(〃ABCD〃)
End Sub
Function fun(st As String) As String stlen 二Len(st) 〃〃temp =
For k = 1 To stlen / 2
temp = temp + Mid(st, k, 1) + Mid(st, stlen - k + 1, 1) Next k fun = temp End Function
程序运行时，单击命令按钮，则窗体上显示的是—
A)ABCD B)ACBD C)ADBC D)BCAD
8、在窗体上画一个命令按钮，其名称为Commandl，然后编写如下程序：
Private Sub Commandl Click ()
Dim a(10) As Integer, x As Integer
For i = 1 To 10 a(i) = 8 + i
Next i
x = 1
Print a(f (x))
End Sub
Function f( ByRef x As Integer)
x = x + 3 f = x
End Function
程序运行后，单击命令按钮，输出结果为。
( )。
复选框
)o复选框被选中D单选按钮
A)12 B) 15 C) 16 D) 18
9、函数过程Fl的功能是：如果参数b为奇数，则返回值为1，否则返回值为0。以
下能正确实现上述功能的代码是()
A)Function Fl(b As Integer)
If b Mod 2 = 0 Then
Return 0
Else
Return 1
End If
End Function
B)Function Fl(b As Integer)
If b Mod 2 = 0 Then
Fl = 0
Else
Fl = 1
End If
End Function
C)Function Fl(b As Integer)
If b Mod 2 = 0 Then
Fl = 1
Else
Fl = 0
End If
End Function
D)Function Fl(b As Integer)
If b Mod 200 Then
Return 0
Else
Return 1
End If
End Function
10、编写一个过程，用来计算圆的面积。要求在主程序中用Inputbox语句输入任意圆的半径然后调用过程并输出圆的面积。
11、编写一个函数，用来计算圆的面积。要求在主程序中用Inputbox语句输入任意圆的半径然后调用函数并输出圆的面积。
12、编写一个过程，用来计算并输出S=l + l/2+l/3+•••+1/100的值。
13、编写求解一元二次方程ax2+bx+c=0的过程，要求a、b、c及解乂1、x2都以参数传送的方式与主程序交换数据，输入a、b、c和输出xl、x2的操作放在主程序中。
第七章用户界面设计习题
一、选择题：
1.下列控件中，没有Caption属性的是
A框架B列表框C
2.复选框的Value属性为1时，表示(
A复选框未被选中B
C复选框内有灰的勾D复选框操作有错误
3.用来设置粗体字的属性是（）o
A Fontltalic
B FontName
C FontBold
D FontSize
4.在用菜单编辑器设计菜单时，必须输入的项有（）o
A快捷键B标题C索引D名称
5.在下列关于菜单的说法中，错误的是（）。
A每个菜单项都是一个控件，与其他控件一样也有自己的属性和事件。
B 除了Click事件之外，菜单项还能响应其他如DblClick等事件。
C菜单项的快捷键不能任意设置。
D在程序执行时，如果菜单项的Enabled属性为False，则该菜单项变成灰，不能被用户选择。
6.在下列关于通用对话框的叙述中，孝误的是（）。
A CommonDialogl .ShowFont 显示字体对话框。
B在打开或另存为对话框中，用户选择的文件名可以经FileTitle属性返回。
C在文件打开或另存为对话框中，用户选择的文件名及其路径可以以FileName属性返回。
D通用对话框可以用来制作和显示帮助对话框。
7.以下正确的语句是（）。
A CommonDialog 1 .Filter =A11 Files|*.*|Pictures（*.bmp）|*.Bmp
B CommonDialog 1 .Filter ="A11 Files"|"*.*"|"Pictures（*.bmp）"|"*.Bmp"
C CommonDialog 1 .Filter = "All Files| *. * |Pictures（* .bmp）| * .Bmp"
D CommonDialogl.Filter = {All Files| *. *|Pictures（* .bmp） | * .Bmp）
8.在下面关于窗体事件的叙述中，错误的是（）。
A 在窗体的整个生命周期中，Initialize事件只触发一次。
B 在用Show显示窗体时，不一定发生Load事件。
C每当窗体需要重画时，肯定会触发Paint事件。
D Resize事件是在窗体的大小有所改变时被触发。
9.下面关于多重窗体的叙述中，正确的是（）o
A作为启动对象的Main子过程只能放在窗体模块内。
B如果启动对象是Main子过程，则程序启动时不加载任何窗体，以后由该过程根据不同情况决定是否加载或加载哪一个窗体。
C没有启动窗体，程序不能执行。
D以上都不对。
10.如果Forml是启动窗体，并且Forml的Load事件过程中有Form2.Show，则程序启动
后（）。
A发生一个运行时错误
B发生一个编译错误
C在所有的初始化代码运行后Forml是活动窗体
D 在所有的初始化代码运行后Form2是活动窗体
11.假定时钟控件的Interval属性为1000, Enabled属性为True，并且有下面的事件过程，
程序结束后变量X的值为（）o
Dim x As Integer
Private Sub Timerl_Timer（）
For i = 1 To 10
x = x + 1
Next i
End Sub
A 1000
B 10000
C 10 D以上都不对
12.当用户按下并且释放一个键后会触发KeyPress> KeyUP和KeyDown事件，这三个事件

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。