《VISUALBASIC程序设计XD.ppt》由会员分享，可在线阅读，更多相关《VISUALBASIC程序设计XD.ppt（67页珍藏版）》请在三一办公上搜索。
1、第一章 Visual Basic简介,本章要求：,1.了解VB特点与安装。2.了解VB程序的构成要素。3.熟习VB的集成开发环境。4.初步建立事件驱动面向对象程序设计的概念，以及掌握几个基本控件的使用。,1.1 Visual Basic 的特点与安装,一、Visual Basic的发展 Visual Basic 是Microsoft 公司开发的Windows 应用程序开发工具，Visual“可视化的”，是一种开发图形户界面（GUI）的方法。1991年推出 VB1.0 1992、1993、1995、1997、1998,2000相继推出：2.0,3.0,4.0,5.0,6.0,VB.Net(7.0
2、)版本 5.0,6.0包含三种版本（学习版、专业版和企业版）,1.1 Visual Basic 的特点与安装,何为可视,英文Visual的意思是“视觉的”，“可视的Baisc”这个名字可能抽象了点，但实际上它却是最直观的编程方法，之所以叫做“可视”，你只要看到VB的界面就会明白，实际上你无需编程，就可以完成许多步骤。在VB中引入了控件的概念，在Windows中控件的身影无处不在，如按钮、文本框等，VB把这些控件模式化，并且每个控件都有若干属性用来控制控件的外观，工作方法，能够响应用户操作（事件）。,1.1 Visual Basic 的特点与安装,二、Visual Basic的特点,1.具有面向
3、对象的可视化设计工具2.事件驱动的编程机制3.结构化的程序设计语言4.提供了易学易用的应用程序集成开发环境5.支持多种数据库系统的访问6.支持DDE、DLL和OLE7.ActiveX技术在开发环境上、网络功能等的增强,1.1 Visual Basic 的特点与安装,三、运行环境1、硬件：486DX/66 MHz 或更高的处理器（推荐 Pentium 或更高的处理器)，一个 CD-ROM 驱动器，VGA 或分辨率更高的监视器。=16 MB RAM，鼠标或其它定点设备。2、软件：Windows 95 或更高版本，或 Windows NT 3.51或更高版本。,四、安 装 在 CD-ROM 驱动器中
4、插入Visual Basic6.0系统 CD 盘。安装程序在CD盘的根目录下，运行安装程序Setup.exe，即可进入“安装程序向导”。,1.1 Visual Basic 的特点与安装,1.2 Visual Basic程序的构成要素,一、对象与类1.对象 是基本的运行时的实体，如窗体、各种控件等，它既包括作用于对象的操作（方法）和对象的响应（事件）。将数据和处理这些数据的过程封装在一起.类 类是一个抽象的整体概念，对象是类的实例化。类与对象是面向对象程序设计语言的基础。以“汽车”为例，说明类与对象的关系。汽车是一个笼统的名称，是整体概念，我们把汽车看成一个“类”，一辆辆具体的汽车（比如你的汽车
5、）就是这个类的实例，也就是这个类的对象。,1.2 Visual Basic程序的构成要素,工具箱的各种控件并不是对象，而是代表了各个不同的类。通过类的实例化，可以得到真正的对象。当在窗体上画一个控件时，就将类转换为对象，即创建了一个控件对象，也简称为控件。,1.2 Visual Basic程序的构成要素,3、对象的建立和命名（1）对象的建立 方法一：单击工具箱控件对象在窗体上按住左键拖拉到所需要的大小后释放。方法二：双击工具箱控件对象，则立即在窗体出现一个默认大小的对象框。（2）编辑对象 先选中对象（单击对象）放大、缩小 删除对象 复制对象,1.2 Visual Basic程序的构成要素,（3
6、）对象的命名 每一个对象都有有自己的名字。每个窗体、控件对象 在建立时VB系统给出了一个默认名。用户可通过属性窗口设置（名称）来给对象命名。命名的原则：1）必须由字母或汉字开头、随后可以是字母、汉字、数字、下划线（最好不用）串组成。2）长度=255个字符。,1.2 Visual Basic程序的构成要素,二、属 性（Property）对象中的数据，所有对象都有自的属性。它们是用来描述和反映对象特征的参数。例如：控件名称（Name)、标题（Caption)、颜色（Color)、字体（FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能。对象属性设置的方法：方法一：在设计模式下
7、，通过属性窗口直接设置对象的 属性。方法二：在程序的代码中通过赋值实现，其格式为：对象.属性=属性值 例如：Command1.Caption=“显示”,1.2 Visual Basic程序的构成要素,三、事件（Event）及事件过程（Event Procedure）事件可被对象识别的动作。事件过程是指附在该 对象上的程序代码，是事件 触发后处理的程序。事件过程的形式如下：Sub 对象名_事件过程名（参数列表）.(事件过程代码）End Sub例如：Sub Command1_Click()Command1.Visible=False End Sub,1.2 Visual Basic程序的构成要素,
8、四、方 法（Method）在对象上可操作的过程，是VB系统提供的一种特殊的过程和函数方法。方法是面向对象的，所以对象的方法调用一般要指明对象。对象方法 调用形式：对象.方法 参数列表 如省略对象，表示在当对象，一般指窗体。例如：Form1.print VB程序设计,1.3 Visual Basic程序开发环境,1.3 Visual Basic程序开发环境,1.主窗口 应用程序窗口,由标题栏、菜单栏和工具栏组成,VB的三种工作模式（标题栏总显示当前模式）（1）设计模式：创建应用程序的大多数工作都是在设计时完成的。在设计时，可以设计窗体、绘制控件、编写代码并使用“属性”窗口来设置或查看属性设置值。
9、（2）运行模式：代码正在运行的时期，用户可与应用程序交流。可查看代码，但不能改动它。（3）中断模式：程序在运行的中途被停止执行时。在中断模式下，用户可查看各变量及不是属性的当前值，从而了解程序执行是否正常。,1.3 Visual Basic程序开发环境,2.窗体(Form)设计窗口,窗体设计窗口是屏幕中央的主窗口，它可以作为自定义窗口用来设计应用程序的界面。用户可以在窗体中添加控件、图形和图片来创建所希望的外观。每个窗口必须有一个的窗体名字，建立窗体时缺省名为Form1,Form2,.。应注意窗体名即Name属性和窗体文件名的区别,1.3 Visual Basic程序开发环境,1.3 Visu
10、al Basic程序开发环境,3.代码(code)窗口,在设计模式中，通过双击窗体或窗体上任何对象或通过“工程资源管理器”窗口中的“查看代码”按钮来打开代码编辑器窗口。代码编辑器是输入应用程序代码的编辑器。,1.3 Visual Basic程序开发环境,4.属性(properties)窗口,属性是指对象的特征，如大小、标题或颜色等数据。在Visual Basic6.0设计模式中，属性窗口列出了当前选定窗体或控件的属性的值，用户可以对这些属性值进行设置。,1.3 Visual Basic程序开发环境,5.工程资源管理器(project expror)窗口,工程是指用于创建一个应用程序的文件的集合
11、。工程资源管理器列出了当前工程中的窗体和模块,1.3 Visual Basic程序开发环境,6.工具箱(ToolBox)窗口,工具箱提供一组工具，用于设计时在窗体中放置控件生成应用程序的用户接口。系统启动后缺省的General工具箱就会出现在屏幕左边，上面共有21个常用“部件”,1.3 Visual Basic程序开发环境,7窗体布局窗口,窗体布局窗口显示在屏幕右下角。用户可使用表示屏幕的小图像来布置应用程序中各窗体的位置。这个窗口在多窗体应用程序中很有用，因为这可以指定每个窗体相对于主窗体的位置。,1.4使用Visual Basic建立一个简单程序,一、工程的组成 工程文件(.Vbp)包含了
12、一个应用程序的所有文件 窗体文件（.frm）:控件及属性、事件过程和自定义过程 窗体的二进制数据文件（.frx）,自动产生同名.frx文件。标准模块文件（.bas）类模块的文件（.cls）资源文件（.res）ActiveX控件的文件（.ocx）,一个VB应用程序中各主要文件的结构关系如下图：,1.4使用Visual Basic建立一个简单程序,1.4使用Visual Basic建立一个简单程序,二、创建应用程序的步骤：分析问题，确定程序要完成什么任务，按下面的步骤创建应用程序。（1）新建工程。创建一个应用程序首先要打开一个新的工程。（2）创建应用程序界面。（3）设置属性值。（4）对象事件过程的
13、编程。（5）保存文件。（6）程序运行与调试。再次保存修改后的程序,1.4使用Visual Basic建立一个简单程序,三、一个简单的VB程序的创建（实例）,例1.1 设计一简单应用程序，在窗体上放置1个文本框、3个命令按钮，其中单击左边按纽时，文本框中显示“欢迎使用VB6.0”，若单击中间按纽时，清除文本框的内容，若单击右边按纽，则程序结束。用户界面如图所示。,1.4使用Visual Basic建立一个简单程序,在窗体上建立4个控件：1个文本框Text1；3个命令按钮,Command1,Command2、Command3。单击工具箱中的命令按钮，置入窗体适当位置。因有3个命令按钮，因此必须重复
14、3次。再单击工具箱中的文本框，置入窗体中，如图所示。,1.4使用Visual Basic建立一个简单程序,设置属性。对每个对象而言，有很多属性可用，下面只对每个控件的Caption进行设置。,对象名 属性 属性值 Form1 Caption“lxl”Command1 Caption“单击”Command2 Caption“清屏”Command3 Caption“结束”Text1 text 设为空白,编辑代码 编辑代码就是编辑事件过程。,根据题目要求，单击Command1，则在文本框中显示“欢迎使用Visual Basic 6.0”，因此，Command1的事件过程应是：Sub Command1
15、_click()Text1.text=欢迎使用VB 6.0End Sub此过程的功能：当单击“单击”控件时，将“欢迎使用VB 6.0”在文本框上显示。Command2的事件过程应是：,1.4使用Visual Basic建立一个简单程序,Sub Command2_Click()Text1.Text=End Sub过程的功能：单击“清屏”控件时，将空格送到文本框，即清屏。Command3的事件过程应是：Command3_Click()EndEnd Sub过程的功能：结束程序。,1.4使用Visual Basic建立一个简单程序,1.5 Visual Basic基本控件,窗体属性决定了窗体的外观与操
16、作。窗体外观 如下图,一 窗体 Form,1.5 Visual Basic基本控件,一.属性（一）基本属性1.Name名称属性（任何对象都具有的）创建的对象名称,有默认的名.在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。2.Height、width、top和left属性 单位为twip：1 twip=1/20点=1/1440英寸=1/567cm,1.5 Visual Basic基本控件,3Caption 标题属性：决定出现在窗体的标题栏上的文本内容。,4.字体Font属性组,FontName属性是字符型，决定对象上正文的字体（缺省为宋体）。FontSize属性是整型，决定对象上正文
17、的字体大小。FontBold属性是逻辑型，决定对象上正文是否是粗体。FontItalic属性是逻辑型，决定对象上正文是否是斜体。FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。FontUnderLine属性是逻辑型，决定对象上正文是否带下划线。,1.5 Visual Basic基本控件,5.Enabled属性（逻辑值）决定控件是否可操作。True：允许用户进行操作，并对操作出响应（缺省值)。False：呈暗淡色，禁止用户进行操作。6.Visible属性（逻辑值）决定控件是否可见 True：运行时控件可见（缺省值）。False：运行时控件隐藏，用户看不到，但控件本身是 存
18、在 的。,1.5 Visual Basic基本控件,7BackColor属性和ForeColor属性 BackColor属性用于返回或设置对象的背景颜色，ForeColor属性用于返回或设置在对象里显示图片和文本的前景颜色。,例如:将窗体Form1的背景色设置为红色，则可使用下面三种情况：Form1.BackColor=RGB(255,0,0)Form1.BackColor=&HFF&Form1.BackColor=vbRed,1.5 Visual Basic基本控件,（二）窗体的其它常用属性,1MaxButton最大化按钮和MinButton最小化按钮：当值为 Ture，有最大或最小化按钮，
19、False则无。,2Picture图片属性：设置窗体中要显示的图片。加载图片操作同Icon 控制图标属性。,1.5 Visual Basic基本控件,3.BorderStyle：边框风格,通过改变 BorderStyle 属性，可以控制窗体如何调整大小。0-None：无边框；1-Fixed Single：单线边框，不可以改变窗口大小；2-Sizable：双线边框，可以改变窗口大小；3-Fixed Double：双线框架，不可以改变窗口大小。4-Fixed Tool Window:窗体外观与工具条相似。有关闭按钮，不可以改变窗口大小。5-Sizable Tool Window：窗体外观与工具条相
20、似。有关闭按钮，可以改变窗口大小。,1.5 Visual Basic基本控件,4.WindowsState属性 0-Normal：正常窗口状态，有窗口边界；1：最小化状态，以图标方式运行；2：最大化状态，无边框，充满整个屏幕。5.AutoRedraw属性 该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Circle、Line、Pset和Print等方法的输出。当为True时，重新还原该窗体以前的画面。当为False时，则不重画AutoRedraw属性。,1.5 Visual Basic基本控件,二、事件 最常用的事件 1 Click/Db
21、lClick：单击/双击窗体触发。2 Load：窗体被装入时触发的事件。该事件通常用来在启动应用 程序时对属性和变量进行初始化。3、Unload事件 卸载窗体时触发该事件。4、Resize事件 无论是因为用户交互，还是通过代码调整窗体的大小，都会触发一个Resize事件。,1.5 Visual Basic基本控件,三、常用方法,窗体常用的方法有：打印输出Print 移动Move 清除Cls 显示Show 隐藏Hide等方法。方法的使用的形式:对象.方法 参数,1.5 Visual Basic基本控件,例1.2 利用属性窗口和程序代码设置Form的属性，要求将窗体 标题又“Form1”修改为“牛
22、刀小试”，窗体是黑体白字“HOW ARE YOU”,具体步骤如下：,进入VB6设计环境，在属性窗口中找到Caption（标题）。在Caption 属性值上单击鼠标左键，将原缺省值form1删除，再键入新的内容。,移动鼠标在BackColor属性值栏上单击鼠标左键，然后再单击下拉 箭头，调出调色板，选中黑色。,移动鼠标在ForeColor属性值栏上单击鼠标左键，然后再单击下拉箭头，调出调色板，选中白色。在牛刀小试窗体上双击鼠标左键，调出代码窗口，单击过程栏的下拉箭头，选择“click事件，在代码区输入Print HOW ARE YOU?。最后点击工具条中的“”图标则可进入运行阶段。,1.5 Vi
23、sual Basic基本控件,例1.3 编写一个随手画程序，程序界面如图所示：,程序代码如下:,Private Sub Form1_MouseMove(Button as Integer,Shift as Integer,x as Integer,y as Integer)Line-(x,y)End Sub,1.5 Visual Basic基本控件,二.命令按钮CommandButton 接受用户输入的命令.输入命令可以有三种方式:（1）鼠标单击；（2）按Tab键焦点跳转到该按钮,再按回车键；（3）快捷键（Alt+有下划线的字母）（一）属性 1基本属性：Name、Height、Width、To
24、p、Left、Enabled、Visible、Font等与窗体的使用相同。2常用属性（1）Caption:标题属性命令按钮显示的内容，可在某字母前加“&“设置快捷键。例如：&Ok,显示 Ok,1.5 Visual Basic基本控件,（2）Default：确认属性（逻辑值），设置为True时，按Enter键相当于用鼠标器单击了该按钮。注意：在一个窗体只能的一个按钮的Default设置为Ture（3）Cancel:取消功能属性（逻辑值），当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同。注意：在一个窗体只能的一个按钮的Cancel属性设置为Ture（4）Value:检查该按钮是
25、否按下.该属性在设计时无效.,（5）Picture:按钮可显示图片文件(.bmp和.Ico)，只有当Style属性值设 为1时有效（6）Style:确定显示的形式.0 只能显示文字,1 文字、图形均可。（7）ToolTipText：设置工具提示，和Picture结合使用。,1.5 Visual Basic基本控件,1.5 Visual Basic基本控件,（二）、方法 1.Move 移动 2.Setfocus 获得焦点（三）、事 件 最常用的是Click()事件，一般也只对该事件进行编程。,1.5 Visual Basic基本控件,例1.4利用属性窗口和程序代码设置Commandbutton控
26、件的属性，程序界面如图所示。,具体步骤如下：,在工具箱中的上单击鼠标左键，移动到窗体的适当位置，按住鼠标左键拖曵，分别调出Command1和Command2。Command2在Caption属性值上单击鼠标左键，将原缺省值删除，再键入“运行代码“。选中Command1的Style 设为1图形外观，选中Picture属性，调出加载图片的对话框。,出现加载图片的对话框后，从查找范围内选择存放图片的文件夹，选择合适的图片，最后选择“打开”按钮。,移动鼠标在Command2控件上双击鼠标左键，在 Command2 _Click()事件代码窗口中输入设定Command1控件属性的代码。Private S
27、ub Command2_Click()Command1.Caption=图形按钮 设置Command1控件上显示的文字 Command1.Font=隶书 设置文字的类型 Command1.BackColor=RGB(50,150,0)设置Command1控件上的颜色 Command1.Width=800 设置Command1控件的宽度 Command1.Height=800 设置Command1控件的高度 End Sub 最后点击工具条中的“”图标，然后选择“运行代码”按钮，就会执行以上代码。,1.5 Visual Basic基本控件,三、标签 Label,用于显示文本(输出)信息，不能作为输
28、入信息的界面。1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor等与窗体的使用相同。2常用属性（1）Caption属性 Caption属性用来改变Label控件中显示的文本。Caption属性允许文本的长度最多为1024字节。缺省情况下，当文本超过控件宽度时，文本会自动换行，而当文本超过控件高度时，超出部分将被裁剪掉。,1.5 Visual Basic基本控件,（2）Alignment属性设置Caption属性中文本的对齐方式，共有三种可选值：0 左对齐(Left Justify)；1 右对齐(Ri
29、ght Justify)；2 居中对齐(Center Justify)。（3）BackStyle属性 该属性用于确定标签的背景是否透明。有两种情况可选：值为0时，表示背景透明，标签后的背景和图形可见；值为1时，表示不透明，标签后的背景和图形不可见。,1.5 Visual Basic基本控件,（4）AutoSize属性 AutoSize属性确定标签是否会随标题内容的多少自动变化。如果值为True，则随Caption内容的大小自动调整控件本身的大小，且不换行；如果值为False，表示标签的尺寸不能自动调整，超出尺寸范围的内容不予显示。,例1.5 利用Label1控件制作一个“仲夏夜演奏会”的宣传画
30、，程 序界面如图所示。,具体步骤如下：在工具箱中的上单击鼠标左键，移动到窗体的适当位置，按住鼠标左键拖曵，调出Label1。在属性窗口修改窗体Form1的Picture属性，加载合适的图片。修改Label1的 Caption属性值，键入“仲夏之夜演奏会”。然后选中Label1的Font属性，调出“字体”对话框选择字体为“华文中宋”，字型为“粗体”，大小为“小四”，加下划线。再设Label1的BackColor为黄色、ForeColor为红色。,在窗体Form1上双击鼠标左键，调出代码窗口在 Form1_Click()事件代码 窗口中输入修改Label1控件属性的代码。如下图所示：,最后点击工具
31、条中的“”图标，然后在窗体的任一位置单击鼠标左键。,1.5 Visual Basic基本控件,四、文本框 TextBox,是一个文本编辑区域，在该区域输入，编辑和显示文本。（一）属性1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签控件相同。2常用属性（1）.Text文本属性 在文本框中显示的正文内容存放在Text属性中。当程序运行时，用户通过键盘输入正文内容，保存在Text属性中。文本框没有Caption属性,1.5 Visual Basic基本控件,（2）Maxlength：设置正文的最
32、多字符个数,0任意长度值。（3）MultiLine：是否为多行,默认一行.False（4）ScrollBars：当MultiLine为True时,该属性才有效,滚动 条的形式。0-None：无滚动条、1-Horizontal：水平滚动条、2-Vertical：垂直滚动条 3-Both：水平和垂直滚动条。,（5）Locked：是否可被编辑属性 False，表示为可编辑。（6）PassWordChar属性 设置PasswordChar属性为了掩盖文本框中输入的字符。该属性的设置只有在MultiLine设为 False才有效,1.5 Visual Basic基本控件,（7）SelStart、SelL
33、ength和SelText属性 这三个属性是文本框中对文本的编辑属性。SelStart：确定在文本框选中文本的起始位置。第一字符 的位置为0。若没有选择文本，则用于返回或设置文本的插入点位置，如果SelStart的值大于文本的长度，则SelStart取当前文本的长度：SelLength：设置或返回文本框中选定的文本字符串长度（字符个数）。SelText：设置或返回当前选定文本中的文本字符串。,1.5 Visual Basic基本控件,Change事件：当改变文本框的Text属性时会引发该事件。当用输入一个字符，就会触发一次Change事件。例：在文本框Text1的Change事件编写有如下程序
34、代码：Private Sub Text1_Change()Print Text1.texEnd Sub 当程序运行后中输入ABCD，则在窗体上在输出结果是？,1.5 Visual Basic基本控件,KeyPress事件 当用户按下并释放键盘上一个ANSI键时，就会触发一次该事件，并返回一个KeyAscii参数（字符的Ascii值）到该事件过程中。例如：Private Sub Text1_KeyPress(KeyAscii As Integer)Print KeyAscii,Chr(KeyAscii)End Sub 当程序运行后中输入ABCD，则在窗体上在输出结果是？LostFocus：当控件
35、失去焦点时发生。GotFocus：当控件获得焦点时发生。,1.5 Visual Basic基本控件,（三）常用方法 文本框最有用的方法是：SetFocus，使用形式：对象.SetFocus 功能：是把光标移到指定的文本框对象中。,例1.6 利用Textbox控件制作一个密码框,1.5 Visual Basic基本控件,在 Command1 _Click()事件代码窗口中输入代码如下。Private Sub Command1_Click()If Text1.Text=1111 Then Form1.Caption=欢迎进入本系统 Form1.BackColor=vbYellow Label1.V
36、isible=True Command1.Visible=False Command2.Visible=FalseText1.Visible=False ElseForm1.Caption=密码错，请重新输入 End If End Sub,5.多重窗体,多重窗体实际上是单一窗体的集合。换言之，多重窗体由多个独立的、单一的窗体构成，其中每个单一窗体都有自己的界面和程序代码，完成不同的操作。利用多重窗体可以设计较复杂的多功能对话窗口。,【例1.8】设计一个电脑公司的报价单。从此报价单上可以查到某品牌微 机的 配置及价格。,“封面窗体”有4个命令按钮，其事件过程如下：Private Sub Command1_Click()Private Sub Command3_Click()SunForm.Show MoonForm.ShowFormCover.Hide Formcover.Hide End Sub End Sub,Private Sub Command2_Click()Private Sub Command4_Click()BrightForm.Show EndFormCover.HideEnd Sub End,
