实验1创建一个简单的VB 程序
一、实验目的
1. 掌握VB 的启动方法。
2. 熟悉VB 集成开发环境。
3. 熟悉常用菜单。
4. 学会向窗体中放置控件和使用属性窗口。
5. 学会建立一个简单界面的应用程序。
6. 掌握启动工程和结束工程的方法。
二、实验内容
创建界面如图1-1 所示
要求：1）窗体标签显示：你好
2）添加文本框和按钮控件，其中运行程序后，文本框中显示“你好”，按钮便签显示“运行”。
3)单击运行后，文本框消失。
图1-1 Hello 运行结果
三、实验步骤
1 ．启动Visual Basic
启动VB 会出现如图1-2 所示，选择“标准EXE ”图标，单击“打开”按钮，新建一个“标准EXE ”工程。
图1-2 新建工程界面
2 ．创建界面
⑴创建控件
创建控件有以下方法：
在控件箱中双击选定的控件，该控件会自动出现在窗体中间。
在控件箱中单击选定的控件，将变成十字线的鼠标指针放在窗体上，拖动十字线画出适合的控件大小。
⑵选择控件
选择控件有以下几种方法：
单击某个控件，当控件的四周出现尺寸柄时表示控件被选中。
用↑、↓、←、→方向键在不同的控件中切换。
按Shift 键，依次单击几个控件，可同时选中几个控件。
在控件的外围拖出一个选择框，则在框内的所有控件都同时选中，如图1-3所示。
图1-3 控件同时选中
⑶移动控件
移动控件有以下方法：
先用鼠标选择控件，再把窗体上的控件拖动到一新位置。
先选择控件，然后在“属性”窗口中改变“Top ”和“Left ”属性。
先选择控件，用Ctrl ＋↑、↓、←、→方向键调整控件位置。
⑷调整控件大小
调整控件大小有以下方法：
先选择某控件，然后拖动尺寸柄向各方向调整大小。
先选择某控件，用Shift ＋↑、↓、←、→方向键调整控件大小。
⑸安排控件位置
为了使控件在窗体中的位置整齐统一，可使用上面介绍的同时选中多个控件的方法。例如，同时选中控件Command1 和Text1 ，通过“格式”菜单中的“对齐”、“统一尺寸”等来安排控件的位置和大小。
例如，选择“格式”菜单中的“统一尺寸”的“两者都相同”命令，界面显示如图1-4 所示。
图1-4 尺寸相同
⑹移去控件
选中某控件，按Del 按钮删除控件，则窗体中控件被移去。
⑺锁定控件
锁定控件有以下方法：
先选中该控件，单击“格式”菜单选取“锁定控件”命令。
先选中该控件，用鼠标右键单击“窗体编辑器”，在快捷菜单中单击“锁定控件”命令。
锁定控件是将窗体上所有的控件锁定在当前位置，以防止己处于理想位置的控件因不小心而移动。这是一个切换命令，也可用来解锁控件位置。
3 ．设置属性
设置属性先选中控件或窗体，在属性窗口中修改各属性的值。
（1）将文本框Text1 和命令按钮Commandl 的属性窗口中的“名字”属性改变成txtYou 和cmdRun 。
（2）将文本框txtYou 的属性窗口中的“BackColor ”和“ForColor ”属性分别改成黄色和蓝色。
（3）修改文本框txtYou 的属性窗口中的“Font ”属性，单击出现如图1-5的属性页。
图1-5 Font 属性页
分别将“字体样式”和“大小”改成“粗体”和“小二”则显示如图1-6所示。
图1-6 改变文本框字体
（4）设置窗体的图标
用窗体“Forml ”属性窗口改变“Icon ”属性来改变窗体的图标，单击“Icon ”属性后的按钮来选择另一个图标。通过设置窗体的Icon 属性，换一个能说明窗体或应用程序具体用途的图标，使它们在窗体最小化时出现。
（5）设置富体“Forml ”属性窗口的“Caption ”属性改为“你好”。
（6）修改txtYou 的属性“Text ”为“你好！”
4 ．修改代码
修改事件CmdRun_click 代码，使按下按钮后txtYou 由“你好！”变成消失：Pivate Sub CmdRun_click()
txtYou .Visible ＝False
E nd Sub
四、课后习题【上机参考练习题】
要求：利用空余时间设计调试出来，并将设计方法及代码写入实验报告。1.单击按钮，将文本框中显示的内容修改为“欢迎使用VB6.0 ”。
1）将窗体中的文本框和按钮左对齐。
2）设置窗体和工程的“名称”属性，修改它们的文件名，使其在“资源浏览器”中的显示如图1-7所示。
此题知识点：1、了解VB集成开发环境。(操作界面的组成窗口和对菜单栏的熟悉)
2、建立事件驱动面向对象程序设计的初步概念。
图1-7资源管理器窗口
2.如下图1-8所示:当程序运行时“结束”按钮不可用，单击“显示”按钮时文本框出现一串文字，“结束”按钮才为有效。
图1-8 第二题界面图
3.如下图1-9所示设计窗体，并实现对应按键上的功能。
此题知识点：对标签控件的（FontSize、FontBold、FontUnderline、Left）的应用。
图1-9 第三题界面图
Option Explicit Private Sub Command1_Click() Dim i%, j%, r! i = Val(Text1.Text) j = Val(Text2.Text) Picture1.Print i; j; Call gysh(i, j) Picture1.Print "最大公约数是" & i r = Val(InputBox("输入半径")) Call S(r) End Sub Public Function gysh(m As Integer, n As Integer) As Integer Dim t% Do t = m Mod n: m = n: n = t Loop While t <> 0 End Function Public function S(r!) Const pi = 3.1415926 S = pi * r ^ 2 MsgBox "圆面积为：" & S End function Public Function 定积分() End Function
Dim a() As Integer, i%, j%, n%, t% Private Sub Command1_Click() Picture1.Print "排序前的数组为：" n = V al(InputBox("请输入一个3到100的整数")) ReDim a(1 To n) Randomize For i = 1 To n a(i) = Int(Rnd * 100) + 1 Picture1.Print Tab(((i - 1) Mod 5) * 6); a(i); Next i End Sub Private Sub Command2_Click() Picture1.Print Picture1.Print "排序后的数组为：" For i = 1 To n - 1 For j = i + 1 To n If a(i) > a(j) Then t = a(i) a(i) = a(j) a(j) = t End If Next Next For i = 1 To n Picture1.Print Tab(((i - 1) Mod 5) * 6); a(i); Next End Sub
同步练习1 二、选择题 01——05 CADAB 06——10 ACDAB 11——15 CBDBB 同步练习2 二、选择题 01——05 ABDCA 06——10 CACBC 11——15 DADAD 16——20 BDBBB 三、填空题 1．可视 2．LEFT、TOP、WIDTH、HEIGHT 3．按字母顺序 4．查看代码 5．工具、编辑器 6．FORM窗体、FONT 7．MULTILINE 8．在运行时设计是无效的 9．工程、工程属性、通用、FORM1.SHOW 10．TABINDEX、0 同步练习3 二、选择题 01——05 BCADB 06——10 ADBBC 11——15 DBCBA 16——20 BAABB 三、填空题 1．整型、长整型、单精度型、双精度型 2．SIN(30*3.14/180)+SQR(X+EXP(3))/ABS(X-Y)-LOG(3*X) 3．164、今天是：3-19 4．FALSE 5．-4、3、-3、3、-4、4 6．CDEF 7．(X MOD 10)*10+X\10 8．(35\20)*20=20 ( 35 \ 20 )* 20 = 20 9．X MOD 3=0 OR X MOD 5=0 10．27.6、8.2、8、1、100、397、TRUE、FALSE 同步练习4 一、选择题 01——05 DBCAD 06——10 CBBAB
11——15 D25BAC 16——20 CBACB 21——25 DAABC 二、填空题 1．正确性、有穷性、可行性、有0个或多个输入、有1个或多个输出2．1 2 3 3．X>=7 4．X 第一套试题 一、选择题（每题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语言程序设计》教材 林卓然编著 《VB程序设计》习题参考答案 第1章习题 一、单选题 1．D 2．B 3．C 4．A 5．C 6. A 7．A 8．B 9．C 10．(1)A (2)B 二、多选题 1．ACDE 2．BCDE 3．CD 4. CE 三、填空题 1．事件驱动 2．解释，编译 3．设计，运行，中断 4. 属性，方法，事件 5. Command2_Click 6. 中央，代码 7．MyForm.frm 8. (1)Cmd1_Click() (2)Print "VB语言程序设计" 编程及上机调试 1. 按要求设置窗体属性 2．在窗体上建立一个标签Label1。程序代码如下： Private Sub Form_Click() Label1.Caption = "你单击了窗体" End Sub Private Sub Form_DblClick() Label1.Caption = "你双击了窗体" End Sub 3．在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。 Private Sub Command1_Click() Dim x As Single x = Val(Text1.Text) Text2.Text = 15 * x End Sub 第2章习题 一、单选题 1．①D，②D 2．①A，②C 3．A 4．B 5．B 6．B 7．C 8．D 9．B 10．B 11．A 12．A 13．B 14．A 15．B 16．A 17．B 二、多选题 1．BD 2．CD 3．AC 4. AD 三、填空题 1．(1) Sin(50*3.14159/180) (2) (2+x*y)/(2–y*y) 《VB程序设计》期末复习要点 重点复习内容: 通过本课程的学习,要求重点掌握: 1. VB窗体的属性,事件和方法,常用的控件的公用属性和常用标准控件. 2. VB常用的数据类型,常量的定义,变量的命名,变量的声明及作用域. 3. 常用的表达式. 4. For…Next循环,Do…Loop循环,If…Then…Else条件判断语句,Select Case语句. 5. 一维数组,二维数组的声明与存取. 6. 过程的声明与调用. 7. 菜单编辑器,输入对话框,消息输出对话框及系统对话框的使用. 考试题型及分值: 1. 判断题共10题(每题1分,共10分) 2. 单项选择题10题(每题2分,共30分) 3. 填空题10空(每空2分,共20分) 4. 阅读程序,写出程序运行结果2题(每题10分,共20分) 5. 程序填空( 共20分) 复习题: 判断题(正确的打√,错误的打×) ( )1.VB对象就是窗体和控件. ( )2.事件是VB对象可以响应的用户操作. ( )3.文本框和标签框通过同一属性在窗体上显示文字. ( )4.For…Next循环结构的默认步长为1. ( )5.对象的属性都可以在程序中通过语句设置. ( )6.能够改变多项选择框中背景颜色的属性是BackColor. ( )7.使用Open语句可以创建新的顺序文件. ( )8.要在窗体上添加控件,从工具箱中将控件拖到窗体上即可. ( )9.所有对象的属性都可以在属性窗口中设定. ( )10.标签没有change事件和setFocus方法. ( )11.方法Form1.show与Form1.visible=True是等效的. ( )12.Msgbox函数建立的信息框既能显示信息又能输入用户的信息. ( )13.Do…Loop Until语句实现循环时,不管条件真假,首先无条件地执行一次循环. ( )14.函数Str(23)与Str(-23)的值的长度相同. ( )15.变量名的第一个字符必须是字母. ( )16.InputBox函数和MsgBox函数一样,返回的是字符串. ( )17.改变窗体的标题也就是改变其属性窗口中的name属性. ( )18.文本框控件有Caption属性. ( )19.在Visual Basic中,向过程传递参数时,按地址传递参数是缺省的. ( )20.在工具箱内双击命令按钮图标,便会在窗体上建立一个命令按钮. ● 单项选择题 1.若要求从文本框中输入密码时在文本框中只显示* 号,则应在此文本框的属性窗口中设置( ). A,Text属性值为* B,Caption属性值为* C,Password属性值为空D,Passwordchar属性值为* 2.在文本框的属性中,用于设定文本框最多可接受字符数的属性是( ). vb 课后习题答案 第一章习题参考答案 一、填空题 1、对象事件驱动 2、编译运行模式解释运行模式 二、简答题 1、简述 VB 的特点。 答：①可视化的程序设计方法 ②面向对象的程序设计思想 ③事件驱动的编程机制 ④结构化的程序设计语言 ⑤高度的可扩充性 ⑥强大的数据库访问能力 ⑦支持动态数据交换 ⑧支持对象链接与嵌入 2、简述 VB 的安装过程。 答：①向光驱中放入VB 安装光盘； ②计算机将运行自动安装程序，若没有，执行VB 目录下的Setup.exe； ③根据提示逐一回答问题，并点击“下一步”； ④点击“完成”； 2、如何启动 VB。 答：三种方法： ①单击“开始”按钮，选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击； ②双击桌面上的VB6.0 快捷图标； ③在“开始”菜单的运行对话框中输入命令来启动VB； 第二章习题参考答案 一、选择题： 1-10、 DCACD BCBBC 11-20、 BADCA BBAAB 21-29、 AACBB CDDC 二、填空题 1．窗体、控件 2．属性值 3．属性窗口设置、代码窗口设置 4．事件过程 5．对象名、下划线、事件名 6． Form_Click 第三章习题参考答案 一、选择题 1、B 2、 C 3、 A 4、B 5、 A 6、 C 7、 C 二、填空题 1、 11 字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日 期型、对象型、变体型。 String、 Byte、 Integer 、 Long、 Single、 Double、 Currency、 Boolean 、Date、 Object 、 Variant 2、双引号 (英文 )、# 3、 ASCII、1 、2 4、 public 、通用、 Dim、 Static、Private、 Static 5、 &、 +、+ 6、 Now()、 Time 、日期型 三、解答题 1、(3) 2、 (1 ) 3、（ 1）常量（关键字）（ 2）字符型常量（ 3）逻辑型常量（ 4）变量（ 5）字符串常量（ 6）变量 （7）字符串常量（ 8）变量（ 9）日期型常量（题目应是 #11/16/1999# ）（ 10）数值型常量（单精度） 4、31 5、（ 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） zxy123ABC 8、（ 1） 19 （ 2） 8.16666666666667 （3） 5． 25 （4） 2 9、（ 1） -4 （2） 2 . 82842712474619 （ 3） -3 （ 4） 49 （5）” hello （”6）He 7）16 （ 8）“-459.65 ”（ 9） 5 10、（ 4） 11、（ 2） 12、（ 4） 第四章习题参考答案 一、选择题： 1—7: DAABBCD 二、填空题 1． 500.00% 2．将字号扩大为原来的二倍 3． B 三、编程题（略） 1．文本框、标签和命令按钮的名称分别为text1 、 label1、 command1 Private Sub Command1_Click() Label1.caption=text1.text Command1.caption=text1.text End Sub 《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、对象事件驱动 2、编译运行模式解释运行模式 二、简答题 1、简述VB的特点。 答：①可视化的程序设计方法 ②面向对象的程序设计思想 ③事件驱动的编程机制 ④结构化的程序设计语言 ⑤高度的可扩充性 ⑥强大的数据库访问能力 ⑦支持动态数据交换 ⑧支持对象链接与嵌入 2、简述VB的安装过程。 答：①向光驱中放入VB安装光盘； ②计算机将运行自动安装程序，若没有，执行VB目录下的Setup.exe； ③根据提示逐一回答问题，并点击“下一步”； ④点击“完成”； 2、如何启动VB。 答：三种方法： ①单击“开始”按钮，选择“程序”菜单下的“Microsoft Visual Basic 6.0 中文版”菜单项并单击； ②双击桌面上的VB6.0快捷图标； ③在“开始”菜单的运行对话框中输入命令来启动VB； 第二章习题参考答案 一、选择题： 1-10、DCACD BCBBC 11-20、BADCA BBAAB 21-29、AACBB CDDC 二、填空题 1．窗体、控件 2．属性值 3．属性窗口设置、代码窗口设置 4．事件过程 5．对象名、下划线、事件名 6．Form_Click 第三章习题参考答案 一、选择题 1、B 2、C 3、A 4、B 5、A 6、C 7、C 二、填空题 1、11 字符型、字节型、整型、长整型、单精度型、双精度型、货币型、逻辑型、日期型、对象型、变体型。String、Byte、Integer、Long、Single、Double、Currency、Boolean 、Date、Object、Variant 2、双引号(英文)、# 3、ASCII、1、2 4、public、通用、Dim、Static、Private、Static 5、&、+、+ 6、Now()、Time、日期型 三、解答题 1、(3) 2、(1 ) 3、（1）常量（关键字）（2）字符型常量（3）逻辑型常量（4）变量（5）字符串常量（6）变量 （7）字符串常量（8）变量（9）日期型常量（题目应是#11/16/1999#）（10）数值型常量（单精度） 4、31 5、（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）zxy123ABC 8、（1）19 （2）8.16666666666667 （3）5．25 （4）2 9、（1）-4 （2）2 . 82842712474619 （3）-3 （4）49 （5）”hello”（6）He 7）16 （8）“-459.65”（9）5 10、（4） 11、（2） 12、（4） 第四章习题参考答案 一、选择题： 1—7: DAABBCD 二、填空题 1．500.00% 2．将字号扩大为原来的二倍 3． B 三、编程题（略） 1．文本框、标签和命令按钮的名称分别为text1、label1、command1 Private Sub Command1_Click() Label1.caption=text1.text Command1.caption=text1.text 索引 一、在窗体上画一个文本框，其名称为Text1，Text属性为空白。再画一个命令按钮，其名称为C1，Visible属性为False。编写适当的事件过程。程序运行后，如果在文本框中输入字符，则命令按钮出现。 二、计算圆的周长和面积：在窗体中添加一个文本框（Text1）和一个对应的标签（Label1），再添加两个命令按钮（Command1和Command2）和一个图片框（Picture1）。程序运行时，当单击Command1按钮后，计算圆的周长；当单击Command2按钮后，计算圆的面积；计算结果输出在图片框中。（要求在未输入半径前两个按钮呈灰色不可用。） 三、在窗体上添加三个文本框和对应的三个标签，标签的标题分别是“个位”、“十位”、“百位”。程序运行时，当单击窗体后，随机产生一个【100，999】区间内的整数，将它的个位、十位、百位数字分别显示在对应的文本框中。 四、设计一个计算程序：在窗体上添加四个文本框和四个对应的标签，标签的标题分别是“语文”、“数学”、“外语”、“平均成绩”，三个命令按钮，标题分别为“清除”、“计算”、“退出”。程序运行后，用户按“清除”按钮，则清除文本框中显示的内容，按“计算”按钮，则计算三科平均成绩，将计算结果显示在第四个文本框中（计算结果保留小数点后一位）。单击退出按钮则程序退出。 五、某税务部门征收所得税，规定如下：（1）收入200元以内，免征。（2）收入在200~400元，超过200元的部分纳税3%。（3）收入超过400元的部分，纳税4%。（4）当收入达5000元或超过时，将4%税金改为5%。编程序实现上述操作。 六、给定三角形的三条边的边长，计算三角形的面积。编写程序，首选判断给出的三条边能否构成三角形，如可以构成，则计算并输出该三角形的面积，否则要求重新输入。当输入-1时结束程序。 七、编程求100以内的全部素数。 八、编程打印钻石图案。 九、输出杨辉三角形。 十、有一个数组，包含了10个不同的随机整数（20~90），要求计算出它们的平均值，并输出这个数组中最接近于平均值的数。 十一、在一个窗体上建有包含三个命令按钮的控件数组和一个文体框。编程实现当按下标题不同的命令按钮时，使文体框中文字的字体发生相应的变化。 十二、编程求1000以内的完全数。所谓完全数是指这样的自然数：它的各个约数（不包括该数本身）。如28=1+2+4+7+14就是一个完全数。 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 …… 课后习题解答 第一、二章： 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、保存文件时，若不改变目录名，则系统默认的目录是什么？ 答：系统默认的目录是VB98 8、安装Visual Basic 6.0后，帮助系统是否也已安装？ 答：没有。VB6.0的帮助系统在两光盘上，即MSDN Library，其中还包含了VC、VFP等其他语言的帮助系统。 9、如何使用Visual Basic 6.0的帮助系统？ 答：最方便的方法是选定要帮助的容，然后按F1功能键，这时系统打开MSDN Library查阅器，直接显示与选定容有关的帮助信息。 10、什么是类？什么是对象？什么是事件过程？ 答：类是同类对象集合的抽象，它规定了这些对象的公共属性和方法； 对象是类的一个实例，对象包含三个要素：属性、方法和事件。 当在对象上发生了事件后，应用程序就要处理这个事件，而处理的步骤就是事件过程。 11、属性和方法的区别是什么？ 答：属性是对象的特征，方法是对象的行为。前者有值，可以被赋值或引用；后者没有值，表示能够执行的操作。 12、当标签边框的大小由Caption属性的值进行扩展或缩小时，应对该控件的什么属性进行何种设置？ 答：将该控件的Autosize属性值设置为true。 13、在VB6.0中，命令按钮的显示形式可以有标准的和图形的两种选择，它们通过什么属性来设置？若选 择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是Caption属性设置的文字，应怎样修改？ 答：命令按钮的显示形式通过将Style属性值设置为Graphical来实现。通过Picture属性来装入图 '以下程序段用于输出杨辉三角:结果样式如图1 ' Private Sub Form_Click() Const n = 10 Dim arr(n, n) As Integer For I = 1 To n arr(I, I) = 1 '**********SPACE********** 【arr(I, 1) = 1】 Next I For I = 3 To n For j = 2 To I - 1 '**********SPACE********** arr(i, j) =arr(i-1,j-1)+arr(i-1,j) Next j Next I For I = 1 To n For j = 1 To I '**********SPACE********** 【print arr(I,j)】 Next j Print Next I End Sub Option Explicit '------------------------------------------------ '【程序改错】 '------------------------------------------------ '题目：用自定义函数的方法求sum（x），求当-1≤x≤1时，' sum（x）=x/2！+x^2/3!+x^3/4!+……+x^n/(n+1)!， ' 当x〉1或x〈-1时，函数值为0。当n〈=0时，输入数' 据错误。X、N都是由用户输入。 '------------------------------------------------ '注意：不可增加或删除程序行，也不可以更改程序结构 '------------------------------------------------ Private Sub Command1_Click() Dim s As Single Dim n As Integer, x As Single, k As Integer n = Val(InputBox("Please input a integer value:")) 常见vb程序设计代码 作者 : 窦振山 1、猴子每天吃掉的桃子是所有桃子的一半多一个，到第七天发现只剩下一个了，问最开始有几个桃子？、、 Private Sub Command1_Click() Dim m(1 To 7) m(1) = 1 For i = 2 To 7 m(i) = (m(i - 1) + 1) * 2 Next For i = 1 To 7 Print "第" & i & "天的桃数是"; m(i) Next End Sub 2、百元百鸡问题：公鸡三元一只，母鸡两元一只，小鸡一元两只，现用百元买一百只鸡Private Sub Command1_Click() Dim x As Integer Dim y As Integer For x = 1 To 100 For y = 1 To 100 If 3 * x + 2 * y + (100 - x - y) / 2 = 100 Then Print "公鸡 "; x; "母鸡"; y; "小鸡"; 100 - x - y End If Next Next End Sub 1、综合运用一维数组、二维数组、动态数组和控件数组的有关知识编写程序，要求能输入学生的学号、姓名、性别、年龄等个人简况，输入的学生人数不限，并可按学号或姓名查询。界面设计用到了三个command即“添加”、“查询”和“退出”，八个label和四个text 用来输入学号、姓名、成绩和年龄，一个frame，一个picturebox图片框用来显示结果 其程序代码设计如下： Private Type stu id As Integer nam As String sco As Single age As Integer End Type Dim students(100) As stu Dim s As Integer Private Sub Command1_Click() Static i As Integer If Text1.Text = "" Then VB可视化程序设计实例——小时钟 本例专门针对程序设计初学者而设计，尤其适合第一次接触VB的学生学习。通过用VB来设计如图3.39所示的时钟程序，初步感受一下可视化和面向对象的程序设计过程。 图3.39 时钟程序运行效果 小时钟程序中包含窗体控件、标签控件和计时器控件等3个控件。窗体控件是小时钟程序运行时的窗口，标题栏上的标题是“时钟”，在右上角有最小化、最大化和关闭按钮。标签控件可以用来显示文本，本例中用来显示时间，如“9:48:57”。计时器控件每秒一次把计算机的当前系统时间显示到标签控件中，使得小时钟不停地运行。Array启动VB，首先显示“新建工程”对话框（图3.40），在选择“新建”选项卡中的“标 准EXE”项后，单击“打开”按钮，进入VB编程环境，如图3.41所示。 图3.40 “新建工程”对话框 图3.41 VB 可视化编程环境 除了标题栏、菜单栏和标准工具栏外，编程环境中还有工具箱、窗体和属性等窗口。 双击工具箱（图3.42）中的标签控件，在窗体Form1中放置可以显示文本信息的标签控件Label1，见图3.43。时钟的时、分和秒以后就显示在Label1中。拖曳Label1可以移动它，拖曳它的八个控制点，可以改变它的大小。 图3.42 工具箱 图3.43 label1控件 图3.44 计时器控件 双击工具箱中的计时器控件，在窗体Form1中放置计时器控件Timer1，见图3.44。计时器控件以一定的时间周期，调用一个事件。计时器控件只有在设计阶段出现在窗体上，程序运行时是不可见的，它的位置和大小无关紧要。 到目前为止，已经建立了窗体Form1、标签控件Label1和计时器控件Timer1等3个对象。下面，将设置它们的属性。 窗体窗口 Visual Basic程序设计知识点（基础部分） 说明：黄色突出显示的为重点记忆内容，灰色突出显示的不作掌握要求。 第1章Visual Basic概述 一、VB对象与事件驱动的编程机制 1．VB对象 在Visual Basic应用程序设计中，构成图形用户界面的（GUI）的每一个可视的部件，均可视为对象。Visual Basic中的对象分为窗体和控件两大类。窗体就是窗口本身，是屏幕上的一个矩形区域；控件则是窗体上构成图形用户界面的一些基本组成部件。 Visual Basic的对象是具有特殊属性和行为方法的一个可视化实体，每一个对象均有自己的特殊属性、事件和方法。 属性是一个对象的特性。属性的设置方法：（1）设计阶段修改对象属性值；（2）程序运行阶段修改对象属性值，其语法格式为：对象名.属性名=属性值。例如：Command1.Caption=”确定”。 事件在发生对象身上，且能被对象识别的动作。当事件在对象身上发生后，应用程序就要处理这个事件，处理事件的步骤就是事件过程。事件过程的一般格式为： Private Sub 对象名_事件( [参数列表]) ……事件过程代码 End Sub 例如： Private Sub Command1_Click() End …结束程序 End Sub 方法是对象本身所包含的一些特殊函数或过程。方法的调用格式：[对象名.]方法名[参数名表]。若省略了对象名，表示为当前对象，一般指窗体。例如：Form1.print “VB is fun!”2．事件驱动的编程机制 应用程序先等待某个事件的发生，然后再去执行处理此事件的事件过程。发生事件的顺序决定了代码执行的顺序，若没有事件发生，整个程序处于停滞等待状态。 二、窗体对象 属性：Namek, Caption, Height, Width, Left, Top, MaxButton, MinButton 事件：Click, DblClick, Load 方法：Print, Cls, Move 三、基本控件 1．标签 属性：Caption, Alignment, Autosize, BorderStyle 2．文本框 属性：Text, PasswordChar, SelStart, SelLength, SelText 事件：Change, GotFocus, LostFocus, KeyPress 方法：SetFocus 3．命令按钮 属性：Caption, Cancel, Default 中南大学现代远程教育课程（专科）考试复习题及答案 《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)字节型 习题一 答案在教材上找。 习题二 1.对象指现实世界中的实体。每个对象有自己的特征(属性)、行为(方法)和发生在该对象上的活动(事件)。 类是对同一种对象的集合与抽象。类包含所创建对象的属性数据，以及对这些数据进行操作的方法。封装和隐藏是类的重要特性，将数据结构和对数据的操作封装在一起，类的内部实现细节对用户来说是透明的。 VB工具箱中的可视图标是VB系统设计好的标准控件类。通过将控件类实例化，得到真正的控件对象。在窗体上画一个控件，就将类转换为对象，创建了一个控件对象。 VB中常用的对象是控件。此外，VB还提供了系统对象。窗体是个特例，它既是类也是对象。当向一个工程添加一个新窗体时，实质就由窗体类创建了一个窗体对象。 对象的三要素：属性、事件和方法。 属性：存放对象的数据(决定对象外观及功能)对象属性的设置方法：在设计阶段，利用属性窗口直接设置属性值；程序运行时，通过语句[对象名.]属性名=属性值。若属性只能在设计阶段设置，在程序运行阶段不可改变，称为只读属性。 事件：发生在对象上的事情。同一事件，对不同的对象，会引发不同的反应。事件过程：应用程序处理事件的步骤。应用程序设计的主要工作就是为对象编写事件过程的代码。 方法：面向对象的程序设计语言，为程序设计人员提供了一种特殊的过程和函数。方法是面向对象的，调用时一定要指明对象。 2.窗体和控件具有的基本属性“ (1) Name属性：名称 所创建的对象名称,在程序中引用。 (2) Caption属性：标题 该属性决定了对象上显示的内容。 (3) Height、Width、Top和Left属性 决定对象的大小和位置。 (4) Enabled 属性：对象是否允许操作 (5) Visible 属性：对象是否可见 (6) Font 属性组：文本的外观 FontName字体、FontSize大小 FontBold粗体、FontItalic斜体 FontStrikethru 删除线 FontUnderline 下划线 (7) ForeColor属性：前景颜色 (8) BackColor属性：背景颜色 (9) MousePointer属性：鼠标指针类型, 设置值范围0～15，由系统指定。若为99，由用户提供的图形文件定义鼠标指针形状。 一．编写程序，当单击窗体时求出1+1/3+1/5+1/7+... 的和，直到所加项1/n小于10-3，所求结果用变量s存放,并在窗体上输出计算结果。(要求用While .............Wend 循环来做此题) Private Sub Form_Click() Dim s!, n% ‘注意必须定义为！ s = 0 ‘计算累加和时，存放累加和的变量初值为0 n = 1 ‘n为第1项的值 While 1 / n > 10 ^ (-3) ‘注意乘幂的写法，s = s + 1 / n n = n + 2 ‘注意每次加2 Wend Print "s="; s End Sub 二．请编写程序：有一个三位数，减去七能被七除尽，减去八能被八除尽，减去九能被九除尽，当单击窗体时计算并输出这个数是多少。 Private Sub Form_Click() Dim i% ‘i作为循环变量 For i = 100 To 999 If (i - 7) Mod 7 = 0 And (i - 8) Mod 8 = 0 And (i - 9) Mod 9 = 0 Then Print I End If Next End Sub 三．编写程序，当单击窗体时求1~100中既是5的倍数又是7的倍数的数的和。其中Sum为累加和变量，i为循环控制变量，并在窗体上输出累加结果。 Private Sub Form_Click() Dim Sum%, i% Sum = 0 For i=1 to 100 If i mod 5=0 and i mod 7=0 then Sum = Sum + i End if Next i Print "Sum="; Sum End Subvb程序设计试题(含答案)
《VB程序设计》习题答案-林卓然编著
《VB程序设计》期末复习要点
VB程序设计教程第四版课后答案
《VB程序设计》考试题型练习 答案
VB程序设计答案
完整word版,VB程序设计例题12例
VB程序设计试题及答案一
VB程序的设计教程课后答案
VB程序设计例题程序改错程序填空程序设计
常见vb程序设计代码
VB可视化程序设计实例——小时钟
VB程序设计知识点
[整理]VB程序设计复习题及答案.
vb程序设计教程课后答案(第三版)
vb 程序设计
相关主题
文本预览