跟我学VB6自编教程1.docx

1、跟我学VB6自编教程1第一章 认识VB6第一节 VB简介一、Visual Basic是什么？ Visual Basic,简称VB，是Microsoft公司推出的一种Windows应用程序开发工具。是当今世界上使用最广泛的编程语言之一，它也被公认为是编程效率最高的一种编程方法。无论是开发功能强大、性能可靠的商务软件，还是编写能处理实际问题的实用小程序，VB都是最快速、最简便的方法。 何谓 Visual Basic？“Visual”指的是采用可视化的开发图形用户界面（GUI）的方法，一般不需要编写大量代码去描述界面元素的外观和位置，而只要把需要的控件拖放到屏幕上的相应位置即可；“Basic”指的是

2、BASIC语言，因为VB是在原有的BASIC语言的基础上发展起来的，至今包含了数百条语句、函数及关键词，其中很多和 Windows GUI 有直接关系。专业人员可以用 Visual Basic 实现其它任何 Windows 编程语言的功能，而初学者只要掌握几个关键词就可以建立实用的应用程序。 VB提供了学习版、专业版和企业版，用以满足不同的开发需要。学习版使编程人员很容易地开发Windows和Windows NT的应用程序；专业版为专业编程人员提供了功能完备的开发工具；企业版允许专业人员以小组的形式来创建强健的分布式应用程序。二、能用 Visual Basic 干什么呢？ Visual Bas

3、ic 所做的很多事情一点也不简单。它是一种强大的语言，即您所能想到的编程任务，它基本都能完成。从设计新型的用户界面到利用其它应用程序的对象；从处理文字图象到使用数据库；从开发个人或小组使用的小工具，到大型企业应用系统，甚至通过 Internet 的遍及全球分布式应用程序，都可在 Visual Basic 提供的工具中各取所需。 VB是微软公司的一种通用程序设计语言，包含在Microsoft Excel、Microsoft Access等众多Windows应用软件种的VBA都使用VB语言，以供用户二次开发；目前制作网页使用较多的VBScript脚本语言也是VB的子集。 利用 VB的数据访问特性，

4、用户可以对包括Microsoft SQL Server和其他企业数据库在内的大部分数据库格式创建数据库和前端应用程序，以及可调整的服务器端部件。利用ActiveX(TM)技术，VB可使用如Microsoft Word、Microsoft Excel及其他Windows应用程序提供的功能，甚至可直接使用VB专业版和企业版创建的应用程序对象。 三、关于VB语言的前景 在目前各种编程语言共存的时代，VB会不会落伍呢？当然不会了。 从1991年VB诞生之日起到现在已经有七个版本了（最新.NET版）这么高的更新率，不外乎说明两个问题：用户对VB的热衷，微软对VB的重视。不可否认微软对市场的预测能力是极为

5、高明的，而它强大的技术、财力支持也使它在许多以前未进入的领域，在不长的时间内有成为最有力的竞争对手， 对于VB现在也有一个很强的竞争对手Delphi，有人把它称作VB杀手，这显然有偏激之处，VB的确有它的不足之处，但Delphi又何尝不是呢，而且以微软对VB的倾心，VB的功能必然会越来越强大。 我们这些所谓的 VB 程序员总算可以放心了，VB不会落后于时代，毕竟它是使用人数最多的优秀的开发工具。 四、怎样学习VB语言？ 如果你是一个对编程一无所知，而又迫切希望掌握一种快捷实用的编程语言的初学者，那选择Visual Basic没错的。它的快捷的开发速度，简单易学的语法，体贴便利的开发环境，是初学

6、者的首选。 也许你会问，我以前没学过任何一种语言，我能快速上手吗？别担心，没问题。VB的语法的和QBASIB语言是基本相同的，也就是说它的语法是最容易被初学者所接受的。另外VB提供的是可视化的开发环境，我们可以象搭积木一样构建出程序的界面，而且VB提供了丰富的控件组，省去了我们自己写代码实现这些效果的麻烦，这样我们就能把更多的精力放在程序功能的实现上，所以VB学起来简单，用起来方便。 怎样才能学好VB编程呢？我的体会就是“实例学习”，即通过在学习、编制生动有趣的小例子的过程中掌握VB编程的知识点和编程小技巧，这是最有效的学习方法。 今后在VB学习这个版块，我们会向大家推荐一些好的实例、编程技巧

