第三章vb简单程序设计.

第三章VB程序设计的一般过程3.1 VB程序设计的一般步骤
概括起来，用VB开发应用程序，分四步：
(1) 建立用户界面
(2) 设置各个对象的属性
(3) 编写事件驱动程序
(4) 存盘、运行、调试
下面以一个实际程序说明VB编程的详细步骤：
题目要求：
已知a=10,b=20，设计如下界面并实现其功能：单击“加”按钮，在文本框中显示a+b的值，单击“减”按钮，在文本框中显示a-b的值，单击“结束”则结束程序的执行。

（程序cx1.vbp）
编程步骤：
第一步：建立用户界面
(1) 建立一个新工程（程序）：单击[文件]/[新建工程]，出现“新建工程”对话框，直接按“确定”。

(2) 出现窗体编辑器，将窗体编辑器最大化。

调整窗体至要求的大小。

(3) 在窗体上画出4个控件：
画一个“文本框”，框内自动标出“Text1”；
画三个“命令按钮”，按钮内自动标出“Command1”、“Command2”、“Command3”。

(4) 画完所有控件后，适当调整其位置、大小。

第二步：设置各个控件的属性
(1) 设置窗体的属性：
单击窗体空白处，选择窗体；
在属性窗口选择“Caption”（标题），在后面将原来的“Form1”改为“VB程序设计示例”。

(2) 设置文本框的属性：
选择文本框；
在属性窗口选择“名称”，在后面将原来的“Text1”改为“Text”；
“字体”对话框，分别设置“隶书、粗斜体、二号”；
选择“ForeColor”（前景颜色），单击后面的
，打开调色板，选择红色；
选择“Text”，在后面输入“a=10, b=20”。

(3) 设置各个按钮的属性：
●选择第１个按钮；
在属性窗口选择“名称”，在后面将原来的“Command1”改为“add”；
选择“Font”（字体），单击后面的“…”，打开“字体”对话框，分别设置“黑体、粗体、二号”；
选择“Caption”，在后面输入“加”。

（可以采用复制办法设置第2个、第3个按钮）
●选择第２个按钮；
在属性窗口选择“名称”，在后面将原来的“Command2”改为“minus”；
选择“Font”（字体），单击后面的“…”，打开“字体”对话框，分别设置“黑体、粗体、二号”；
选择“Caption”，在后面输入“减”。

●选择第３个按钮；
在属性窗口选择“名称”，在后面将原来的“Command3”改为“end”；
“字体”对话框，分别设置“黑体、粗体、二号”；
选择“Caption”，在后面输入“结束”。

设置属性的有关说明：
(1) VB程序设计中要设置的属性只有几个最常用的属性，如上面的“名称”、Caption、Font、Text、ForeColor，其它属性不用设置，采用默认值即可。

(2) “名称”就是Name属性，与Caption是不同的属性。

Name是对象的内在名字，Caption是对象的外在“标题”。

有些对象的这２个属性的默认值一样，如窗体、按钮。

文本框没有Caption属性，但有Text属性。

“名称”属性是只读属性，在属性窗口中标的是“名称”，在程序中则用Name。

(3) 为使设计界面时清晰有条理，通常在设计前将窗体、控件的设计信息做成一个表，然后按这个表来设计。

本题的界面设计信息表可以为：
对象名称(Name) 标题(Caption) 文本(Text) 窗体Form1 VB程序设计示例
左按钮add 加无
中按钮minus 减无
右按钮end 结束无
文本框Text 无a=10,b=20
第三步：编写事件驱动程序代码
进入“程序代码窗口”有4种办法：
●双击要编写驱动程序的对象；
●执行[视图]/[代码窗口]；
●按F7键；
●单击“工程资源管理器”的“查看代码”
“程序代码窗口”的组成：
●对象框
●事件框
●代码编辑区
●全模块查看/过程查看切换按钮
(1)编写“加”按钮的驱动程序
单击“工程资源管理器”的“查看对象”，返回“窗体设计器”；
双击“加”按钮，进入“程序代码窗口”；
看到这个按钮的驱动程序的起始、结束行：Private Sub add_Click()
End Sub
这是系统自动给出的程序框架（可以更改）；
●Private表示“私有”（局部有效）；
●Sub表示过程（对象驱动程序都是一种过程，也称“事件过程”）；
●add_Click( )表示这个“事件过程”所在的对象（主人）是add按钮，事件是Click（单击）；
●End Sub表示该事件过程的结束。

