§21 程序设计方法概述
程序设计方法发展分3阶段
想计算机解决问题必须事先设计计算机处理信息步骤步骤计算机够识指令编写出送入计算机执行计算机意图完成指定工作计算机执行指令序列称程序编写程序程称程序设计
初期程序设计
少占存运行效率高目标（计算机直接识机器指令01组成二进制编码集合）
程序算法+机器语言程序设计方法
二结构化程序设计
程序读性维护性目标
程序算法+数结构+计算机语言+面程程序设计方法
三面象程序设计
（）降低程序复杂性提高软件开法效率改善工作界面目标
程序象+消息+面象程序设计方法
（二）面象程序设计具优点：
1符合惯思维方法便分解型复杂变问题象应现实世界中实体然现实世界中处理实体方法处理象软件开发者方便问题提出者进行沟通交流
2易软件维护功增减象封装性象间松散组合软件修改维护带方便
3重性重复类（类象定义象类实例化）较方便构造出软件系统加继承方式极提高软件开发效率
4视化技术相结合改善工作界面着基图形界面操作系统流行面象程序设计方法深入心视化技术相结合机界面进入GUI时代
221 象类
象
象VB系统中基运行时实体窗体种控件等包括作象操作（方法）象响应（事件）数处理数程封装起组程序代码数集合
二类
类抽象整体概念象类实例化
类象面象程序设计语言基础
汽车例说明类象关系汽车笼统名称整体概念汽车成类辆辆具体汽车（汽车）类实例类象
工具箱种控件象代表类通类实例化真正象窗体画控件时类转换象创建控件象简称控件
图21 象类关系
三象建立命名
1象建立
方法：单击工具箱控件象窗体住左键拖拉需释放
方法二：双击工具箱控件象立窗体出现默认象框
2编辑象
◆ 先选中象（单击象）
◆ 放缩
◆ 删象
◆ 复制象
3象命名
象名字窗体控件象建立时VB系统出默认名户通属性窗口设置（名称）象命名
命名原：
◆ 必须字母汉字开头字母汉字数字划线（）串组成
◆ 长度≤255字符
221 象类
象
象VB系统中基运行时实体窗体种控件等包括作象操作（方法）象响应（事件）数处理数程封装起组程序代码数集合
二类
类抽象整体概念象类实例化
类象面象程序设计语言基础
汽车例说明类象关系汽车笼统名称整体概念汽车成类辆辆具体汽车（汽车）类实例类象
工具箱种控件象代表类通类实例化真正象窗体画控件时类转换象创建控件象简称控件
图21 象类关系
三象建立命名
1象建立
方法：单击工具箱控件象窗体住左键拖拉需释放
方法二：双击工具箱控件象立窗体出现默认象框
2编辑象
◆ 先选中象（单击象）
◆ 放缩
◆ 删象
◆ 复制象
3象命名
象名字窗体控件象建立时VB系统出默认名户通属性窗口设置（名称）象命名
命名原：
◆ 必须字母汉字开头字母汉字数字划线（）串组成
◆ 长度≤255字符
223 事件（Event）事件程（Event Procedure）
事件
事件——象识动作（象发生事情）
VB中事件预先定义够象识动作单击（Click）事件双击（Dblclick）事件装载（Load）事件鼠标移动（MouseMove）事件等象够识事件事件发生时VB检测两条信息发生种事件象接收事件种象识组预先定义事件非种事件会产生结果VB识事件发生象够某事件做出响应必须编写事件程代码
二事件程
事件程——指附该象段独立程序代码象检测某特定事件时执行(响应该事件)
象响应事件事件程户系统事件作出响应程序员需编写必须响应事件程事件程必编写命令钮单击（Click）事件较常见事件程需编写代码MouseDownMouseUp事件程序员根需选择
事件程形式：
Sub 象名_事件程名[（参数列表）]
(事件程代码)
End Sub[jc]
例：
Sub Command1_Click()
Command1VisibleFalse
End Sub
Visual Basic具视化编程机制程序设计时求画出种象设计图形户界面程序员需编写象完成功程序实际图形户界面应程序中户动作事件掌握着程序运行流事件驱动段程序运行程序员需编写响应户动作代码动作间定联系样应程序代码般较短程序易编写易维护种事件驱动编程机制非常适合图形户界面编程方式Visual Basic突出特点
224 方法（Method）
象操作程VB系统提供种特殊程函数——方法方法面象象方法调般指明象
象方法调形式：
[ 象]方法[ 参数列表 ]
省略象表示前象般指窗体
例：Form1print VB程序设计
前窗体Forml写：PrintVB程序设计
Visual Basic中窗体控件具属性方法事件象属性作象性质方法作象动作事件作象响应
举日常生活中简单例子助理解抽象概念伴说：请辆蓝色克2000型轿车开实句话里包含 Visual Basic象属性方法中象辆轿车件事情中目标物蓝色克2000型描述轿车特征轿车属性开轿车实施处理方法
VB方法事件程类似函数程完成某种特定功响应某事件象印（Print）方法显示窗体（Show）方法移动（Move）方法等方法完成某功实现步骤细节户修改户做工作约定直接调
方法代码中法赖方法需参数数否具返回值方法需参数没返回值时面格式调象方法
象名．方法名
图片框Picture1刷新显示方法Refresh事件程代码中调该方法代码：
Picture1·Refreshl
225 VB应程序工作方式
VB应程序采事件驱动应程序工作方式
面事件驱动应程序中典型工作方式：
◆ 启动应程序装载显示窗体
◆ 窗体（窗体控件）接收事件事件户引发（例通键盘鼠标操作）系统引发（例定时器事件）代码间接引发（例代码装载窗体时Load事件）
◆ 果相应事件程中已编写相应程序代码执行该代码
◆ 应程序等次事件
231 窗体属性
窗体属性决定窗体外观操作窗体外观图22：
图22 窗体外观
基属性
1Name名称属性（象具）
创建象名称默认名程序中控件名作象标识引会显示窗体
2Heightwidthtopleft属性
单位twip：1 twip120点11440英寸1567cm
注意：
四属性决定窗体（控件）容器中位置图23
图23
3Caption 标题属性
决定出现窗体标题栏文容窗体化出现窗体图标文图22中窗体Caption属性值VB窗体
4字体Font属性组
FontName属性字符型决定象正文字体（缺省宋体）
FontSize属性整型决定象正文字体
FontBold属性逻辑型决定象正文否粗体
FontItalic属性逻辑型决定象正文否斜体
FontStrikeThru属性逻辑型决定象正文否加删线
FontUnderLine属性逻辑型决定象正文否带划线
5Enabled属性（逻辑值）
决定控件否操作
True：允许户进行操作操作出响应（缺省值）
False：呈暗淡色禁止户进行操作
6Visible属性（逻辑值）
决定控件否见
True：运行时控件见（缺省值）
False：运行时控件隐藏户控件身存
7BackColor属性ForeColor属性
BackColor属性返回设置象背景颜色
ForeColor属性返回设置象里显示图片文前景颜色十六进制长整型数
程序代码中Windows运行环境红绿蓝（RGB）颜色方案调色板代码中RGBQBColor函数指定标准RGB颜色
例：窗体Form1背景色设置红色面三种情况：
Form1BackColorRGB(25500)
Form1BackColor&HFF&
Form1BackColorvbRed
二窗体常属性
1MaxButton化钮MinButton化钮：值True化钮False
2Icon控制图标属性：返回设置窗体左角显示化时显示图标
注意：
属性必须ControlBox属性设置True效
3ControlBox控制菜单框属性：设置True设置False控件菜单时窗体化钮化钮MaxButton属性MinButton属性设置True
4PicTrue图片属性：设置窗体中显示图片加载图片操作Icon控制图标属性
5BorderStyle：边框风格 通改变BorderStyle属性控制窗体调整
◆ 0None：边框
◆ 1单线边框改变窗口
◆ 2Sizable：双线边框改变窗口
◆ 3Fixed Double：双线框架改变窗口
◆ 4Fixed Tool Window窗体外观工具条相似关闭钮 改变窗口
◆ 5Sizable Tool Window：窗体外观工具条相似关闭钮 改变窗口
6WindowsState属性
◆ 0－正常窗口状态窗口边界
◆ 1－化状态图标方式运行
◆ 2－化状态边框充满整屏幕
7AutoRedraw属性
该属性决定窗体隐藏窗口覆盖重新显示否重新原该窗体隐藏覆盖前画面否重画CircleLinePsetPrint等方法输出
True时重新原该窗体前画面
False时重画AutoRedraw属性
232 窗体事件
窗体事件窗体识动作窗体关事件较Visual Basic 60中30时编程序时需事件编程户需掌握常事件解事件触发机制
1Click事件
程序运行时单击窗体某位置Visual Basic调窗体FompClick事件果单击窗体控件调相应控件Click事件
2DblClick事件
程序运行时双击窗体某位置触发两事件：第次动鼠标时触发Click事件第二次动鼠标产生DblClick事件
3Load事件
程序运行时窗体装入工作区触发Load事件该事件通常启动应程序时属性变量初始化
4Unload事件
卸载窗体时触发该事件
5Resize事件
户交互通代码调整窗体会触发Resize事件
233 窗体方法
窗体常方法：印输出Print移动Move清Cls显示Show隐藏Hide等方法形式：[象] 方法
Print方法
形式：[象]Print[{Spc(n)|Tab(n)}][表达式列表][|]
作：象输出信息
象：窗体图形框印机(Printer) 省略象窗体输出
Spc(n)函数：插入n空格允许重复
Tab(n)函数：左端开始右移动n列允许重复
(分号)：光标定位显示字符
(逗号)：光标定位印区开始位置处印区占14列
换行
开始印位置象CurrentXCurrentX属性决定缺省印象左角00
例窗体Form1单击事件中写入代码：
Private Sub Form_Click()
a 10 b 314 c 100
Print a a b b
Print a a b b
Print a a b b
Print ＇ 空行
Print a a b b
Print a a Tab(18) b b
Print a a Spc(18) b b
Print
Print a a b b
Print Tab(18) a a b b ＇ 第18列开始印输出
Print Spc(18) a a b b
End Sub
程序运行结果图：
二Cls方法
形式：[象]Cls
作：清运行时窗体图形框中显示文图形
注意：
清设计时文图形清屏坐标前回原点
三Move方法
形式：[象]Move 左边距离[边距离[宽度[高度]]]
作：移动窗体控件改变
象：窗体时钟菜单外控件省略代表窗体
左边距离边距离宽度高度：数值表达式twip单位果窗体象左边距边距屏幕左边界边界准窗体左边边界准
例Move方法移动窗体双击窗体窗体移动定位屏幕左角时窗体长宽缩倍
实现功窗体Forml代码窗口中输入列代码：
Private Sub Form_DblClick()
Form1Move 00Form1Width2Form1Height2
End Sub
四Show(显示)方法
Show方法屏幕显示窗体调 Show 方法设置窗体 Visible 属性 True 具相效果
调格式：
窗体名Show [vbModal | vbModeless]
说明：
◆ 两种值：vbModal（缺省）vbModelessShow方法选参数表示前窗口话框切换窗口话框前户必须采取动作参数vbModal时求户必须前窗口话框做出响应切换窗口
◆ 果显示窗体事先未装入该方法会动装入该窗体显示
五Hide(隐藏)方法
Hide方法指定窗体显示存中删窗体调格式：
窗体名Hide
说明：
◆ 窗体屏幕隐时Visible属性设置成False该窗体控件变访问运行程序间数引影响隐窗体没装入Hide方法会装入该窗体显示
例实现指定窗体屏幕进行显示隐藏切换
实现功窗体Forml代码窗口中输入列代码：
Private Sub Form_Click()
Form1Hide ＇ 隐藏窗体
MsgBox 单击确定钮窗体重现屏幕 ＇ 显示信息
FormlShow ＇ 重现窗体
End Sub
241 命令钮（CommandButton）
命令钮（CommandButton）控件：接受户输入命令
输入命令三种方式：
◆ 鼠标单击
◆ Tab键焦点跳转该钮 回车键
◆ 快捷键（Alt+划线字母）
属性
（）基属性
NameHeightWidthTopLeftEnabledVisibleFont等窗体相
（二）常属性
1Caption：标题属性——命令钮显示容某字母前加&设置快捷键
例：&Ok显示Ok
2Default：确认属性（逻辑值）设置True时Enter键相鼠标器单击该钮
注意：
窗体钮Default设置Ture
3Cancel：取消功属性（逻辑值）设置Ture时程序运行时Esc键单击命令钮效果相
注意：
窗体钮Cancel属性设置Ture
4Value：检查该钮否该属性设计时效
5Picture：钮显示图片文件(bmpIco)Style属性值设1时效
6Style：确定显示形0显示文字1文字图形均
7ToolTipText：设置工具提示Picture结合
Windows应软件户非常熟悉种情况十分清楚软件中某图标钮作时光标移图标钮停留片刻图标钮方立显示简短文字提示行说明图标钮作光标移开提示行立刻消失Visual Basic功命令钮提供属性Text1中Text运行设计时需该项属性设置需提示行文
二常方法
程序代码中通调命令钮方法实现命令钮相关功命令钮相关常方法：
（）Move方法
该方法窗体中Move方法样Visual Basic系统中视控件该方法窗体移动屏幕言控件移动相容器象言
（二）SetFocus方法
该方法设置指定命令钮获焦点旦SetFocus方法户输入（Enter键）立引导成焦点钮该方法前必须保证命令钮前处见状态VisibleEnabled属性应设置True
三常事件
单击事件Click命令钮控件说Click事件重触发方式单击命令钮时触发Click事件调执行已写入Click事件中代码数情况针该事件程编写代码242 标签控件（Label）
标签控件Label：显示文(输出)信息作输入信息界面
基属性
NameHeightWidthTopLeftEnabledVisibleFontForeColorBackColor等窗体相
二常属性
1Caption属性
Caption属性改变Label控件中显示文Caption属性允许文长度1024字节缺省情况文超控件宽度时文会动换行文超控件高度时超出部分裁剪掉
2Alignment属性
设置Caption属性中文齐方式三种选值：
0－左齐（Left Justify）
1－右齐（Right Justify）
2－居中齐（Center Justify）
3BackStyle属性
该属性确定标签背景否透明两种情况选：值0时表示背景透明标签背景图形见值1时表示透明标签背景图形见
4AutoSize属性
AutoSize属性确定标签否会标题容少动变化果值TrueCaption容动调整控件身换行果值False表示标签尺寸动调整超出尺寸范围容予显示
5WordWrap属性
例：窗体放置5标签名称默认值Label1－Label5高度宽度相属性窗口表21设置属性：
表21
默认控件名
Name
标题
Caption
关属性设置
Label1
左齐
Alignment0BorderStyle1
Label2
水居中
Alignment1BorderStyle1
Label3
动
AutoSizeTrueWordWarpFalseBorderStyle1
Label4
背景白
BackColor&H00FFFFFF&BorderStyle0
Label5
前景红
ForeColor&H000000FF&BorderStyle0
设置标签显示图24：
图24
三事件
标签响应单击（Click）双击（DblClick）事件般情况进行编程
243 文框（TextBox）
文框控件TextBox：文编辑区域该区域输入编辑显示正文容
属性
（）基属性
NameHeightWidthTopLeftEnabledVisibleFontForeColorBackColor等标签控件相
（二）常属性
1Text文属性
字符型返回设置文框中显示容Text属性文框默认属性（文框没Caption属性）
例：
Text1．Text＝VISllal Bllsic程序设计
Printi Text1．Text
等价
Textl＝visual Basic程序设计
Print Textl
2Maxlength：数值型返回设置文框中允许输入字符数默认值0意长度值表示文框中输入字符数没限制
例：Textl．MaxLength＝100 允许输入字符数100
3MultiLine：逻辑型决定控件否允许接受行文果该属性设置False文框中输入行文：设True行文输入文时回车键换行输入默认值False
4ScrollBars：数值型决定控件中没滚动条取0123四值MultiLineTrue时该属性效滚动条形式含义分：
0－None：滚动条默认值
1－Horizontal：控件中水滚动条
2－Vertical控件中垂直滚动条
3Both时具水滚动条垂直滚动条
5Locked：否编辑属性False表示编辑
6PassWordChar属性
字符型设置PasswordChar属性掩盖文框中输入字符该属性设置MultiLine设 False效默认状态PasswordChar设空串（空格）户输入字符显示文框中果设字符例＊户键入字符时文框中显示＊号Text属性接收户输入文
7SelStartSelLengthSelText属性
三属性文框中文编辑属性
SelStart：数值型程序运行期间设定返回前选择文起始位置未选择文插入点位置0表示选择第字符该属性值着户操作改变通赋值改变
SelLength：数值型前选中字符数程序运行期间设定返回文框中进行选择文操作时该属性值着选择字符少改变程序代码中赋值
例：Text1．SelLength＝0 ＇表示未选中字符
SelText：字符型表示前选取文字符串果前没选取文该属性返回空字符串果程序中该属性赋值SelText属性值代文框中选取文
例：
设文框Text1中行文：
Visual Basic programming
选择programming执行语句
Text1·SelText＝程序设计
Text1中显示文Text属性值变成：
Visual Basic程序设计
种情况属性SelLength值着改变Selstart会受影响243 文框（TextBox）
二常事件
（）Change
改变文框Text属性时会引发该事件输入字符会触发次Change事件
（二）KeyPress(KeyAscii As Integer)
键盘某键时触发该事件返回KeyAscii参数（字符Ascii值）该事件程中KeyPress识键入字符适窗体部分接受键盘输入控件
例：输入AKeyAscii值65函数Chr(KeyAscii)字符A
（三）LostFocus
Tab键光标离开前文框者鼠标选择窗体象时触发该事件称失焦点事件Change事件程LostFocus事件程检查文框Text属性值者更效
（四）GotFocus
Tab键鼠标选择象SetFocus方法光标落控件（窗体）时触发该事件称获焦点该事件适窗体部分接受键盘输入控件
三常方法
文框方法：SetFocus形式：
[象]SetFocus
功：光标移指定文框象中
SetFocus方法作焦点移指定象象获焦点该方法适文框窗体部分前见控件
Windows然允许时运行程序允许中窗口处理键盘事件窗口称前窗口前窗口说会含够接受输入控件窗体例文框组合框钮窗体身接受键盘输入键盘事件时控件处理显然合理Windows规定前窗口中允许控件窗体处理键盘事件象接受键盘输入处理键盘事件象称拥焦点接受键盘输入象称拥焦点
注意：
象原拥焦点现够接受键盘输入称获焦点反称失焦点
例Change事件改变文框Text属性窗体建立两命令钮三文框Name属性均取默认值：CommandlCommand2Text1Text2Text3然编写事件程：
Private Sub Command1_Click（）
Textl．Text＝Visual Basic程序设计
End Sub
Private Sub Text1_Change（）
Text2．Text＝LCase（Text1．Text）
Text3．Text＝UCase（Text1．Text）
End Sub
程序运行单击命令钮第文框显示Command1_Click 事件程设定容时触发控件Text1Change事件执行Text1_Change事件程分第二第三文框中写字母写字母显示文框Text1中容函数LCaseUCase汉字起作
图25
251 VB应程序组成
工程文件（Vbp）包含应程序文件：
◆ 窗体文件（frm）：控件属性事件程定义程
◆ 窗体二进制数文件（frx）动产生名frx文件
◆ 标准模块文件（bas）
◆ 类模块文件（cls）
◆ 资源文件（res）
◆ ActiveX控件文件（ocx）
VB应程序中文件结构关系请参见动画演示：
252 创建应程序步骤
创建应程序步骤
分析问题确定程序完成什务面步骤创建应程序
1新建工程创建应程序首先开新工程
2创建应程序界面
3设置属性值
4象事件程编程
5保存文件
6程序运行调试次保存修改程序
二简单Visual Basic程序创建
（）工具箱绘制控件
步骤：
（二）调整控件移动锁定控件
1单击需调整尺寸控件选定控件出现尺寸句柄
2鼠标指针定位尺寸句柄拖动该尺寸句柄直控件达希止
3释放鼠标钮
（三）设置属性
属性窗口包含元素：
（四）编写代码
1开代码编辑器窗口
图29显示双击命令钮控件弹出代码编辑器窗口该命令事件
图29 代码编辑器窗口
2事件程创建
VB应程序代码分干代码块代码块称程
◆ 象列表框中选定活动窗体中象名
◆ 程列表框中选择指定象事件名
◆ SubEnd Sub语句间输入面代码：
Text1Text Helloworld
◆ 事件程应该：
Private Sub Command1_Click()
Text1Text Helloworld
End Sub
（五）保存应程序
窗体代码设计应该保存文件防止调试运行程序时发生死机原引起文件丢失
（六）调试运行应程序
运行应程序运行菜单中选择启动者单击工具栏中启动钮F5键
（七）生成执行文件
调试果没发现错误建立工程执行文件见图210
图210
第二章 Visual Basic基控件简单程序设计
◆ 章教学容总结
VB集成开发环境提供设计运行测试应程序需种工具工作环境视化程序设计语言设计应程序完成界面设计编写事件驱动程序两部分工作建立编辑运行简单VB应程序全程熟悉VB面象编程思想掌握VB中控件基方法包括窗体命令钮文框标签象常属性方法事件事件驱动机制概念作
文档香网(httpswwwxiangdangnet)户传
《香当网》用户分享的内容，不代表《香当网》观点或立场，请自行判断内容的真实性和可靠性！
该内容是文档的文本内容，更好的格式请下载文档
程序设计方法发展分3阶段
想计算机解决问题必须事先设计计算机处理信息步骤步骤计算机够识指令编写出送入计算机执行计算机意图完成指定工作计算机执行指令序列称程序编写程序程称程序设计
初期程序设计
少占存运行效率高目标（计算机直接识机器指令01组成二进制编码集合）
程序算法+机器语言程序设计方法
二结构化程序设计
程序读性维护性目标
程序算法+数结构+计算机语言+面程程序设计方法
三面象程序设计
（）降低程序复杂性提高软件开法效率改善工作界面目标
程序象+消息+面象程序设计方法
（二）面象程序设计具优点：
1符合惯思维方法便分解型复杂变问题象应现实世界中实体然现实世界中处理实体方法处理象软件开发者方便问题提出者进行沟通交流
2易软件维护功增减象封装性象间松散组合软件修改维护带方便
3重性重复类（类象定义象类实例化）较方便构造出软件系统加继承方式极提高软件开发效率
4视化技术相结合改善工作界面着基图形界面操作系统流行面象程序设计方法深入心视化技术相结合机界面进入GUI时代
221 象类
象
象VB系统中基运行时实体窗体种控件等包括作象操作（方法）象响应（事件）数处理数程封装起组程序代码数集合
二类
类抽象整体概念象类实例化
类象面象程序设计语言基础
汽车例说明类象关系汽车笼统名称整体概念汽车成类辆辆具体汽车（汽车）类实例类象
工具箱种控件象代表类通类实例化真正象窗体画控件时类转换象创建控件象简称控件
图21 象类关系
三象建立命名
1象建立
方法：单击工具箱控件象窗体住左键拖拉需释放
方法二：双击工具箱控件象立窗体出现默认象框
2编辑象
◆ 先选中象（单击象）
◆ 放缩
◆ 删象
◆ 复制象
3象命名
象名字窗体控件象建立时VB系统出默认名户通属性窗口设置（名称）象命名
命名原：
◆ 必须字母汉字开头字母汉字数字划线（）串组成
◆ 长度≤255字符
221 象类
象
象VB系统中基运行时实体窗体种控件等包括作象操作（方法）象响应（事件）数处理数程封装起组程序代码数集合
二类
类抽象整体概念象类实例化
类象面象程序设计语言基础
汽车例说明类象关系汽车笼统名称整体概念汽车成类辆辆具体汽车（汽车）类实例类象
工具箱种控件象代表类通类实例化真正象窗体画控件时类转换象创建控件象简称控件
图21 象类关系
三象建立命名
1象建立
方法：单击工具箱控件象窗体住左键拖拉需释放
方法二：双击工具箱控件象立窗体出现默认象框
2编辑象
◆ 先选中象（单击象）
◆ 放缩
◆ 删象
◆ 复制象
3象命名
象名字窗体控件象建立时VB系统出默认名户通属性窗口设置（名称）象命名
命名原：
◆ 必须字母汉字开头字母汉字数字划线（）串组成
◆ 长度≤255字符
223 事件（Event）事件程（Event Procedure）
事件
事件——象识动作（象发生事情）
VB中事件预先定义够象识动作单击（Click）事件双击（Dblclick）事件装载（Load）事件鼠标移动（MouseMove）事件等象够识事件事件发生时VB检测两条信息发生种事件象接收事件种象识组预先定义事件非种事件会产生结果VB识事件发生象够某事件做出响应必须编写事件程代码
二事件程
事件程——指附该象段独立程序代码象检测某特定事件时执行(响应该事件)
象响应事件事件程户系统事件作出响应程序员需编写必须响应事件程事件程必编写命令钮单击（Click）事件较常见事件程需编写代码MouseDownMouseUp事件程序员根需选择
事件程形式：
Sub 象名_事件程名[（参数列表）]
(事件程代码)
End Sub[jc]
例：
Sub Command1_Click()
Command1VisibleFalse
End Sub
Visual Basic具视化编程机制程序设计时求画出种象设计图形户界面程序员需编写象完成功程序实际图形户界面应程序中户动作事件掌握着程序运行流事件驱动段程序运行程序员需编写响应户动作代码动作间定联系样应程序代码般较短程序易编写易维护种事件驱动编程机制非常适合图形户界面编程方式Visual Basic突出特点
224 方法（Method）
象操作程VB系统提供种特殊程函数——方法方法面象象方法调般指明象
象方法调形式：
[ 象]方法[ 参数列表 ]
省略象表示前象般指窗体
例：Form1print VB程序设计
前窗体Forml写：PrintVB程序设计
Visual Basic中窗体控件具属性方法事件象属性作象性质方法作象动作事件作象响应
举日常生活中简单例子助理解抽象概念伴说：请辆蓝色克2000型轿车开实句话里包含 Visual Basic象属性方法中象辆轿车件事情中目标物蓝色克2000型描述轿车特征轿车属性开轿车实施处理方法
VB方法事件程类似函数程完成某种特定功响应某事件象印（Print）方法显示窗体（Show）方法移动（Move）方法等方法完成某功实现步骤细节户修改户做工作约定直接调
方法代码中法赖方法需参数数否具返回值方法需参数没返回值时面格式调象方法
象名．方法名
图片框Picture1刷新显示方法Refresh事件程代码中调该方法代码：
Picture1·Refreshl
225 VB应程序工作方式
VB应程序采事件驱动应程序工作方式
面事件驱动应程序中典型工作方式：
◆ 启动应程序装载显示窗体
◆ 窗体（窗体控件）接收事件事件户引发（例通键盘鼠标操作）系统引发（例定时器事件）代码间接引发（例代码装载窗体时Load事件）
◆ 果相应事件程中已编写相应程序代码执行该代码
◆ 应程序等次事件
231 窗体属性
窗体属性决定窗体外观操作窗体外观图22：
图22 窗体外观
基属性
1Name名称属性（象具）
创建象名称默认名程序中控件名作象标识引会显示窗体
2Heightwidthtopleft属性
单位twip：1 twip120点11440英寸1567cm
注意：
四属性决定窗体（控件）容器中位置图23
图23
3Caption 标题属性
决定出现窗体标题栏文容窗体化出现窗体图标文图22中窗体Caption属性值VB窗体
4字体Font属性组
FontName属性字符型决定象正文字体（缺省宋体）
FontSize属性整型决定象正文字体
FontBold属性逻辑型决定象正文否粗体
FontItalic属性逻辑型决定象正文否斜体
FontStrikeThru属性逻辑型决定象正文否加删线
FontUnderLine属性逻辑型决定象正文否带划线
5Enabled属性（逻辑值）
决定控件否操作
True：允许户进行操作操作出响应（缺省值）
False：呈暗淡色禁止户进行操作
6Visible属性（逻辑值）
决定控件否见
True：运行时控件见（缺省值）
False：运行时控件隐藏户控件身存
7BackColor属性ForeColor属性
BackColor属性返回设置象背景颜色
ForeColor属性返回设置象里显示图片文前景颜色十六进制长整型数
程序代码中Windows运行环境红绿蓝（RGB）颜色方案调色板代码中RGBQBColor函数指定标准RGB颜色
例：窗体Form1背景色设置红色面三种情况：
Form1BackColorRGB(25500)
Form1BackColor&HFF&
Form1BackColorvbRed
二窗体常属性
1MaxButton化钮MinButton化钮：值True化钮False
2Icon控制图标属性：返回设置窗体左角显示化时显示图标
注意：
属性必须ControlBox属性设置True效
3ControlBox控制菜单框属性：设置True设置False控件菜单时窗体化钮化钮MaxButton属性MinButton属性设置True
4PicTrue图片属性：设置窗体中显示图片加载图片操作Icon控制图标属性
5BorderStyle：边框风格 通改变BorderStyle属性控制窗体调整
◆ 0None：边框
◆ 1单线边框改变窗口
◆ 2Sizable：双线边框改变窗口
◆ 3Fixed Double：双线框架改变窗口
◆ 4Fixed Tool Window窗体外观工具条相似关闭钮 改变窗口
◆ 5Sizable Tool Window：窗体外观工具条相似关闭钮 改变窗口
6WindowsState属性
◆ 0－正常窗口状态窗口边界
◆ 1－化状态图标方式运行
◆ 2－化状态边框充满整屏幕
7AutoRedraw属性
该属性决定窗体隐藏窗口覆盖重新显示否重新原该窗体隐藏覆盖前画面否重画CircleLinePsetPrint等方法输出
True时重新原该窗体前画面
False时重画AutoRedraw属性
232 窗体事件
窗体事件窗体识动作窗体关事件较Visual Basic 60中30时编程序时需事件编程户需掌握常事件解事件触发机制
1Click事件
程序运行时单击窗体某位置Visual Basic调窗体FompClick事件果单击窗体控件调相应控件Click事件
2DblClick事件
程序运行时双击窗体某位置触发两事件：第次动鼠标时触发Click事件第二次动鼠标产生DblClick事件
3Load事件
程序运行时窗体装入工作区触发Load事件该事件通常启动应程序时属性变量初始化
4Unload事件
卸载窗体时触发该事件
5Resize事件
户交互通代码调整窗体会触发Resize事件
233 窗体方法
窗体常方法：印输出Print移动Move清Cls显示Show隐藏Hide等方法形式：[象] 方法
Print方法
形式：[象]Print[{Spc(n)|Tab(n)}][表达式列表][|]
作：象输出信息
象：窗体图形框印机(Printer) 省略象窗体输出
Spc(n)函数：插入n空格允许重复
Tab(n)函数：左端开始右移动n列允许重复
(分号)：光标定位显示字符
(逗号)：光标定位印区开始位置处印区占14列
换行
开始印位置象CurrentXCurrentX属性决定缺省印象左角00
例窗体Form1单击事件中写入代码：
Private Sub Form_Click()
a 10 b 314 c 100
Print a a b b
Print a a b b
Print a a b b
Print ＇ 空行
Print a a b b
Print a a Tab(18) b b
Print a a Spc(18) b b
Print a a b b
Print Tab(18) a a b b ＇ 第18列开始印输出
Print Spc(18) a a b b
End Sub
程序运行结果图：
二Cls方法
形式：[象]Cls
作：清运行时窗体图形框中显示文图形
注意：
清设计时文图形清屏坐标前回原点
三Move方法
形式：[象]Move 左边距离[边距离[宽度[高度]]]
作：移动窗体控件改变
象：窗体时钟菜单外控件省略代表窗体
左边距离边距离宽度高度：数值表达式twip单位果窗体象左边距边距屏幕左边界边界准窗体左边边界准
例Move方法移动窗体双击窗体窗体移动定位屏幕左角时窗体长宽缩倍
实现功窗体Forml代码窗口中输入列代码：
Private Sub Form_DblClick()
Form1Move 00Form1Width2Form1Height2
End Sub
四Show(显示)方法
Show方法屏幕显示窗体调 Show 方法设置窗体 Visible 属性 True 具相效果
调格式：
窗体名Show [vbModal | vbModeless]
说明：
◆ 两种值：vbModal（缺省）vbModelessShow方法选参数表示前窗口话框切换窗口话框前户必须采取动作参数vbModal时求户必须前窗口话框做出响应切换窗口
◆ 果显示窗体事先未装入该方法会动装入该窗体显示
五Hide(隐藏)方法
Hide方法指定窗体显示存中删窗体调格式：
窗体名Hide
说明：
◆ 窗体屏幕隐时Visible属性设置成False该窗体控件变访问运行程序间数引影响隐窗体没装入Hide方法会装入该窗体显示
例实现指定窗体屏幕进行显示隐藏切换
实现功窗体Forml代码窗口中输入列代码：
Private Sub Form_Click()
Form1Hide ＇ 隐藏窗体
MsgBox 单击确定钮窗体重现屏幕 ＇ 显示信息
FormlShow ＇ 重现窗体
End Sub
241 命令钮（CommandButton）
命令钮（CommandButton）控件：接受户输入命令
输入命令三种方式：
◆ 鼠标单击
◆ Tab键焦点跳转该钮 回车键
◆ 快捷键（Alt+划线字母）
属性
（）基属性
NameHeightWidthTopLeftEnabledVisibleFont等窗体相
（二）常属性
1Caption：标题属性——命令钮显示容某字母前加&设置快捷键
例：&Ok显示Ok
2Default：确认属性（逻辑值）设置True时Enter键相鼠标器单击该钮
注意：
窗体钮Default设置Ture
3Cancel：取消功属性（逻辑值）设置Ture时程序运行时Esc键单击命令钮效果相
注意：
窗体钮Cancel属性设置Ture
4Value：检查该钮否该属性设计时效
5Picture：钮显示图片文件(bmpIco)Style属性值设1时效
6Style：确定显示形0显示文字1文字图形均
7ToolTipText：设置工具提示Picture结合
Windows应软件户非常熟悉种情况十分清楚软件中某图标钮作时光标移图标钮停留片刻图标钮方立显示简短文字提示行说明图标钮作光标移开提示行立刻消失Visual Basic功命令钮提供属性Text1中Text运行设计时需该项属性设置需提示行文
二常方法
程序代码中通调命令钮方法实现命令钮相关功命令钮相关常方法：
（）Move方法
该方法窗体中Move方法样Visual Basic系统中视控件该方法窗体移动屏幕言控件移动相容器象言
（二）SetFocus方法
该方法设置指定命令钮获焦点旦SetFocus方法户输入（Enter键）立引导成焦点钮该方法前必须保证命令钮前处见状态VisibleEnabled属性应设置True
三常事件
单击事件Click命令钮控件说Click事件重触发方式单击命令钮时触发Click事件调执行已写入Click事件中代码数情况针该事件程编写代码242 标签控件（Label）
标签控件Label：显示文(输出)信息作输入信息界面
基属性
NameHeightWidthTopLeftEnabledVisibleFontForeColorBackColor等窗体相
二常属性
1Caption属性
Caption属性改变Label控件中显示文Caption属性允许文长度1024字节缺省情况文超控件宽度时文会动换行文超控件高度时超出部分裁剪掉
2Alignment属性
设置Caption属性中文齐方式三种选值：
0－左齐（Left Justify）
1－右齐（Right Justify）
2－居中齐（Center Justify）
3BackStyle属性
该属性确定标签背景否透明两种情况选：值0时表示背景透明标签背景图形见值1时表示透明标签背景图形见
4AutoSize属性
AutoSize属性确定标签否会标题容少动变化果值TrueCaption容动调整控件身换行果值False表示标签尺寸动调整超出尺寸范围容予显示
5WordWrap属性
例：窗体放置5标签名称默认值Label1－Label5高度宽度相属性窗口表21设置属性：
表21
默认控件名
Name
标题
Caption
关属性设置
Label1
左齐
Alignment0BorderStyle1
Label2
水居中
Alignment1BorderStyle1
Label3
动
AutoSizeTrueWordWarpFalseBorderStyle1
Label4
背景白
BackColor&H00FFFFFF&BorderStyle0
Label5
前景红
ForeColor&H000000FF&BorderStyle0
设置标签显示图24：
图24
三事件
标签响应单击（Click）双击（DblClick）事件般情况进行编程
243 文框（TextBox）
文框控件TextBox：文编辑区域该区域输入编辑显示正文容
属性
（）基属性
NameHeightWidthTopLeftEnabledVisibleFontForeColorBackColor等标签控件相
（二）常属性
1Text文属性
字符型返回设置文框中显示容Text属性文框默认属性（文框没Caption属性）
例：
Text1．Text＝VISllal Bllsic程序设计
Printi Text1．Text
等价
Textl＝visual Basic程序设计
Print Textl
2Maxlength：数值型返回设置文框中允许输入字符数默认值0意长度值表示文框中输入字符数没限制
例：Textl．MaxLength＝100 允许输入字符数100
3MultiLine：逻辑型决定控件否允许接受行文果该属性设置False文框中输入行文：设True行文输入文时回车键换行输入默认值False
4ScrollBars：数值型决定控件中没滚动条取0123四值MultiLineTrue时该属性效滚动条形式含义分：
0－None：滚动条默认值
1－Horizontal：控件中水滚动条
2－Vertical控件中垂直滚动条
3Both时具水滚动条垂直滚动条
5Locked：否编辑属性False表示编辑
6PassWordChar属性
字符型设置PasswordChar属性掩盖文框中输入字符该属性设置MultiLine设 False效默认状态PasswordChar设空串（空格）户输入字符显示文框中果设字符例＊户键入字符时文框中显示＊号Text属性接收户输入文
7SelStartSelLengthSelText属性
三属性文框中文编辑属性
SelStart：数值型程序运行期间设定返回前选择文起始位置未选择文插入点位置0表示选择第字符该属性值着户操作改变通赋值改变
SelLength：数值型前选中字符数程序运行期间设定返回文框中进行选择文操作时该属性值着选择字符少改变程序代码中赋值
例：Text1．SelLength＝0 ＇表示未选中字符
SelText：字符型表示前选取文字符串果前没选取文该属性返回空字符串果程序中该属性赋值SelText属性值代文框中选取文
例：
设文框Text1中行文：
Visual Basic programming
选择programming执行语句
Text1·SelText＝程序设计
Text1中显示文Text属性值变成：
Visual Basic程序设计
种情况属性SelLength值着改变Selstart会受影响243 文框（TextBox）
二常事件
（）Change
改变文框Text属性时会引发该事件输入字符会触发次Change事件
（二）KeyPress(KeyAscii As Integer)
键盘某键时触发该事件返回KeyAscii参数（字符Ascii值）该事件程中KeyPress识键入字符适窗体部分接受键盘输入控件
例：输入AKeyAscii值65函数Chr(KeyAscii)字符A
（三）LostFocus
Tab键光标离开前文框者鼠标选择窗体象时触发该事件称失焦点事件Change事件程LostFocus事件程检查文框Text属性值者更效
（四）GotFocus
Tab键鼠标选择象SetFocus方法光标落控件（窗体）时触发该事件称获焦点该事件适窗体部分接受键盘输入控件
三常方法
文框方法：SetFocus形式：
[象]SetFocus
功：光标移指定文框象中
SetFocus方法作焦点移指定象象获焦点该方法适文框窗体部分前见控件
Windows然允许时运行程序允许中窗口处理键盘事件窗口称前窗口前窗口说会含够接受输入控件窗体例文框组合框钮窗体身接受键盘输入键盘事件时控件处理显然合理Windows规定前窗口中允许控件窗体处理键盘事件象接受键盘输入处理键盘事件象称拥焦点接受键盘输入象称拥焦点
注意：
象原拥焦点现够接受键盘输入称获焦点反称失焦点
例Change事件改变文框Text属性窗体建立两命令钮三文框Name属性均取默认值：CommandlCommand2Text1Text2Text3然编写事件程：
Private Sub Command1_Click（）
Textl．Text＝Visual Basic程序设计
End Sub
Private Sub Text1_Change（）
Text2．Text＝LCase（Text1．Text）
Text3．Text＝UCase（Text1．Text）
End Sub
程序运行单击命令钮第文框显示Command1_Click 事件程设定容时触发控件Text1Change事件执行Text1_Change事件程分第二第三文框中写字母写字母显示文框Text1中容函数LCaseUCase汉字起作
图25
251 VB应程序组成
工程文件（Vbp）包含应程序文件：
◆ 窗体文件（frm）：控件属性事件程定义程
◆ 窗体二进制数文件（frx）动产生名frx文件
◆ 标准模块文件（bas）
◆ 类模块文件（cls）
◆ 资源文件（res）
◆ ActiveX控件文件（ocx）
VB应程序中文件结构关系请参见动画演示：
252 创建应程序步骤
创建应程序步骤
分析问题确定程序完成什务面步骤创建应程序
1新建工程创建应程序首先开新工程
2创建应程序界面
3设置属性值
4象事件程编程
5保存文件
6程序运行调试次保存修改程序
二简单Visual Basic程序创建
（）工具箱绘制控件
步骤：
（二）调整控件移动锁定控件
1单击需调整尺寸控件选定控件出现尺寸句柄
2鼠标指针定位尺寸句柄拖动该尺寸句柄直控件达希止
3释放鼠标钮
（三）设置属性
属性窗口包含元素：
（四）编写代码
1开代码编辑器窗口
图29显示双击命令钮控件弹出代码编辑器窗口该命令事件
图29 代码编辑器窗口
2事件程创建
VB应程序代码分干代码块代码块称程
◆ 象列表框中选定活动窗体中象名
◆ 程列表框中选择指定象事件名
◆ SubEnd Sub语句间输入面代码：
Text1Text Helloworld
◆ 事件程应该：
Private Sub Command1_Click()
Text1Text Helloworld
End Sub
（五）保存应程序
窗体代码设计应该保存文件防止调试运行程序时发生死机原引起文件丢失
（六）调试运行应程序
运行应程序运行菜单中选择启动者单击工具栏中启动钮F5键
（七）生成执行文件
调试果没发现错误建立工程执行文件见图210
图210
第二章 Visual Basic基控件简单程序设计
◆ 章教学容总结
VB集成开发环境提供设计运行测试应程序需种工具工作环境视化程序设计语言设计应程序完成界面设计编写事件驱动程序两部分工作建立编辑运行简单VB应程序全程熟悉VB面象编程思想掌握VB中控件基方法包括窗体命令钮文框标签象常属性方法事件事件驱动机制概念作
文档香网(httpswwwxiangdangnet)户传
《香当网》用户分享的内容，不代表《香当网》观点或立场，请自行判断内容的真实性和可靠性！
该内容是文档的文本内容，更好的格式请下载文档