7、。如果学习过程中遇到了什么问题，或者有什么好的心得，你向我们提问求助或是发表文章。大家一起来交流吧！ 万事开头难，刚刚开始，遇到些困难没关系，慢慢来。编程是一个不断学习，不断积累的过程，编程的乐趣也正是存在于学习的过程中。我们每学一点，就赶快把它用到实际的程序中去，自己多学多用多实践，水平才能不断提高，这就是“学以致用”。 另外，编程涉及到很多的知识，象操作系统的、软件工程的、硬件系统的以及编程思想等各个方面，这就需要我们多看看这方面的资料，扩充自己的知识面。五、明确几个小概念对象：是面向对象程序设计的核心，是对现实世界中对象的模型化，是代码和数据的组合，具有自己的状态和行为，如某个同学。学好

8、VB的诀窍之一是要以“对象”的眼光去看待整个程序设计。属性：对象中的数据，用来表示对象的状态，决定对象的外观。方法：对象中的代码，决定对象可以进行的动作。类：用来创建对象的样板，包含所创建对象的状态描述和方法定义，对象是类的一个实例，如球和排球的关系。事件：来自外部的刺激，能被对象所识别的动作，如鼠标单击。事件决定了对象之间联系的手段。事件过程：对象对事件作出的反应。事件驱动：在程序中流动的是事件，只有在事件发生时，程序才会运行。在VB程序设计中，基本的设计机制就是改变对象的属性，使用对象的方法和为对象事件编写事件过程。窗体：是创建应用程序界面的基础，相当于一块画布，应用程序界面会全部在此画出

9、，是运行应用程序时，与用户交互操作的实际窗口。控件：组成用户界面的基本构件，如标签、命令按钮等。每个控件按钮可以看作是一个类，单击按钮在窗体上画下，即为由相应的类创建的对象。从以上几个概念，我们可以感觉到：用VB编程，即先用面向对象的方法去分析所要解决的问题-建模-画界面-编写代码-调试运行。第二节 VB6的操作界面一、VB6的安装点击安装文件，输入SN：111-1111111，选择目录进行安装即可。二、启动VB6点击VB6图标，可以进入VB6程序。三、退出VB6点击右上角关闭按键或文件|退出即可。四、操作界面进入VB6，首先是选择工程的性质，现在我们先按新建|标准来建一个新的工程。主窗口：由

10、标题栏、菜单栏、工具栏和工作桌面组成。标题栏 、菜单栏：工具栏：工作桌面（对象窗口）：工作桌面（对象窗口）：工程资源管理器：对象属性窗口：第二章 控件1.01、窗体(FORM)的常用属性属性说明(Name)窗体的名称ActiveControl返回焦点所在的控件,该属性设计阶段不可用,运行时只读。Appearance外观效果,取值为：0 平面1 3D(立体)AutoRedraw是否自动刷新或重画窗体上所有图形获得或设置从绘图(graphics)方法到一个持久性位图的输出,取值为：TrueFalseBackColor背景颜色,可从弹出的调色板选择。BorderStyle设置边界类型,取值为：0 N

11、one(无边界框架)1 FixedSingle(窗口大小固定不变的单线框架)2 Sizable(窗口大小可变的标准双线框架)3 FixedDialog(窗口大小固定的对话框窗体)4 FixedToolWindow(窗口大小固定的工具箱窗体)5 Sizable ToolWindow(窗口大小可变的工具箱窗体)Caption窗体的标题ClipControls决定Paint事件的graphics方法是重画整个对象,还是重画新显示的区域。取值为：True或FalseControlBox是或有控制框, 取值为：True 有False 无DrawMode设定窗体上绘图(graphics方法),Shape,