把驱动程序的语句写在起始、结束行之间。

这个事件过程的功能是：单击后实现a+b，并显示其结果。

语句应该为：
a = 10 :
b = 20
s = a + b
Text.Text = "a+b=" + Str(s)
注意：
●这些是过程的内部语句，应缩进一层。

●语句的标点必须用英文标点。

●VB自动进行语法检查，每行回车时立即检查，如有错，可以马上改正。

(2)编写“减”按钮的驱动程序
单击“工程资源管理器”的“查看对象”，返回“窗体设计器”；
双击“减”按钮，进入“程序代码窗口”；
输入“减”按钮的驱动程序：
Private Sub minus_Click()
a = 10:
b = 20
s = a - b
Text.Text = "a-b=" + Str(s)
End Sub
(3)编写“结束”按钮的驱动程序
单击“工程资源管理器”的“查看对象”，返回“窗体设计器”；
双击“结束”按钮，进入“程序代码窗口”；
输入“结束”按钮的驱动程序：
Private Sub end_Click()
End
End Sub
第四步：存盘、运行、调试
(1) 存盘
存盘的操作：
单击“标准工具栏”的“保存工程”，或选择菜单[文件]／[保存工程]；
先保存窗体文件：保存在D盘vbexam文件夹，文件名为cx1.frm；
接着保存工程文件（程序文件）：保存在D盘vbexam文件夹，文件名为cx1.vbp；
弹出对话框询问“是否将此工程加入资源库”，回答“No”。

至此存盘完毕。

存盘的几个问题：
①程序应该是最后存盘，还是边输入边存盘？
②一个VB程序是存为一个文件，还是几个文件？如果是存为几个文件，那么是哪几个？按什么顺序？
③程序第一次存盘是用“保存工程”还是“工程另存为”？第二次以后呢？
④程序存盘后要改名存盘，或复制到其它地方，应该用“保存工程”还是“工程另存为”？
问题的结论：
①一般可以在程序全部输入完毕再存盘，但对于较大的程序，则应该边输入边存盘，以免丢失。

② VB的存盘是按程序的不同组成分类存盘的，存盘顺序按窗体文件（.frm）→公用标准模块文件（.bas）→工程文件（.vbp）,分哪几类、按什么顺序，VB会自动给出步骤。

③如果程序是第一次存盘，选择“保存工程”时将打开“工程另存为”对话框，此时“保存工程”等于“工程另存为”；如果程序是第二次以后存盘，则选择“保存工程”时不打开对话框，一次性直接以原名保存所有文件（不再分开存盘）。

④如果存盘后程序要改名存盘，或存到其它地方，则必须选择“工程另存为”，而且只须保存工程文件（.vbp），其它文件自动保存。

(2) 运行
运行的准备：
程序运行之前如果程序没有打开，必须先打开。

打开实际上是将程序调入内存。

打开程序的办法为：
单击“标准工具栏”的“打开工程”，或选择菜单[文件]／[打开工程]；
在对话框中打开.vbp的工程文件即可，其它的文件会自动跟随打开，不用分别打开程序的其它文件。

运行的操作：
方式1：解释运行（立即执行）
选择[运行]/[启动]命令或工具栏的“启动”按钮或按快捷键F5；
出现程序界面，再按各个按钮测试其功能是否正确。

方式2：编译运行
选择[文件]/[生成cx1.exe]命令；
脱离VB，运行此程序：执行[开始]菜单的[运行]，或用“我的电脑”打开执行。

