VB教材章后习题.doc

习题一1运行Visual Basic 6.0需要什么样的最小硬件环境?【答】只要能运行Windows 9x或Windows NT即可。2当正常安装Visual Basic 6.0后，误把Windows 98子目录删除。当重新安装Windows 98后，是否要再安装Visual Basic 6.0？【答】要再安装Visual Basic 6.0，因为安装Visual Basic 6.0时，有些VB程序系统自动安装在Windows 98子目录下，所以一旦删除了Windows 98子目录，就必须再次安装。3Visual Basic 6.0有学习版、专业版和企业版，怎样知道所安装的是哪个版本？【答】在启动Visual Basic 6.0的启动封面上，能显示对应的版本，见教材例1.1。4Visual Basic 6.0有多种类型的窗口，若想在设计时看到代码窗口，怎样操作？【答】执行视图代码窗口命令或“工程资源管理器”窗口的“查看代码”按钮。5如何使各窗口显示或不显示？【答】执行视图菜单的对应窗口命令，显示相应的窗口；关闭窗口则不显示该窗口。6叙述Visual Basic的特点。【答】见本章1.3小节“知识要点”习题二1叙述建立一个完整的应用程序的过程。【答】创建界面、设置属性、编写事件过程代码、保存并运行程序。2当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。问该工程涉及到多少个文件要保存？若要保存该工程中的所有文件，正确的操作应先保存什么文件？若不这样做，系统会出现什么信息？【答】涉及到两个文件，应先保存窗体文件（.frm），再保存工程文件（.vbp）。若是先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。3假定在Windows 98环境中，要保存工程文件时，若不改变目录名，则系统默认的目录是什么？【答】是VB98。4为了使一个控件在运行时不可见，应对该控件的什么属性进行何种设置？【答】将Visibla属性设为False。5为了防止用户编辑文本框的内容，应对该控件的什么属性进行何种设置？【答】将文本框的Locked属性设为True。6为了使标签框的大小由Caption属性的值进行扩展或缩小，应对该控件的什么属性进行何种设置？【答】将标签的AutoSize属性设为True。7VB 6.0提供的大量图形文件在哪个目录下？若你的计算机上没有安装，则怎样安装这些图形文件？【答】存放在Graphics目录下。直接在带有VB 6.0系统的CD上找到Graphics子目录，复制到硬盘的VB目录下。8在VB 6.0中，命令按钮的显示形式可以有标准的和图形的两种选择，这通过什么属性来设置？若选择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是Caption属性设置的文字，怎样改正？【答】按钮的Style属性设为Graphical。通过Picture属性来装入图形。不能显示图形是因为Style属性设成了Standard，只要改为Graphical即可，一般还要将Caption属性的值设置为空。9标签和文本框的区别是什么？【答】标签和文本框都可以在窗体上显示文字。区别在于：标签的内容在Caption属性内，在窗体上只能显示文字，不能编辑；文本框的内容在Text属性内，在窗体上可直接对其内容进行编辑。10当窗体上有3个文本框和1个命令按钮，若程序运行时，要求焦点定位在第三个文本框（Text3）处，应对何控件的什么属性进行何种设置？【答】对Text3控件进行Text3.TabIndex = 0的设置。11若要对窗体上的3个文本框输入数据，各控件焦点的移动可通过Tab键（系统本身具有的），也可以通过回车键，则要对文本框的什么事件编程？【答】对文本框的KeyPress事件编程。例如，当焦点在Text1时，输入数据按Enter键后，让焦点跳到Text2文本框。程序如下：Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenText2.SetFocus End IfEnd Sub12当某文本框输入数据后（按了回车键），进行判断认为数据输入错，怎样删除原来数据？怎样使焦点回到该文本框重新输入？【答】假定文本框的名称为Text1，则事件过程如下：Private Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 ThenIf 出错条件判断成立 ThenText1 = ”Text1.SetFocusEnd If End IfEnd Sub13当运行程序前，对某些控件设置属性值，除了在窗体中直接设置外，还可以通过代码设置，这些代码一般放在什么事件中？例如，程序要将命令按钮定位在窗体的中央，请写出事件过程。【答】这些代码一般放在Form_Load()事件过程中。将窗体定位在屏幕的中央，只能通过属性窗口对Form1窗口的StartUpPosition属性设置为2（表示屏幕中心），该属性不能放在运行时设置。要将按钮定位在窗体的中央，事件过程如下：Private Sub Form_Load()Command1.Left = Form1.ScaleWidth2Command1.Width2Command1.Top = Form1.ScaleHeight2Command1.Height2End Sub其中，ScaleWidth和ScaleHeight表示窗体的相对宽度和高度。习题三1【答】。2【答】。3【答】。4【答】。5【答】。6利用Shell()函数，在VB程序中分别执行画图和Word应用程序。【答】调用Shell()函数，形式为：Shell(”C:Program FilesAccessoriesMspaint.exe”,1)Shell(”C:Program FilesMicroSoft OfficeWinword.exe”,1)7Visual Basic提供了哪些标准数据类型？声明类型时，其类型关键字分别是什么？其类型符又是什么？【答】见教材P53表1.3.1。8哪种数据类型所需内存容量最少，且可存储例如3.2345这样的值？【答】单精度。9将数字字符串转换成数值，用什么函数？判断是否是数字字符串，用什么函数？取字符串中的某几个字符，用什么函数？大小写字母间的转换，用什么函数？【答】将数字字符串转换成数值，用Val函数；用IsNumeric()函数可判断是否是数字字符串；用Mid()函数取字符串中的某几个字符；用Ucase()函数将小写字母转换成大字母；用Lcase()函数将大写字母转换成小字母。10要使单精度变量x、y 、z分别保留1位、2位、3位小数点，并在窗体显示，使用什么函数？如何写对应的Print方法？【答】使用Format()函数，显示1位小数位：Print Format(x, ”0.0”)。显示2位小数位：Print Format(y, ”0.00”)。显示3位小数位：Print Format(z, ”0.000”)。习题四1指出下列赋值语句中的错误（包括运行时要产生的错误）。10x = Sin(x) + yc = 3 + sqr(-3)c + x + y = c * yx = Sin(x) / (20 Mod 2)【答】“10x”是一个非法的变量名。用负数开平方。左边为表达式。分母为零。2MsgBox作为函数使用时与InputBox的区别？各自获得的是什么值？【答】MsgBox返回所按按钮对应的值，InputBox返回文本框输入的值。3语句：If 表达式 Then 中的表达式可以是算术、字符、关系、逻辑表达式中的哪些？【答】可以是算术、关系、逻辑表达式。4指出下列语句中的错误。If x y Then print xIf 10 x = A and c = a and c =”。VB中表示x的范围“10x10 And x 20 Theny = x * x + 3 * x + 2 ElseIf x 20y = x * x + 3 * x + 2 Case Is y Then Max = x Else May = yIf z Max Then Max = z利用IIf函数：Max = Iif(x y ,x ,y)Max = Iif(Max z ,Max ,z)6计算下列循环语句的次数： For I = -3 To 20 Step 4 For I = -3.5 To 5.5 Step 0.5 For I = -3.5 To 5.5 Step 0.5 For I = -3 To 20 Step 0【答】 循环6次、循环体内I的值分别为：-3，1，5，9，13，17、出循环后I的值为21。 循环19次。 不循环。 循环无数次，无法终止。7下列3090为语句标号，分别标记该语句，第40句共执行了几次？第50句共执行了几次？第90句语句显示的结果是多少？30For J = 1 To 12 Step 340For K = 6 To 2 Step -250Mk = K60Print J,K70Next K80Next J90Print J,K,Mk【答】第40句是外循环的循环体，共执行了4次；第50句是内循环的循环体，共执行了12次；第90句语句显示的结果是：13 0 2 。8如果事先不知道循环次数，如何用For Next结构来实现？【答】将循环终值设置为一个非常大的值，然后在循环体内增加If语句，判断是否满足循环结束条件。形式如下：For 循环变量 = 1 To 非常大的数If 循环结束条件 Then Exit ForNext 循环变量9利用循环结构，实现如下功能： 分别统计1100中，满足3的倍数、7的倍数的数各为多少个？ 将输入的字符串，以反序显示。例如输入“ASDFGHJKL”，显示“LKJHGFDSA”。【答】 S = 0For I = 1 To 10S = S + (I + 1) * (2 * I + 1)Next IS3 = 0S7 = 0For I = 1 To 100If I Mod 3 = 0 Then S3 = S3 + 1If I Mod 7 = 0 Then S7 = S7 + 1Next IS = InputBox(“请输入字符串：”)For I = Len(S) To 1 Step -1Print Mid(S,I,1);Next I10下面程序运行后的结果是什么？该程序的功能是什么？Private Sub Command1_Click()Dim x$,n%n = 20x = Do While n 0a = n Mod 2n = n 2x = Chr(48 + a) & xLoopPrint xEnd Sub【答】运行后结果为10100，该程序的功能是将十进制数转换成二进制字符串。11下面程序运行后的结果是什么？该程序的功能是什么？Private Sub Command1_Click()Dim x%,y%,z%x = 242 : y = 44z = x * yDo Until x = yIf x y Then x = x - y Else y = y - xLoopPrint x,z/xEnd Sub【答】运行后结果为22和484，该程序的功能是用辗转相减法求x、y的最大公约数和最小公倍数。12利用随机函数产生20个50100范围内的随机数，显示它们的最大值、最小值和平均值。【答】Private Sub Command1_Click()Max = 50Min = 100Sum = 0For i = 1 To 20x = Int(Rnd * 51 + 50)Print x;If x Max Then Max = xIf x Max ThenMax = c(i,j) : Maxi = i : Maxj = jEnd ifNext jNext i 二维数组形式输出，必须通过两重循环。对于下三角形式比较简单，每一行总是从最左边开始输出，只要控制每一个元素的宽度即可；而对于上三角形式，则要控制每一行第一个元素输出的位置，这一般是通过Tab函数实现。输出下三角元素：For i = 1 To 4For j = 1 To iPrint a(i,j) ; Space(4 Len(a(i,j);Next jPrintNext i输出上三角元素：For i = 1 To 4For j = i To 4Print Tab(j * 4) ; b(i,j);Next jPrintNext i说明：Space(4Len(a(i,j)表示每个元素占4位，其中空格数目与实际数值位数有关。For i = 1 To 4t = a(1,i) : a(1,i) = a(3,i) : a(3,i) = tNext i 矩阵的对角线有主对角线和副对角线两条。Sum = 0For i = 1 To 4Sum = Sum + a(i,j) + a(i,5 - i)Next i 关键要找出两维数组各元素和一维数组各元素的关系。Dim a(3,3),d(15) For j = 0 To 3For i = 0 To 3k = j * 4 + id(k) = a(i,j)Next iNext j8声明一个有20个元素的一维字符类型数组，要求： 由随机数形成小写字母构成的数组，每个元素的字符个数由随机数产生，范围111。 要求将生成的数组分4行显示。 显示生成的字符数组中字符最多的元素。【答】 可利用随机函数产生长度不超过11个字符的字符串。Private Sub Command1_Click()Dim st(1 To 20) As String,c As String * 1Dim i%,n%For i = 1 To 20n = Int(Rnd * 11 + 1)For j = 1 To nc = Chr(Int(Rnd * 26 + 97)st(i) = st(i) & cNext jNext iEnd Sub 分4行显示，则每行显示5个数组元素，可利用Mod取余运算实现。考虑到每个数组元素的字符长度不等，需增加空格来对齐。字符数组生成后，实现输出的程序段如下：For i = 1 To 20Print st(i); Space(15 Len(st(i);If i Mod 5 = 0 Then PrintNext i 求最长的数组元素，程序段如下：maxlen = 0maxstr = “For i = 1 To 20If Len(st(i) maxlen Thenmaxlen = Len(st(i)maxstr = st(i)End ifNext iPrint maxlen, maxstr9自定义一个职工类型，包含职工号、姓名和工资。声明一个职工类型的动态数组。输入n个职工的数据，要求按工资递减的顺序排序，并显示排序的结果，每个职工一行显示3项信息。【答】（不作要求）。习题六1子过程和函数过程的异同点是什么？【答】子过程和函数过程的相同点：都是功能相对独立的一种子程序结构，它们有各自的过程头、变量声明和过程体。子过程和函数过程的不同点： 过程声明的关键字不同，子过程用Sub，函数过程用Function。 子过程名无值因而也无类型声明，函数过程名有值因而也有类型声明。 函数过程名兼做结果变量，因此，在函数过程体内至少要对它赋值一次；子过程名在子过程体内不能赋值。 调用方式不同，子过程是一句独立的语句，可用“Call 子过程名”或直接以子过程名调用；函数过程不是独立的语句，而是一个函数值，必须参与表达式的运算。 一般来说，函数过程可以改写成子过程，只要改变函数过程定义的形式，并在子过程的形参表中增加一个传址的形参来传递结果；反之，子过程就不一定能改写成函数过程。2什么是形参？什么是实参？【答】形参是在定义过程时的一种形式虚设的参数，只代表了在该过程中参数的个数、类型、位置，形参的名字可任意起，它没有任何值，只表示在过程体内进行的某种运算或处理。形参不能是常量、表达式或数组元素。实参是调用过程时使用的参数，它负责提供给过程形参初始值，或在过程体处理后获得结果。3调用子过程或函数过程时，实参与形参的对应关系如何？应注意什么问题？【答】调用时用实参代替形参，实参与形参的个数、位置、类型必须一一对应，但实参与形参名是否相同则无关紧要。4值传递与地址传递的选择及其特点是什么？【答】仅仅为了通过调用来获得初值，则应使用值传递；要将过程运算结果反馈给调用者，则必须用地址传递。调用时地址传递对应的实参不能是表达式或常量。能够用值传递实现的，尽量用值传递，减少过程间关联，有利于程序的调试。5在VB中，形参若是数组，不要说明数组元素个数，即以数组名和圆括号表示，在过程体内如何表示其数组的上、下界？【答】利用VB的内部函数Ubound和Lbound确定数组的上、下界。6在Form1窗体通用声明部分声明的变量，可否在Form2窗体的过程中被访问？【答】可以，只要是在Form1窗体通用声明部分用Public声明的变量，当它在Form2窗体的过程中被访问时，变量名前要加Form1.。7要使变量在某事件过程中保值，有哪几种变量声明的方法？【答】方法一，在标准模块（.bas）处用Public声明的变量；方法二，在某事件过程所在窗体的通用声明段中声明的变量；方法三，在某事件过程中用Static声明的变量。8指出下面过程语句说明中的错误。 Sub f1(n%) As Integer Function f1%(f1%) Sub f1(ByVal n%() Sub f1(x(i) As Integer)【答】 Sub子过程名指定了数据类型。 函数名与形参名相同。 形参n为数组，而且声明为ByVal值传递。 形参x(i)不允许为数组元素。9已知有如下求两个平方数和的fsum子过程：Public Sub fsum(sum%,ByVal a%,ByVal b%)Sum = a * a + b * b End Sub在事件过程中有如下变量声明：Private Sub Command1_Click()Dim a%,b%,c!a = 10 : b = 20则指出如下过程调用语句错误所在： fsum 3,4,5 fsum a,b,c fsum a + b,a,b Call fsum(Sqr(c),Sqr(a),Sqr(b) Call fsum c,a,b【答】 fsum子过程的第一个形参是地址传递，因此对应的实参不能是常量3。 fsum子过程的第一个形参是整型，对应的实参c是单精度，类型不匹配。 fsum子过程的第一个形参是地址传递，因此对应的实参不能是表达式a + b。 fsum子过程的第一个形参是地址传递，因此对应的实参不能是表达式Sqr(c)。 用Call语句调用fsum子过程，必须加圆括号括起实参。习题七1VB中的控件有几种？它们的区别是什么？【答】VB中的控件有三种：标准控件、ActiveX控件和可插入对象。标准控件也称为VB的内置控件，共有20个。它们始终出现在工具箱中，可以直接使用，而不需要加载，也不能把它们从工具箱中删除。ActiveX控件是四种ActiveX部件之一，由VB或第三方开发商提供的控件。ActiveX部件是可以重复使用的编程代码和数据，是由用ActiveX技术创建的一个或多个对象所组成。用户在使用之前需用“工程”菜单中的“部件”命令把它们加载到工具箱中，加载后可以像标准控件一样使用。一个Microsoft Excel工作表或者一个Microsoft Project日历都是可插入对象。因为这些对象能添加到工具箱中，所以可把它们当作控件使用。2“工程”菜单中的“部件”命令和“引用”命令有什么区别？【答】“工程”菜单中“部件”命令的作用是加载ActiveX控件，加载后工具箱中出现相应的图标。除了ActiveX控件之外，ActiveX部件中还有ActiveX.DLL和ActiveX.EXE，它们需要用“工程”菜单中的“引用”命令设置对对象库的引用。引用后工具箱中不显示相应的图标，但可以用“对象浏览器”查看其中的对象、属性、方法和事件。3框架的作用是什么？如何在框架中建立控件？【答】框架的作用是将窗体上其他类型的控件框起来，对窗体的各种功能进行分类，以便于用户识别。在使用框架（Frame）控件将同一个窗体上的单选按钮分组后，每一组单选按钮就都是独立的了，即在一组单选按钮中进行操作不会影响其他组单选按钮的选择。在窗体上创建框架及其内部控件时，必须先建立框架，然后在其中建立各种控件。在框架中创建控件时不能使用双击工具箱上工具的自动方式，而应该先单击工具箱上的工具，然后用出现的“+”指针，在框架内适当位置拖拽出适当大小的控件。如果要用框架将现有控件分组，则可先选定这些控件，将它们剪切到剪贴板，然后选定框架并将剪贴板上的控件粘贴到框架中。4有哪几种方法可以在列表框中添加选项？列表框中的选项在程序运行期间能否修改？【答】在两种方法可以对列表框添加选项：(1) 在设计状态，通过List属性进行设置。(2) 在程序中，用AddItem方法进行添加。在程序运行期间，列表框中的项目一般不需要修改。如果要修改，则应先用RemoveItem方法删除要修改的项目，再用AddItem方法添加新项目。5组合框有哪几种类型？能否用文本框加列表框实现组合框的功能？【答】组合框有三种类型：下拉式组合框（Style属性为0）、简单组合框（Style属性为1）和下拉式列表框（Style属性为2）。下拉式组合框和简单组合框允许用户在其文本框中输入不属于列表内的选项。组合框是综合了文本框和列表框的特性而形成的一种控件，可以用文本框加列表框实现组合框的功能。6如果要时钟控件每0.5min发生一个Timer事件，则Interval属性应设置为多少？【答】时钟控件是以Interval属性的值作为时间间隔激发计时器事件的。Interval的值以ms（0.001s）为单位，当Interval属性值为30000时，每0.5min发生一个Timer事件。7在VB中实现动画有哪几种方法？【答】在VB中实现动画的简单方法有两种：一是通过时钟控件连续播放图片达到动画效果；二是使用Animation控件播放无声的AVI文件。习题十5PictureBox控件和Image控件有什么区别？【答】PictureBox控件的主要作用是显示图片或作为其他控件的容器。Image控件只支持PictureBox控件的部分属性、事件和方法，只能显示图片，但不能作为容器放置其他控件。PictureBox控件的Autosize属性值为True时，能自动调整大小与显示的图片匹配；Autosize属性值为False时，若图形框不足以显示整幅图片，则裁剪图片以适应图形框的大小。Image控件的Stretch属性值为True时，图形自动调整尺寸，以适应图像框的大小；Stretch属性值为False时，图像框则自动改变大小，以适应其中的图形。6在Visual Basic中可使用哪些格式的图形文件？【答】Visual Basic中可处理的图形文件主要包括bmp、ico、wmf、jpg和gif等。7在程序运行时怎样在图形（像）框中装入或删除图形？【答】在程序运行时可使用LoadPicture()函数装入或删除图形。习题八1在设计时能否改变通用对话框的大小？如何在程序中显示通用对话框？【答】在设计状态，通用对话框控件以图标的形式显示在窗体上，其大小不能改变；在程序运行时，控件本身被隐含起来。要在程序中显示通用对话框，必须对控件的Action属性赋予正确的值。另一个调用通用对话框的更好的方法是使用Show方法来代替数字值。2如何自行设置通用对话框标题？【答】每个通用对话框都有默认的对话框标题，Dialo