12、Line等控件的输出外观,有16种可选：1 黑色2 非或笔,设置值15的反相3 与非笔,背景色以及画笔反相二者共有颜色的组合4 非复制笔,设置值13的反相5 与笔非,画笔以及显示色反相二者共有颜色的组合6 反相,显示颜色反相7 异或笔,画笔颜色以及显示颜色的异或8 非与笔,设置值9的反相9 与笔,画笔以及显示色二者共有颜色的组合10 非异或笔,设置值7的反相11 无操作,该设置实际上是不画图12 或非笔,显示颜色与画笔颜色反相的组合13 复制笔,用ForeColor属性指定的颜色,此为默认值14 或笔非,画笔颜色与显示颜色反相的组合15 或笔,画笔颜色与显示颜色的组合16 白色DrawStyl

13、e设定绘图相关方法使用的直线样式, 有7种可选：0 实线,此为默认值1 虚线2 点线3 单点划线4 双点划线5 无线6 内部实线DrawWidth设定绘图相关方法使用的直线宽度Enabled是或把鼠标或键盘事件发送到窗体,取值为：True 可用False 不可用FillColor填充颜色, 可从弹出的调色板选择。FillStyle填充样式, 有8种可选：0 全部填充1 透明,此为默认值2 水平直线3 竖直直线4 上斜对角线5 下斜对角线6 十字线7 交叉对角线Font字型,可从弹出的对话框选择字体,大小和风格FontTransparent输出数据是否允许重叠(获得或设置一个值,决定是否显示窗体

14、,打印机或PictureBox上的背景文本/图形)。取值为：True或FalseForeColor前景颜色,可从弹出的调色板选择。HasDC决定是否为该控件分配了唯一的显示上下文。取值为：True或FalseHeight窗体的高度HelpContextID指定一个对象的缺省帮助文件上下文标识符Icon为窗体设计图标,该图标位于标题栏的左端KeyPrevier获得或设置是否在激活对象的上的控件的键盘事件之前,优先激活对象键盘事件。取值为：True或FalseLeft窗体距屏幕左边界的距离LinkMode获得或设置用于DDE会话的链接类型并激活连接,取值为：0 None1 SourceLinkTo

15、pic获得或设置目标控件的源应用程序和主题MaxButton窗体右上角最大化按钮是否显示,运行时只读, 取值为：True 显示False 不显示MDIChild是否为MDI窗体的子窗体, 取值为：True 为MDI窗体的子窗体False 否MinButton窗体右上角最小化按钮是否显示,运行时只读, 取值为：True 显示False 不显示MouseIconMousePointer=99时,设定一个自定义的鼠标图标MousePointerMoveable是否可以移动窗体, 取值为：True 可以移动False 不可以移动NegotiateMenus决定是否将对象的菜单合并到该窗体的菜单栏上。取

16、值为：True或FalseOLEDropMode获得或设置该对象是否能作为一个OLE放下目标, 取值为：0 None(无)1 Manual(手动)Palette获得或设置一个图象,包含了当PaletteMode被设置为Custom时用于调色板的对象。PaletteMode获得或设置一个值,决定对于对象的控件使用哪个调色板。取值为：0 Halftone1 UseZOrder2 CustomPicture窗体背景图片RightToLeft文本书写是否自左向右。取值为：TrueFalse 自右向左ScaleHeight自定义坐标系的纵坐标轴的高度ScaleLeft自定义坐标系的左边界起点的横坐标Sc

17、aleMode获得或设置一个值,指示当使用graphics方法或可定位的控件时,自定义坐标系的单位, 有8种可选：0 自定义1 表示单位为twip(缇),每英寸=1440缇,每厘米=567缇2 表示单位为point(磅) ,每英寸=72磅,每磅=20缇3 表示单位为像素,是监视器或打印机分辨率的最小单位4 表示单位为字符,每个水平单位为120缇,每个垂直单位为240缇5 表示单位为in(英寸)6 表示单位为mm(毫米)7 表示单位为cm(厘米)ScaleTop自定义坐标系的上边界起点的纵坐标ScaleWidth自定义坐标系的横坐标轴的宽度ShowInTaskbar窗体或MDI窗体是否出现在Wi