(3) 调试
程序运行后如发现有错、或界面不满意，则可以选择[运行]/[结束]命令或工具栏的“结束”按钮，停止程序的执行，返回“窗体设计器”修改界面，或返回“程序代码窗口”修改程序，然后再运行测试。

3.2 VB程序语句的写法和约定
看看以下程序：
Private Sub Command1_Click( )
a = 100 : b=200
s = a + b
Print "s=",s
End Sub
VB程序语句的写法和约定为：
1．语句是执行具体操作的命令，每个语句以“回车”结束。

如果语法有错，回车后一般会发出警告。

2．回车后VB按自己的约定对语句作简单的排版处理。

包括：单词第一个字母设为大写，运算符前后加空格等。

3．输入语句时，英文字符不区分大小写。

单词与单词之间必须用空格隔开。

4．输入程序时一般要求一行一句，一句一行。

也可以把几个简短的语句放在一行内（称为复合语句），但各语句之间必须用冒号隔开。

例如：
a=1 : b=2 : c=3
5．程序每行最多不能超过1023个字符。

一行程序如果太长，可以分成多行，但每行最后要加“空格+下划线”(续行符)，最后一行不加。

如果一个语句最后是下划线，则下一行与本行属于同一程序行。

如：Print "Sum=";a+b+c, "Average=";a+b+c/3, _ "a=";a, "b=";b, "c=";c
以上2行实际上是一个语句。

6．程序语句之间有层次关系时，应采取层次缩进的写法，内层比外层缩进2-3个空格。

如：
Private Sub Command1_Click( )
a=100:b=200
s=a+b
End Sub
3.3 VB的几个简单语句
问题：
上一程序中的a=100，b=200，s=a+b和End Sub 等简单语句是做什么用的呢？
一、赋值语句
格式：[Let] 目标 = 源
作用：先计算“源”的值，再把值赋给“目标”。

说明：“源”可以是常量、变量、表达式、带有属性的对象。

“目标”只能是变量、带有属性的对象。

Let可以省略。

“=”是赋值号，必须用半角等号。

注意：“=”前的“目标”不能是常量、表达式。

举例：
Total = 100 '常量赋值给变量
S = a+b '表达式赋给变量
Name$ = "计算中心" '字符串赋给变量
Text1.Text = "Good Morning!"
'字符串赋给带属性的对象Text2.Text = Text1.Text
'带属性的对象赋给带属性的对象对象赋值，实际上是给对象的属性赋值，即设置对象的属性值。

如：Text1.Text = "Good Morning!" 就是把Text1的Text属性设置为"Good Morning!"。

使用说明：
(1) 赋值语句的功能有2个：先计算、后赋值。

例如：
a=1 : b=2 : c=3
s=a+b+c
那么执行后，s的值为6。

程序中，计算功能一般就用赋值语句完成。

(2) 赋值语句中的“=”是赋值号，不是等号，前后不能随意调转。

如：
s=a+b+c是对的！
a+b+c=s则是错的！赋值号前不能是表达式。

(3) 赋值号前后的“目标”和“源”的数据类型必须一致，否则会导致“类型不匹配”（Type Mismatch ）。

如何保持一致，下一章再讲。

二、结束语句（END语句）
格式：End
作用：用来结束一个程序或一段程序的执行。

另外，End常与结构开头语句一起表示这一结构的结束。

如：
End Sub ’结束一个Sub过程
End Function’结束一个Function函数
End If’结束一个If选择结构
End Select’结束一个Select选择结构
三、注释语句
格式1：’注释内容（放在语句后面）格式2：Rem 注释内容（单独为一个语句）作用：给程序语句加上注释。

说明：注释语句是非执行语句，对程序结果没有任何影响，仅仅是对语句做注释。

注释内容可以是任何字符。

例如下列语句：
Rem 这是一个VB程序
A=1 : b=2
S=a*a+b*b ’求a,b的平方和
四、暂停语句（STOP语句）
格式：Stop
作用：暂停程序的执行，等同于“运行”菜单下的“中断”命令，并自动打开立即窗口，用于检查和调试程序。

作业：P50-51
直接写在书本。