vb各章习题
VB程序设计 习题及答案第4章 选择结构程序设计
第4章选择结构程序设计4．1 写出数学式|x|<2.5×10-2对应的Visual Basic表达式。
【答案】x<2.5e-2 and x>-2.5e-24．2 逻辑运算符And、Or和Not的优先级最高的是哪一个。
【答案】Not4．3 已知 W=10 X=9 Y=8 Z=7 ，求下列表达式的结果。
(1) W>X And Y<=Z OR X>Y(2) X>Z Or W=Y AND Y<X(3) Not (W>Y And X=Z)(4) Not (Y<>X Or W*3>Z)【答案】(1) True(2) True(3) True(4) False4．4 写出下列十进制整数逻辑运算的结果：(1) X = 23 And 14(2) X = 23 Or 14(3) X = -1 And 19(4) X = -1 Or 10(5) X = Not -1【答案】(1) 6(2) 31(3) 19(4) -1(5) 04．5 已知变量X和Y的值分别为5、6，编写程序，交换变量X和Y的值。
【参考答案】程序代码设计Private Sub Form_Click()x = 5: y = 6t = x: x = y: y = tForm1.Print "x="; x, "y="; yEnd SubPrivate Sub Form_Load()Form1.AutoRedraw = TrueForm1.Print "x = 5", "y = 6"Form1.Print "单击窗体交换x,y的值"图4-1 程序运行结果End Sub程序运行结果如图4-1所示：4．6 从键盘输入一个学生的三科成绩，计算总分，并找出最高分。
【参考答案】（1）用户界面设计（2）控件属性设置（略）（3）程序代码设计Private Sub Command1_Click()g1 = Val(Text1.Text)g2 = Val(Text2.Text)g3 = Val(Text3.Text)Var = (g1 + g2 + g3) / 3g = g1If g < g2 Then g = g2If g < g3 Then g = g3Text4.Text = VarText5.Text = gEnd Sub图4-2 程序运行结果程序运行结果如图4-2所示。
VB程序设计课后习题答案
VB课后习题解答第一、二章：1、简述VB6.0的主要特点答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。
2、当正常安装VB6.0后，误把Windows子目录删除。
当重新安装Windows后，是否需要再次安装VB6.0？答：要重新安装的。
因为安装VB6.0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6.0。
3、Visual Basic 6.0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？答：在VB6.0的启动界面上，能显示对应的版本。
4、叙述建立一个完整应用程序的过程答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程；保存应用程序；程序调试和运行。
5、Visual Basic 6.0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？答：选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。
6、当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。
试问该工程涉及多少个要保存的文件？若要保存该工程的所有文件，应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？答：涉及两个文件要保存。
先保存窗体文件（.frm），再保存工程文件（.vbp）。
若先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。
7、保存文件时，若不改变目录名，则系统默认的目录是什么？答：系统默认的目录是VB988、安装Visual Basic 6.0后，帮助系统是否也已安装？答：没有。
VB6.0的帮助系统在两张光盘上，即MSDN Library，其中还包含了VC、VFP等其他语言的帮助系统。
9、如何使用Visual Basic 6.0的帮助系统？答：最方便的方法是选定要帮助的内容，然后按F1功能键，这时系统打开MSDN Library查阅器，直接显示与选定内容有关的帮助信息。
VB教材课后习题答案
<大学程序设计基础-Visual Basic>教材课后习题答案第1章一、选择题1 2 3 4 5 6 7B D BC B B D第2章一、选择题1 2 3 4 5 6 7 8 9 10B C B C B C A A A A11 12 13 14A B A A二、填空题1.rem或’ _ ：2.“” # #3.5x2-3x-2sinA/34.3214565.300三、操作题1、程序段：Private Sub Command1_Click()Dim x As Integer, y As IntegerDim s As Long, c As Longx = Text1.Texty = Text2.Texts = x * yc = (x + y) * 2Label3.Caption = "长方形的面积为" + Str(s)Label4.Caption = "长方形的周长为" + Str(c)End Sub3、程序段：Private Sub Command1_Click()Text1.Text = "第一"End SubPrivate Sub Command2_Click()Text1.Text = "第二"End Sub4、程序代码：Private Sub Text1_Change()Text1.MaxLength = 10End Sub5、程序代码：Private Sub Text1_Click()Text1.SelStart = 0Text1.SelLength = Len(Text1.Text)End Sub第3章一、选择题1 2 3 4 5 6 7D A D B A D B二、填空题1. False2.B^2-4*a*c else三、操作题1．从键盘输入三个值，判断它们能否构成三角形的三个边。
如果能构成一个三角形，则计算三角形的面积。
VISUAL BASIC各章习题
visual basic测试题（一）一、选择题1、在一行语句内写多条语句时，每个语句之间用（）符号分隔。
A.，B.：C.、D.；2、一条语句要在下一行继续写，用（）符号作为续行符。
A.＋B.－C.＿ D.…3、下面（）是合法的变量名。
A.X＿yzB.123abcC.integerD.X－Y4、下面（）是不合法的整常数。
A.100B.&O100C.、&H100 D.%1005、下面（）是合法的字符常数。
A.ABC＄B.”ABC”C.ˋABCˊ D.ABC6、下面（）是合法的单精度型变量。
A.num!B.sum%C.xinte$D.mm#7、下面（）是不合法的单精度常数。
A.100!B.100.0C.1E＋2D.100.0D ＋28、表达式16/4–2^5*8/4MOD5\2的值为（）。
A.14B.4C.20D.29、数学表达式3≤x﹤10在VB中的逻辑表达式为（）。
A.3≤x﹤10B.3<=x AND x﹤10C.x>=3OR x﹤10D.3<=x AND﹤1010、\、/、Mod、*4个算术运算符中，优先级别最低的是（）。
A.\B./C.ModD.*11、与数学表达式ab/3cd对应，不正确的VB算术表达式是（）。
A.a*b/(3*c*d)B.a/3*b/c/dC.a*b/3/c/dD.a*b/3*c* d12、Rnd函数不可能为下列（）值。
A.0B.1C.0.1234D.0.000513、Int（198.555*100+0.5）/100的值（）。
A.198B.199.6C.198.56D.20014、已知A$="12345678",则表达式Val（Left$(A$,4)+Mid$(A$,4,2)）的值为（）。
A.123456B.123445C.8D.615、Msgbox函数返回值的类型是（）。
A.整型数值B.字符串C.变体D.数值或字符串16、InputBox函数返回值的类型是（）。
VB程序设计练习题附加答案
《VB程序设计》综合复习资料第一章Visual Basic程序设计概述一、填空题1、Visual Basic是一种面向__对象________的可视化程序设计语言，采取了事件驱动________的编程机制。
2、在VB中工程文件的扩展名是vbp__________，窗体文件的扩展名是___frm_________，标准模块文件的扩展名是__bas_________。
3、执行“工程”菜单下的_部件_________命令，可选择并添加ActiveX控件。
4、Visual Basic 6.0用于开发__ WINDOWS ________环境下的应用程序。
二、选择题1、下面不是VB工作模式的是（C）A．设计模式B．运行模式C．汇编模式D．中断模式2、可视化编程的最大优点是（C）A．具有标准工具箱B．一个工程文件由若干个窗体文件组成C．不需要编写大量代码来描述图形对象D．所见即所得3、下列不能打开属性窗口的操作是（C ）A．执行“视图”菜单中的“属性窗口”命令B．按F4键C．按Ctrl+TD．单击工具栏上的“属性窗口”按钮4、下列可以打开立即窗口的操作是（D）A．Ctrl+D B．Ctrl+E C．Ctrl+F D．Ctrl+G5、Visual Basic的编程机制是（D）A．可视化B．面向对象C．面向图形D．事件驱动三、简答题1、代码窗口主要包括哪几部分？2、在工程资源管理器窗口中，主要列出了哪三类文件？3、窗体布局窗口的主要用途是什么？4、VB的基本特点是什么？5、怎样理解可视化设计？6、怎要理解事件驱动编程？第二章简单的VB程序设计一、填空题1、设置是否可以用Tab键来选取命令按钮，应该用__ Tabstop ____________属性。
2、一个控件在窗体的位置由_______和________属性决定，其大小由__________和_________属性决定。
3、利用对象的属性setfocus可获得焦点，对于一个对象，只有其visible属性和____________属性为true，才能接受焦点。
VB习题解答
作用：在对象上输出信息 对象：窗体、图形框或打印机(Printer) ，省略对象在窗体上输出。 Spc(n)函数：插入n个空格，允许重复使用。 Tab(n)函数：左端开始右移动n列，允许重复使用。 ；(分号)：光标定位上一个显示的字符后。 ，(逗号)：光标定位在下一个打印区的开始位置处。 无 ；，时换行。 开始打印的位置是由对象的CurrentX和CurrentX属性决定， 缺省为打印对象的左上角0，0。 注意：Print方法在Form _Load事件过程中起作用，必须设置窗体的 AutoRedraw为True。
3.常用方法
[对象.]SetFocus：是把光标移到指定的文本框对象中。
4.文本框的应用 数据过滤
例2.7 要求输入合法的数字数据。当输入结束时（按Tab键），对于 输入正确的数据，显示正确信息；对输入的非数字数据，则响铃 (Beep)、显示错误信息、清除文本框中的内容，并使焦点重新回到文 本框。 • Text2_ LostFocus 当输入结束按Tab键时，该事件激发。 • IsNumeric(Text2)：判断是否输入非数字数据。 • Text2.SetFocus：使焦点重新回到文本框。
例2.3
控件设置
默认控件名 标题 有关属性设置 Name Caption 颜色、对齐、 Form1 MousePointer=99,MouseIcon=Key04.ico 鼠标属性例 左对齐 Alignment=0， BorderStyle =1 Label1 居中 Alignment=1，BorderStyle =1 Label2 自动 AutoSize=True， WordWarp=False， BorderStyle =1 Label3 背景白 BackColor= &H00FFFFFF&， BorderStyle =0 Label4 前景红 ForeColor= &H000000FF&， BorderStyle =0 Label5
VB1-5章练习题
VB1~5章练习题第一章一、单选题1.VB6.0集成开发环境可以（）A) 编辑、调试、运行程序，但不能生成可执行程序B）编辑、生成可执行程序、运行程序，但不能调试程序C）编辑、调试、生成可执行程序，但不能运行程序D）编辑、调试、运行程序，也能生成可执行程序2.英文“Visual”的含义是（）A）可视化B）集成C）结构化D）调试3.标准模块文件的扩展名是（）A）.frmB）.vbpC）.basD）.vbg4.与传统的程序设计语言相比，VB最突出的特点是（）A）结构化程序设计B）程序开发环境C）事件驱动编程机制D）程序调试技术5.VB6.0是（）应用程序的开发工具A）8位B）16位C）32位D）64位6.英文缩写“OOP”的含义是（）A）时间驱动的编程机制B）结构化程序设计语言C）面向对象的程序设计D）可视化程序设计二、简答题1.什么是对象的属性、事件和方法？三、编程题1.编写程序，并且有三个功能：①显示“欢迎使用VB6.0中文版”②清除之前显示的“欢迎使用VB6.0中文版”③退出此程序第二章一、单选题1.在Visual Basic中，下列优先级最高的运算符是（）A）*B）\C）<D）Not2.以下关系表达式中，其值为假的是（）A）”XYZ”<”XYz”B）”VisualBasic”=”visualbasic”C）”the”<>”there”D）”Integer”>”Int”3.在窗体上画一个命令按扭（名称为Command1），然后编写如下事件过程：Private Sub Command1_click()Dim b As Integerb = b + 1End Sub运行程序，第3次单击命令按扭后，变量b的值为（）A）0 B）1 C）2 D）34.在窗体上画一个命令按扭（名称为Command1），然后编写如下事件过程：Private Sub Command1_click()Static a As Integera = a + 1End Sub运行程序，第3次单击命令按扭后，变量a的值为（）A）0 B）1 C）2 D）35.在Visual Basic中，数值1234&的类型是（）A）整型B）长整型C）字符串型D）双精度型6.从键盘上输入2个字符串，分别保存在变量str1、str2中，则确定第2个字符串在第1个字符串中起始位置的函数是（）A）Left B）Mid C）String D）InStr7.设a = ”Visual Basic”，则以下使b = “Basic”的语句是（）A）b = Left(a,8,12)B）b = Mid(a,8,5)C）b = Right(a,8,5)D）b = Left(a,8,5)8.设a = 5,b = 10，则执行c = Int((b-a)* Rnd + a) + 1后，c的值为（）A）5~10B）6~9C）6~10D）5~99.以下声明语句中错误的是（）A）Const varl = 123B）Dim var2 = …ABC‟C）DefInt a-zD）Static var3 As Integer二、简答题1.下列哪些可作为Visual Baisc的变量名，那些不行？4*Delta Alpha 4ABC ABπReadData Filename A(A+B) C254D Read2.Visual Basic中是否允许出现下列形式的数？±25.74 3.457E-10 .368 1.87E+50 10^(1.256) D32 2.5E 12E3 8.75D+6 0.2583.把下面的数写成普通的十进制数：（1）2.65358979335278D-006 （2）1.21576654590569D+019（3）8.6787E+8 （4）2.567E-124.指出下列Visual Basic表达式中的错误，并写出正确的形式。
vb考试复习5章-6章习题
计第5章选择结构程序设-、选择题1.下列语句正确的是【】。
(多选)(A)IfX≠YThenPrint"X不等于Y"(B)IfX<>YThenPrint"X不等于Y"(C)IfX><YThenPrint"X不等于Y"(D)IfX=YPrint"X不等于Y"2.下列语句正确的是【】。
(A)IfA≥BThenT=AA=BB=T(B)IfA≥BThenT=A;A=B;B=T(C)IfA>=BThenT=AA=BB=T(D)IfA>=BThenT=A:A=B:B=T3.下列语句正确的是【】。
(A)IfX<3*YAndX>YThenY=X^3(B)IfX<3*YAndX>YThenY=X3(C)IfX<3*Y:X>YThenY=X^3(D)IfX<3*YAndX>YThenY=X**34.关于语句Ifx=lTheny=1,下列说法正确的是【】。
(A)x=1和y=1均为赋值语句(B)x=1和y=1均为关系表达式(C)x=1为关系表达式,y=1为赋值语句(D)x=1为赋值语句,y=1为关系表达式5.执行以下语句后显示结果为【】。
DimxAsIntegerIfxThenPrintxElsePrintx-1(A)1(B)O(C)一1(D)不确定6.如果X的值小于或等于Y的平方,则打印"OK",表示这个条件的单行格式If语句是【】。
(A)Ifx<=y2ThenPrint"OK"(B)Ifx<=y^2Print"OK"(C)Ifx<=y^2Then"OK"(D)Ifx<=y^2ThenPrint"OK"7.如果A为整数且|A|=100,则打印"OK",否则打印"Error",表示这个条件的单行格式If语句是【】。
VB1-3章_习题答案(课本习题)
VB习题答案（1-3章）习题一一、选择题1．C 2.C 3.A 4.C 5.C 6.C 7.B二、填空题1.学习版、专业版、企业版2.窗体界面3.Alt+F4三、简答题1．简述Visual Basic语言的特点。
Visual Basic是Windows操作平台下的可视化编程语言，它继承和发展了BASIC语言的基本功能，具有简单易学、功能强大等特点。
Visual Basic提供了可视化设计工具，以图形用户界面（GUI）为PC机用户提供了一个直观的工作环境。
支持面向对象的程序设计（OOP），采用事件驱动方式，提供对象的链接与嵌入（OLE）和访问数据库等功能。
2. Visual Basic 6.0的集成开发环境由哪些部分组成，各部分的主要功能是什么？1. 标题栏：用来显示打开的工程名称和系统的工作状态。
2. 菜单栏：菜单栏中包括“文件”、“编辑”、“视图”、“工程”、“格式”、“调试”、“运行”、“查询”、“图表”、“工具”、“外接程序”、“窗口”和“帮助”共有13个菜单项。
这是一组下拉式菜单，提供了设计、编辑、编译和调试应用程序所需要的绝大部分功能和命令。
3. 工具栏： Visual Basic 6.0提供了“编辑”、“标准”、“窗体编辑器”和“调试”4种工具栏。
工具栏上形象直观的排列着一些最常用的命令按钮，对应特定的常用操作命令。
4. 控件箱：控件箱提供了一组控件。
设计界面时，用户可以用鼠标双击控件箱中的控件，在窗体中画出该控件，或用鼠标单击控件箱中的控件，然后在窗体中拖动鼠标画出所需的控件。
5. 窗体设计器：窗体设计器是应用程序最终面向用户的窗口。
各种控件、图形、数据以及程序的运行结果都在窗体设计器窗体中显示出来。
6. 工程资源管理器：在工程资源管理器窗口中（图1-2），列出了应用程序的工程以及工程中的窗体和模块。
7. 属性窗口：属性窗口主要用来设置Visual Basic窗体及各控件的属性特征，属性窗口的主体部分分为左右两列，左边是控件的属性名列表，右边是控件的属性值列表。
VB习题
第一章 VB基础知识一、单选题1.若属性窗口没有出现在Visual Basic6.0集成开发环境中，可使用（）菜单中的相应命令将其打开。
A. 工程B. 视图C. 调试D. 工具2.英文的“Visual”的含义是（）A. 集成B. 标准C. 可视化D. 调试3.不能打开属性窗口的操作是（）。
A. 单击工具栏的“属性窗口”按钮B. 选取“视图”菜单中的“属性窗口”子菜单项C. 在对象上单击右键，从弹出的快捷菜单中选择“属性窗口”D. 选取“工程”菜单中的“属性窗口”子菜单项4.不能打开代码窗口的操作是（）。
A. 右键单击窗体窗口，在弹出的快捷菜单中选择“查看代码”B. 选择“视图”下拉菜单中的“代码窗口”C. 双击窗体窗口的任何地方D. 按下F4键16. VB应用程序中，扩展名为.vbp的文件是（）。
A. 标准模块文件B. 工程模块文件C. 窗体模块文件D. 类模块文件17. 以下不能在“工程资源管理器”窗口中列出的文件类型是（）。
A. .basB. .vbpC. .frmD. .ocx18. 窗体文件的扩展名是（）。
A．.frm B．.vbp C. .bas D. .frx20. 关于Visual Basic事件的说法中，不正确的为（）。
A．事件是由Visual Basic预先定义好的，能够被对象识别的动作B．DblClick(双击)是Visual Basic中一个事件C．一个对象可以识别一个或多个事件D．一个对象可以识别哪些事件，需要由程序员自己决定21. 在VB6.0中的每一个对象都有自己的属性、方法和（）。
A．控件B．函数C. 事件D.公用过程22. 以下说法错误的是（）。
A. 事件是由Visual Basic预先设置好的、能够被对象识别的动作B. 当对象响应某个事件后，对象所执行的操作将通过一段程序代码来实现，这段程序代码称为事件过程C. 一个对象对应一个事件，一个时间对应一个事件过程D. 事件过程的一般格式为：Private Sub 对象名称_事件名称（）事件响应程序代码End Sub23. 以下说法错误的是（）。
vb考试复习3章-4章习题-推荐下载
(C)5
12. 表达式Val(".123E2CD")的值是【 】。
(D).05
(A).123
(B)123
(C)O
13. Variant是一种特殊的数据类型,除了【
(D).123E2CD 】和【 】类型外,可以包含任何种类的数据。
(A)固定长度字符串
(B)字节
(C)实型
(D)单精度
(E)可变长度字符串
(C)类模块的声明段中
(D)任何事件过程中
25. Q的值为2时,表达式-Q^4 的值是【 】;Q的值为-2时,表达式-Q^4 的值是【 】。
(A)16
(B)-16
(C)8
26. 表达式(7\3+1)*(18\5-1) 的值是【
(D)-8 】。
(A)8.67
(B)7.8
(C)6
27. 表达式5^2 Mod 25\2^2 的值是【
第3章 Visual Basic程序设计代码基础
一. 选择题
1. 下列【 】字符不属于Visual Basic字符集。
(A)A
(B)#
(C)巳
(D)@
2. 以下不合法的常量是【 】。
(A)1O^2
(B)100
(C)100.0
(D)1OE+01
3. Visual Basic允许的常量有【 】。(多选)
符号开头。
(A)$E
(B)$H
(C)&O
(D)&H
7. \、/、Mod、* 四个算术运算符中,优先级最低的是【
】。
(A)＼
(B)/
(C)Mod
(D)*
8. 以下【 】是字符串常量, 【 】可以作为字符串变量。
vb练习题(含答案)
___B___ 。
A ． 设计流程和编写代码
B． 设计界面和编写代码
C． 设计算法和编写代码
D． 设计程序和编写代码
44．在 VB 6.0 中， 12345& 的数据类型是（ B）
A ． 整数型
B ． 长整数型 C． 字符常数 D． 双精度常数
45．在 VB6.0 中，语句 Dim M1#,Abc,Xyz As Single 定义的 M1 、 Abc 和 Xyz 的类型分别是（ D ）
20、在程序代码中将图片文件 mypic.jpg 装入图片框 Picture1 的语句是 ______。
(A)Picture1.Picture="mypic.jpg"
(B)Picture1.Image="mypic.jpg"
(C)Picture1.Picture=LoadPicture("mypic.jpg")( 对 )
A. 对象、属性、事件、方法
B. 对象、属性、方法、事件
C. 属性、对象、事件、方法
D. 属性、对象、方法、事件
3、对象的特征和状态特征称为？（
C）
A. 事件
B. 方法
C. 属性
D. 类
4、下面哪一个属性用来标识对象的名称？（ D ）
A. Caption
B. Value
C. Text
D. Name
5、下列哪个符号是合法的变量名 ? （ A ）
A. 字符串类型
B. 日期类型
C. 逻辑类型
D. 指针类型
8、表达式 Left( “Visual ”,3)+Lcase( “AB ”)的值是？（ C）
A. visAB
VB教材习题_参考答案1-6章
Visual Basic程序设计教程（李杰主编清华大学出版社 2011.2）习题答案习题2参考答案2.2 单选题1、B2、C3、A4、D5、A6、B7、D8、C9、B 10、D2.3 填空题1、事件驱动2、Cancel3、Name4、Private Sub Form1_Click()5、运行程序6、代码窗口7、Text1.Text = "我是一个学生"8、LostFocus()事件9、Label1.Caption = "请输入用户名"Label1.ForeColor = vbGreen10、(Text1.Text)*22.4 事件练习题1、①该事件的对象是标签Label1，单击标签触发该事件。
②缺省Label1对象的代码是针对窗体，其余有Label1对象的代码是针对标签的。
③Label1.AutoSize = True语句使标签的大小自动随文字的多少而改变。
2、程序运行后，单击命令按钮，在Text1文本框显示"知音海外版"，在Text2文本框显示"计算机世界"。
3、单击“显示文本框”命令按钮触发的事件过程Private Sub Command1_Click()Text1.Visible = TrueText1.ForeColor = vbRedText1.Text = "VB程序设计"End Sub单击“隐藏文本框”命令按钮触发的事件过程Private Sub Command2_Click()Text1.Visible = FalseEnd Sub习题3参考答案3.2 单选题1 C2 C3 D4 B5 B6 B7 B8 C9 D3.3填空题1.REM(或‘) _ ：2 双引号（“”）#3 $ %4 UCASE()5.(log(1+d*d)-exp(2))^(5/2) [ 还有一种理解方式：(log(1+d*d)-e*e)^(5/2)]6. &O113 &H4B习题4参考答案4.2 单选题BDCBD4.3 填空题1.MsgBox("是否删除？ ", vbOkCancel + vbQuestion, "删除")2.The Length of 12345=53. 变量或表达式4. 15. loop4.4 程序设计题1.Private Sub Command1_Click()If Text1.Text = "asdf" ThenMsgBox "密码正确！"ElseMsgBox "密码错误", vbRetryCancel, "错误"End IfEnd Sub2. < 题目中的“连续产生n*n个字母”应该改为“连续产生n个字母”> Private Sub Command1_Click()Dim n%, y%, i%n = Val(Text1.Text)If n > 10 Or n<=0 ThenMsgBox "数据超界！"Text1.Text=””Text1.SetFocusElsey = Int((90 - 65 + 1) * Rnd) + 65For i = 1 To nPrint Chr(y + i)Next iEnd IfEnd Sub3．Private Sub Form_Click()Dim a!, b!, c!, x1!, x21, d!a = Val(Text1.Text)b = Val(Text2.Text)c = Val(Text3.Text)d = b * b - 4 * a * cIf d >= 0 Thenx1 = (-b + Sqr(d)) / (2 * a)X2 = (-b - Sqr(d)) / (2 * a)Print x1; X2ElsePrint "没有实根"End IfEnd Sub4.Private Sub Form_Click()Dim i%, j%, s%, n%,q%n = InputBox("enter n:")q = 0For i = 1 To ns = 0For j = 1 To is = s + jNext jq = q + sNext iPrint qEnd Sub5.Private Sub Form_Click()Dim i%, j%, n%, k%n = 0For i = 1 To 3For j = 1 To 3For k = 1 To 3Print i & j & k,n = n + 1If n Mod 5 = 0 Then PrintNext kNext jNext iPrintPrint "n="; nEnd Sub6.Private Sub Form_Click()Dim i%, j%, n%, k%For i = 1 To 9For j = 0 To 9For k = 0 To 9n = i * 100 + j * 10 + kIf n = i ^ 3 + j ^ 3 + k ^ 3 Then Print n,Next kNext jNext iEnd Sub习题5参考答案5.2 单选题1 A2 B3 C4 C5 D6 D7 A8 C9 D 10 A 11 A 12 B 5.3 填空题1．False2．Caption3．0 ListCount-14．Print List1.List(3)5．Combo1.ReMoveItem 36．LargeChange7．Timer8．5009．Shape10．Borderstyle5.4 程序设计题1．Dim op1, op2, result As SingleDim operator As IntegerPrivate Sub Command1_Click(Index As Integer)If Index >= 0 And Index <= 10 ThenIf txt1.Text = "" Thentxt1.Text = CStr(Index + 1)Elsetxt1.Text = txt1.Text + CStr(Index + 1) End IfEnd IfIf Index >= 12 And Index <= 15 Thenop1 = CDbl(txt1.Text)operator = Indextxt1.Text = ""End IfIf Index = 11 Thenop2 = CDbl(txt1.Text)Select Case operatorCase 12result = op1 + op2Case 13result = op1 - op2Case 14result = op1 * op2Case 15result = op1 / op2End Selecttxt1.Text = CStr(result)End IfEnd SubPrivate Sub Command2_Click()op1 = 0op2 = 0result = 0txt1.Text = ""End SubPrivate Sub Command3_Click()EndEnd Sub2．Private Sub chkBold_Click()If chkBold.Value = vbChecked ThenTxt1.FontBold = TrueElseTxt1.FontBold = FalseEnd IfEnd SubPrivate Sub chkUnderline_Click()If chkUnderline.Value = vbChecked Then Txt1.FontUnderline = TrueElseTxt1.FontUnderline = FalseEnd IfEnd SubPrivate Sub Opt18_Click()Txt1.FontSize = 18End SubPrivate Sub Opt22_Click()Txt1.FontSize = 22End Sub3．Private Sub Form_Load()List1.AddItem "上海"List1.AddItem "北京"List1.AddItem "天津"List1.AddItem "广东"List1.AddItem "辽宁"List1.AddItem "陕西"List1.AddItem "河南"List1.AddItem "深圳"List1.AddItem "四川"List1.AddItem "重庆"End SubPrivate Sub List1_DblClick()For i = 0 To 9If List1.ListIndex = i ThenList2.AddItem List1.List(i)List1.RemoveItem iEnd IfNext iEnd Sub4．Private Sub Command1_Click（）Timer1.Enabled=TrueTimer1.Tag=Text1.Text*60Frame1.Caption=“现在开始倒计时”End SubPrivate Sub Timer1_ Timer（）Timer1.Tag=Timer1.Tag-1If m<0 ThenTimer1.Enabler=FalseMsgBox“预定的时间到了！”，0，“倒计时”Frame1.Caption=“请输入计时的分钟数：”Text1.Text=0Exit SubEnd Ifn1=Format（m Mod 60,“00”）n2=Format（m \ 60）Mod 60,“00：”）n3=Format（m \ 3600）,“00：”）Text1.Text=n3&n2&n1End Sub习题6参考答案6.1单选题1.C2.C3.B4.B5.B6.D7.B8.B9.A 10.A6.2 填空题1.Option Base 12.变体类型3.preserve (注意：教材上面写成perserve, 教材错误)4.Variant变体类型5.96.相同，索引号7.1）.通过复制粘贴的方式创建控件数组2）.在设计时候添加多个同类型的类型控件，然后通过“属性”窗口将这些控件的名称改为相同，并把Index属性设为不同的下标值。
VB习题(一～六)
习题一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子目录，就必须再次安装。
3．Visual Basic 6.0有学习版、专业版和企业版，怎样知道所安装的是哪个版本？【答】在启动Visual Basic 6.0的启动封面上，能显示对应的版本，见教材例1.1。
4．Visual Basic 6.0有多种类型的窗口，若想在设计时看到代码窗口，怎样操作？【答】执行[视图][代码窗口]命令或“工程资源管理器”窗口的“查看代码”按钮。
5．如何使各窗口显示或不显示？【答】执行[视图]菜单的对应窗口命令，显示相应的窗口；关闭窗口则不显示该窗口。
6．叙述Visual Basic的特点。
【答】见本章1.3小节“知识要点”习题二1．叙述建立一个完整的应用程序的过程。
【答】创建界面、设置属性、编写事件过程代码、保存并运行程序。
2．当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。
问该工程涉及到多少个文件要保存？若要保存该工程中的所有文件，正确的操作应先保存什么文件？若不这样做，系统会出现什么信息？【答】涉及到两个文件，应先保存窗体文件（.frm），再保存工程文件（.vbp）。
若是先保存工程文件，系统也会先弹出“文件另存为”对话框，要求先保存窗体文件。
3．假定在Windows 98环境中，要保存工程文件时，若不改变目录名，则系统默认的目录是什么？【答】是VB98。
4．为了使一个控件在运行时不可见，应对该控件的什么属性进行何种设置？【答】将Visible属性设为False。
vb课后习题参考答案
vb课后习题参考答案第一章习题参考答案一、填空题1、对象事件驱动2、编译运行模式解释运行模式二、简答题1、简述VB的特点。
答：①可视化的程序设计方法②面向对象的程序设计思想③事件驱动的编程机制④结构化的程序设计语言⑤高度的可扩充性⑥强大的数据库访问能力⑦支持动态数据交换⑧支持对象链接与嵌入2、简述VB的安装过程。
答：①向光驱中放入VB安装光盘；②计算机将运行自动安装程序，若没有，执行VB目录下的Setup.exe；③根据提示逐一回答问题，并点击“下一步”；④点击“完成”；2、如何启动VB。
答：三种方法：①单击“开始”按钮，选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击；②双击桌面上的VB6.0快捷图标；③在“开始”菜单的运行对话框中输入命令来启动VB；第二章习题参考答案一、选择题：1-10、DCACD BCBBC11-20、BADCA BBAAB21-29、AACBB CDDC二、填空题1．窗体、控件2．属性值3．属性窗口设置、代码窗口设置4．事件过程5．对象名、下划线、事件名6．Form_Click第三章习题参考答案一、选择题1、B2、C3、A4、B5、A6、C7、C二、填空题1、11字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。
String、Byte、Integer、Long、Single、Double、Currency、Boolean、Date、Object、Variant2、双引号(英文)、#3、ASCII、1、25、&、+、+6、Now()、Time、日期型三、解答题1、(3)2、(1 )3、（1）常量（关键字）（2）字符型常量（3）逻辑型常量（4）变量（5）字符串常量（6）变量（7）字符串常量（8）变量（9）日期型常量（题目应是#11/16/1999#）（10）数值型常量（单精度）4、315、（1）(1+y/x)/(1-y/x) （2）x^3+3*x*y/(2-y)（3）sqr(abs(a*b-c^3)) （4）sqr(s*(s-a)*(s-b)*(s-c))6、7、（1）13 （2）17（3）#1999-11-12# （4）zxy123ABC8、（1）19 （2）8.16666666666667（3）5．25 （4）29、（1）-4 （2）2 . 82842712474619 （3）-3 （4）49 （5）”hello” （6）He7）16 （8）“-459.65” （9）510、（4）11、（2）12、（4）第四章习题参考答案一、选择题：1—7: DAABBCD二、填空题1．500.00%2．将字号扩大为原来的二倍3． B三、编程题（略）1．文本框、标签和命令按钮的名称分别为text1、label1、command1Private Sub Command1_Click()Label1.caption=text1.textCommand1.caption=text1.textEnd Sub2．单价、数量、折扣和应付款对应的文本框的名称分别为：text1、text2、text3和text4，计算和清除命令按钮的名称分别为：command1和command2。
vb课后练习答案习题解答（2）
vb课后练习答案习题解答（2）第2章基本数据类型与表达式2．1 填空题1．程序设计语言中（）是语言的最基本符号，（）是具有语法意义的最小语法单位。
答案：字符、单词2．（）用于标记用户自定义的常量、类型、变量、控件、过程、函数等名字。
答案：标识符3．整型数据占（）字节的内存空间。
长整型数据占（）个字节的内存空间。
单精度浮点型数据占（）个字节的内存空间。
双精度浮点型数据占（）个字节的内存空间。
日期型数据占（）个字节的内存空间。
答案：2、4、4、8、84．100% 表示100为（）型数据；100！表示100为（）型数据；100＠表示100为( )型数据.答案：整、单精度浮点、货币5．符号常量在某一过程中说明，则该符号常量只能在（）内有效。
答案：该过程内6．若一个整型变量说明了之后没有给它赋值，则它的值为（）。
答案：07．在VB中可以把类型说明符放在变量名的（）来说明变量的类型。
答案：末尾8．为了使VB的编译程序自动检查变量声明，遇到未经说明的标识符发出错误警告信息，在程序中要加上（）语句。
答案：Option Explicit9．对含有多种运算的表达式，各种运算之间的顺序为（）→（）→（）→（）。
答案：函数运算、算术运算、关系运算、逻辑运算10．把1234.567的小数部份四舍五入转换为整数，可使用函数（）。
答案：Cint(1234.567)11．将x四舍五入到百位（例如，若x=23874.52应舍入成23900），可使用表达式（）。
答案：Int(x / 100 + 0.5) * 10012．将x从十位截断（例如，x=23874.52应截成23800）可使用表达式（）。
答案：Fix(x / 100) * 100或者Int(x/100)*100或者Cint(x\100-0.5)*10013．设X为数值变量，求X的常用对数可使用的表达式是（）。
答案：Log(X)/Log(10)14．要从字符串“Visual BASIC 6.0”中截取子字符串“BASIC”可使用函数（）。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
第一章Visual Basic程序设计概述一、选择题1.Visual Basic是一种面向对象的可视化程序设计语言，采用了___A___的编程机制。
（A）事件驱动（B）按过程顺序执行（C）从主程序开始执行（D）按模块顺序执行2.在Visual Basic中最基本的对象是___C_____，它是采用程序的基石，是其它程序的容器。
（A）文本框（B）命令按钮（C）窗体（D）标签3.多窗体程序是由多个窗体组成。
在缺省情况下，VB在应用程序执行时，总是把____D____指定为启动窗体。
（A）不包含任何控件的窗体（B）设计时的第一个窗体（C）包含控件最多的（D）命名为Form1的窗体4.有程序代码如下：Text1.Text = ＂Visual Basic＂则：Text1,Text和＂Visual Basic＂分别代表_____C___。
（A）对象，值，属性（B）对象，方法，属性（C）对象，属性，值（D）属性，对象，值5.Visual Basic是一种面向对象的程序设计语言，_____A___不是面向对象系统所包含的三要素。
（A）变量（B）事件（C）属性（D）方法6.Visual Basic的一个应用程序至少包含一个____B____文件，该文件存储窗体上使用的所有控件对象和有关的________、对象相应的________过程和________代码。
（A）模块、方法、事件、程序（B）窗体、属性、事件、程序（C）窗体、程序、属性、事件（D）窗体、属性、事件、模块7.以下不属于Visual Basic的工作模式是_____A___模式。
（A）编译（B）设计（C）运行（D）中断8.在VB集成环境创建VB应用程序时，除了工具箱窗口、窗体中的窗口、属性窗口外，必不可少的窗口是___C_____。
（A）窗体布局窗口（B）立即窗口（C）代码窗口（D）监视窗口9.保存新建的工程时，默认的路径是___B_____。
（A）My Documents （B）VB98 （C）\ （D）Windows10.将调试通过的工程经“文件”菜单的“生成.exe文件”编译成.exe后，将该可执行文件拿到其他机器上不能运行的主要原因是________。
（A）运行的机器上无VB系统（B）缺少.frm窗体文件（C）该可执行文件有病毒（D）以上原因都不对11.对于窗体，下面________属性在程序运行时是其属性设置起作用。
（A）MaxButton （B）BorderStyle （C）Name （D）Left12.要使Print方法在Form_Load事件中起作用，要对窗体的________属性进行设置。
（A）BackColor （B）ForeColor （C）AutoRedraw （D）Caption13.若要使标签控件显示时不覆盖其背景内容，要对________属性进行设置。
（A）BackColor （B）BorderStyle （C）ForeColor （D）BackStyle14.若要使命令按钮不可操作，要对________属性设置。
（A）Enabled （B）Visible （C）BackColor （D）Caption15.文本框没有________属性。
（A）Enabled （B）Visible （C）BackColor （D）Caption16.不论何控件，共同具有的是________属性。
（A）Text （B）Name （C）ForeColor （D）Caption17.要使Form1窗体的标题栏显示“欢迎使用VB6”，以下________语句是正确的。
（A）Form1. Caption = “欢迎使用VB6”（B）Form1. Caption = `欢迎使用VB6`（C）Form1. Caption =欢迎使用VB6（D）Form1. Caption = ＂欢迎使用VB6＂18.要使某控件在运行时不显示，应对________属性进行设置。
（A）Enabled （B）Visible （C）BackColor （D）Caption19.要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮，只要对下列________属性进行设置就有效。
（A）MaxButton （B）Bordstyle （C）Width （D）MinButton 20.当运行程序时，系统自动执行启动窗体的________事件过程。
（A）Load （B）Click （C）Unload （D）GotFocus21.当文本框的ScrollBars属性设置了非零系值，却没有效果，原因是________。
（A）文本框中没有内容（B）文本框的MultiLine属性为False（C）文本框的MultiLine属性为True（D）文本框的Locked的属性为True22.要判断在文本框是否按了Enter键，应在文本框的________事件中判断。
（A）Change （B）KeyDown （C）Click （D）KeyPress23.如果文本框的Enabled属性为False，则________。
（A）文本框的文本将变成灰色，并且此时用户不能将光标置于文本上（B）文本框的文本将变成灰色，用户仍然能将光标置于文本框上，但是不能改变文本框中的内容（C）文本框的文本将变成灰色，用户仍然能改变文本框中的内容（D）文本框的文本正常显示，用户能将光标置于文本框上，但是不能改变文本框中的内容24.当需要上下文帮助时，选择要帮助的“难题”，然后按________键，就可出现MSDN窗口及显示所需“难题”的帮助信息。
（A）Help （B）F10 （C）Esc （D）F125. 窗体文件的扩展名为________。
(A) .vbp (B) .bas (C) .exe （D) .frm26. 指示一个窗体位置的值是窗体的（）。
（A)对象（B) 事件（C) 属性（D) 方法27.下列高级语言中，属于面向过程程序设计语言的是________。
(A）visualC++ (B）Java (C)Basic (D)Delphi28. 下列说法正确的是________。
(A）同一个事件的名称在不同的程序中可以不同(B）事件是用户定义的(C)对象的事件是不固定的(D)事件是对象能够识别的动作29. 与传统的程序设计语言相比，Visual Basic最突出的特点是________。
(A）结构化程序设计(B）编写跨平台应用程序(C）事件驱动程序编制(D）程序高度技术30. 在正确安装Visual Basic后，可以通过多种方式启动Visual Basic。
以下方式中，不能启动Visual Basic的是________(A）通过“开始”菜单的“程序”命令(B）通过“我的电脑”找到VB6.EXE，运行之(C）通过运行快捷方式(D）进入DOS方式，执行Vb6.exe31. Visual Basic集成开发环境界面中的菜单栏有13个菜单项，要显示或隐藏Visual Basic的各种窗口、工具栏，应选择菜单栏中的________菜单项的相应属性。
(A）工具(B）视图(C）图表(D)窗口32. 下列不能打开属性窗口的操作是________。
(A）执行“视图”|“属性窗口”命令(B）单击工具栏上的“属性窗口”按钮(C）按Ctrl+T快捷键(D）按F4键33.“工程窗口”的主要用途是________(A）显示窗体文件，标准模块文件和类模块文件(B) 只显示工程文件的内容，以使用户了解工程的组成(C）组织、管理工程文件(D）方便用户打开相应“代码编辑器”窗口和“窗体设计器”34. 在设计阶段，当双击窗体上的某个控件时，所传开的窗口是________A）工程资源管理窗口B）工具箱窗口C）代码窗口D）属性窗口35. 将数据和程序封装起来成为一个逻辑实体，即________(A）对象(B）事件(C)属性(D）窗体36. 应用程序设计完成后，应及时保存程序，保存的过程是（）。
(A）只保存窗体文件即可(B）只保存工程文件即可(C）先保存窗体文件，再保存窗体文件(D）先保存窗体文件，再保存工程37. 下列选项中，不属于Visual Basic特点的是（）。
(A）可视化程序设计(B）面向对象(C）事件驱动编程机制(C）面向图形38. 使用“上下相关帮助”的操作方法是：选择一个对象或关键字，然后按下________(A）F1 (B)F2 (C)F3 (D)F439. 退出Visual Basic的快捷键是________(A）Ctrl+Q (B)Shift+Q (C)Alt+Q (d)Ctrl+Alt+Q40.启动Visual Basic，就意味着要建立一个新的________(A）窗体(B）程序(C）工程(D)文件41.打开Visual Basic集成环境后，显示的工具栏是________(A）编辑工具栏(B）标准工具栏(C）高度工具栏(D）窗体工具栏42.每个窗体对应一个窗体文件，窗体文件的扩展名是________。
(A）.bas (B) .cls C) .frm D) .vbp43.激活属性窗口使用的热键是________。
(A）F2 (B)F3 (C)F4 (D)F544.下列可以打开立即窗口的快捷键是________(A) Ctrl+ D (B) Ctrl+ E (C) Ctrl+ F (D) Ctrl+ G45.网络信息服务管理工具被包含在Visual Basic6.0的________。
(A）试用版(B）标准版(C）专业版(D）企业版46. Visual Basic集成环境的主窗口中不包括________。
(A）标题栏(B）菜单栏(C）状态栏(D）工具栏47.下列不属于Visual Basic的3种运行模式的是________。
(A）查看模式(B）设计模式(C）运行模式(D）中断模式48.下列不属于Visual Basic应用程序所包括文件的是________(A）窗体文件（* . frm）(B)类表文件（* . bas）(C)文本文件（*.txt）(D)工程文件（*.vbp）49.成功启动Visual Basic后，系统将自动进入________。
(A）查看模式(B）设计模式(C）运行模式(D)中断模式50.成功启动Visual Basic后，标题栏中显示的信息是________.(A）程序1-Microsoft Visual Basic〔设计〕(B）Form- Microsoft Visual Basic〔设计〕(C) 模块1- Microsoft Visual Basic〔设计〕(D）工程1-Microsoft Microsoft Visual Basic〔设计〕〔设计〕51. 要使文本框获得输入焦点，则采用文本框空件的________。