18、ndows95的任务栏。取值为：True 出现False 不出现StartUpPosition窗体第一次出现的位置, 有4种可选：0 没有指定初始位置1 设定在所属项目的中央2 设置在屏幕的中央3 设置在屏幕的左上角Tag存储程序所需的附加数据Top窗体距屏幕顶部边界的距离Visible窗体是否可见, 取值为：True 该对象可见False 该对象不可见WhatsThisButton获得或设置是否在一个窗体或MDI窗体的标题上显示这是什么按钮。取值为：True或FalseWhatsThisHelp获得或设置是否在上下文相关帮助中, 使用Windows95帮助或主帮助窗口提供的这是什么弹出菜单。

19、取值为：True或FalseWidth窗体的宽度WindowStart获得或设置一个窗体窗口运行时的可见状态, 取值为：0 窗体正常状态1 窗体最小状态2 窗体最大状态1.02、标签控件(Lable)的常用属性属性说明(Name)标签控件的名称Alignment设置Caption属性文本的对齐方式, 取值为：0 左对齐1 右对齐2 中间对齐Appearance是否用立体效果绘制,取值为：0 平面1 3D(立体)AutoSize控件对象的大小是否随标题内容的大小自动调整,取值为：True 是False 否BackColor设置背景颜色,可从弹出的调色板选择。BackStyle设置背景样式,取值为

20、：0 Transparent(透明)1 Opaque(不透明)BorderStyle设置边界样式,取值为：0 None(无边界线)1 FixedSingle(固定单线框)Caption标签控件的标题DataField获得或设置一个值,将控件绑定到当前记录的一个字段DataFormat返回DataFormat对象,用于该部件的可绑定性(打开属性页,选择格式类型)DataMember获得或设置一个值,为数据连接描述数据成员DataSource设置一个数值,指出数据控件通过它将当前控件绑定到数据库DragIcon该对象在拖动过程中鼠标的图标DragMode该对象的拖动模式,取值为：0 Manual(

21、手动)1 Automatic(自动)Enabled用于设定是或对事件产生响应,取值为：True 可用False 不可用,在执行程序时,该对象用灰色显示,并且不响应任何事件Font字型,可从弹出的对话框选择字体,大小和风格ForeColor前景颜色,可从弹出的调色板选择。Height标签控件的高度Index在对象数组中的编号Left距离容器左边框的距离LinkItem获得或设置传递到目标控件的数据,该目标控件正在与另一个应用程序进行DDE会话LinkMode获得或设置用于DDE会话的链接类型并激活连接,取值为：0 None(无)1 AutoMatic(自动)2 Manual(手动)3 Notif

22、yLinkTimeout获得或设置控件等待响应DDE消息的时间LinkTopic获得或设置目标控件的源应用程序和主题MouseIconMousePointer=99时,设定一个自定义的鼠标图标MousePointerOLEDropMode获得或设置该对象是否能作为一个OLE放下目标,取值为：0 None(无)1 Manual(手动)RightToLeft文本书写是否自左向右。取值为：TrueFalse 自右向左TabIndex获得或设置此对象在父窗体的编号(父窗体中对象响应Tab键的顺序)Tag存储程序所需的附加数据ToolTipText设置该对象的提示行Top距容器顶部边界的距离UseMne

23、monic设置此对象的标题字符&后的是否做为快捷键。取值为：True 是False 否Visible设置此对象的可见性, 取值为：True 该对象可见False 该对象不可见WhatsThisHelpID获得或设置与对象相关联的上下文号Width设置该对象的宽度WordWrap获得或设置一个值,决定控件是否扩大以显示标题文字。取值为：TrueFalse1.03、文本框控件(TextBox)的常用属性属性说明(Name)文本框控件的名称Alignment设置Caption属性文本的对齐方式, 取值为：0 左对齐1 右对齐2 中间对齐Appearance是否用立体效果绘制,取值为：0 平面1 3D

24、(立体)BackColor背景颜色,可从弹出的调色板选择。BorderStyle设置边界样式,取值为：0 None(无边界线)1 FixedSingle(固定单线框)CauseValidation该控件获得焦点时,失去焦点的控件的Validate事件是否发生。取值为：True 发生False 不发生DataField获得或设置一个值,将控件绑定到当前记录的一个字段DataFormat返回数据格式对象,用于该部件的可绑定性(打开属性页)DataMember获得或设置一个值,为数据连接描述数据成员DataSource设置一个数值,指出数据控件通过它将当前控件绑定到数据库DragIcon该对象在拖动

25、过程中鼠标的图标DragMode该对象的拖动模式,取值为：0 Manual(手动)1 Automatic(自动)Enabled用于设定是否对事件产生响应,取值为：True 可用False 不可用,在执行程序时,该对象用灰色显示,并且不响应任何事件Font字型,可从弹出的对话框选择字体,大小和风格ForeColor前景颜色,可从弹出的调色板选择。Height文本框控件的高度HelpContextID指定一个对象的缺省帮助文件上下文标识符HideSelection当控件失去焦点时选定文本是否不加强显示。取值为：True 不加强显示,此为默认值False 加强显示IMEMode获得或设置输入方法编辑

26、器的当前操作模式。取值为：0 No Operation1 ON2 OFF3 DISABLE4 DBCS HIRAGANA5 DBCS KATAKANA6 SBCS KATAKANA7 DBCS ALPHABET8 SBCS ALPHABET9 DBCS HANGUL10 SBCS HANGULIndex在对象数组中的编号Left距离容器左边框的距离LinkItem获得或设置传递到目标控件的数据,该目标控件正在与另一个应用程序进行DDE会话LinkMode获得或设置用于DDE会话的链接类型并激活连接,取值为：0 None(无)1 AutoMatic(自动)2 Manual(手动)3 Notify

27、LinkTimeout获得或设置控件等待响应DDE消息的时间LinkTopic获得或设置目标控件的源应用程序和主题Locked设置文本框的内容是否可以编辑。取值为：True 锁住文本框的Text属性内容,只能显示,不能通过键盘作任何更改,成为只读文本。此时在文本框中可以使用复制命令,不能使用剪切和粘贴命令。但是通过程序代码仍可以改变文本框的内容。False 能通过键盘修改文本框的Text属性内容MaxLength获得或设置Text属性中所能输入的最大字符输。如果输入的字符数超过MaxLength设定的数目时,系统将不接受超出部分,并且发出警告声。MouseIconMousePointer=99

28、时,设定一个自定义的鼠标图标MousePointerMultiLine设置文本框对象是否可以输入多行文字。取值为：True 当文本超过控件边界时,自动换行。False需要注意的是：若该属性为False时,文本框控件对象的Alignment属性无效。OLEDragMode获得或设置该对象是否能作为OLE拖/放源,以及该进程是自动启动,还是在程序控制下启动。取值为：0 Manual(手动)1 Automatic(自动)OLEDropMode获得或设置该对象是否能作为一个OLE放下目标, 以及它是自动发生,还是在程序控制下发生。取值为：0 None(无)1 Manual(手动)PasswordCha

29、r该属性将文本显示的内容全部改为所设置的内容。他常用于设置密码,如PasswordChar设定为*,那么无论用户输入什么字符,都只显示*。RightToLeft文本书写是否自左向右。取值为：TrueFalse 自右向左ScrollBoars设置边框滚动条模式：0 无滚动条1 水平滚动条2 垂直滚动条3 水平和垂直滚动条SelLength返回或设置选定文本的长度(字符数)。该属性没有列在属性窗口中,但在程序中可以使用这些属性。SelStart返回或设置选定文本的起始位置,如果没有文本被选中,则指出插入点的位置。该属性没有列在属性窗口中,但在程序中可以使用这些属性。SelText返回或设置选定文本, 如果没有字符串被选中,则为空字符串。该属性没有列在属性窗口中,但在程序中可以使用这些属性。TabIndex获得或设置此对象在父窗体的编号(父窗体中对象响应Tab键的顺序)TabStop设置是否可以用Tab键选取此对象。取值为：True 可以False 不可以Tag存储程序所需的附加数据Text显示的文本内容ToolTipText设置该对象的提示行Top距容器顶部边界的距离Visible设置此对象的可见性, 取值为：T