VB程序设计 第二章课件

1、VB程序设计 第二章1 Visual Basic程序设计教程 第二章第二章 Visual Basic 程序设计概述程序设计概述 VB程序设计 第二章2 计算机软件开发历史 结构化程序设计(C，Pascal) 高级语言(Fortran,Basic) 汇编语言 二进制代码（机器语言） 面向对象程序设计 结构化程序设计 早期程序设计 面向对象程序设计(C+) 可视化程序设计(VB,VC等) VB程序设计 第二章3 20世纪50年代用机器语言编写代码。程序员重复处理0与1不得 不花费大量的时间来编制与调试程序。 采用符号指令的汇编语言代替了机器语言。 高级语言简化了程序设计。用高级语言编写的程序与机器

2、无关； 程序员摆脱了机器本身的特性限制，精力只集中于算法。 20世纪70年代初期，大型系统软件（如操作系统、数据库等）给 程序设计带来了新的问题。促使人们对程序设计方法进行研究， 从而提出了应该如何设计程序，设计程序的基本指导思想是什么， 采用什么样的程序设计方法为好等问题。 VB程序设计 第二章4 1969年荷兰科学家Dijkstra提出了结构化程序设计的思想与概念。 结构化程序设计基本思想： 程序的结构规定为：、和三种基本结构；限制使用 GOTO语句，采用程序设计原则，将大型 系统分解为功能独立的模块，使其最终转化为上述三种基本结构。 结构化程序未能解决的问题： 1、模块分割主要针对控制流

3、，仍含有与人的思维方式不协调的地 方，很难自然、准确地反映真实世界，软件质量很难保证。 2、只突出了实现功能的操作方法（模块），而被操作的数据（变 量）处于功能的从属地位，即程序模块与数据结构是松散地耦合在一 起，当程序复杂时，容易出错，难以维护。 VB程序设计 第二章5 面向对象程序设计（OOP）旨在使计算机问题的求解更接近于人的思 维活动，使软件的开发形成一个由抽象到具体、由简单到复杂这样 一个循序渐进的过程。克服大型软件开发中存在的效率低、质量难 以保证、调试复杂、维护困难等问题。 面向对象将大量的工作由相应的对象来完成，程序员在应用程序中 只需说明要求对象完成的任务。 面向对象程序设计

4、（OOP）的优点： 1、使软件开发过程符合人们的思维方法，便于分析解决复杂的问 题。 2、使软件的维护和功能增减易于实现。 3、使程序代码可重用，从而提高了软件开发的效率； 4、与可视化技术相结合，使用户界面图形化、更美观、更友好。 VB程序设计 第二章6 的对象分为窗体窗体和控件控件两大类。 窗口本身，是屏幕上的一个矩形区域； 窗口上构成图形用户界面的一些基本组成部件； (1)内部控件：是由VB系统提供的。启动VB后，内部控件出现在 工具箱上。 (2)ActiveX控件：是扩展名为.OCX的独立文件。 (3)可插入对象：VB系统中有一些能直接使用的对象，其可被 添加到工具箱上。 VB程序设计

5、 第二章7 对象的建立方法：对象的建立方法： （1）添加和删除控件到窗体上添加和删除控件到窗体上 （2 2）编辑控件编辑控件 选择控件选择控件 移动控件移动控件 移动改变控件大小移动改变控件大小 复制控件复制控件 控件的布局控件的布局 控件的名称控件的名称 VB程序设计 第二章8 1、对象的属性对象的属性 在VB系统中，选中一个对象后，可以在属性窗口中修改属性值， 也可在程序运行阶段用语句来设置或修改其属性值。 在程序中设置属性的语法格式为： 对象名对象名. .属性名属性值属性名属性值 VB程序设计 第二章9 例例【2-12-1】 设计阶段修改对象属性设计阶段修改对象属性 在窗体上放置一个名为

6、在窗体上放置一个名为command1command1的命令按钮，将其属性列表框中的命令按钮，将其属性列表框中 的的captioncaption属性值改为属性值改为“按钮按钮”，heightheight属性值改为属性值改为890890。 解题思路：解题思路：选择命令按钮，在其属性列表框中修改“captioncaption”和 “heightheight”属性。 VB程序设计 第二章10 例例【2-22-2】 运行阶段修改对象属性运行阶段修改对象属性 在窗体上放置一个名为在窗体上放置一个名为command1command1的命令按钮，程序运行后，点击的命令按钮，程序运行后，点击 窗体，将命令按钮的

7、窗体，将命令按钮的captioncaption属性值改为属性值改为“按钮按钮”，heightheight属性值改属性值改 为为890890。 解题思路：解题思路：首先在窗体上放置一个名为command1的命令按钮，在窗体 的click事件中填写相应的命令，改写按钮的属性值。 Private Sub Form_click( ) command1.caption=“按钮按钮” command1.height=890 End Sub VB程序设计 第二章11 2、对象的事件、事件过程和事件驱动 （1）事件 在VB中，事件是发生在对象身上，且能被对象识别的动作。如： 用鼠标单击对象，则会在对象身上产生

8、单击事件（单击事件（Click)Click)，双击对 象，则会在对象身上产生双击事件（双击事件（DblClick)DblClick)。 VB系统为每个对象预先定义了一系列事件，例如：单击 （Click），双击（DblClick），改变（Chang），鼠标移动 （MouseMove）等。 VB程序设计 第二章12 2、对象的事件、事件过程和事件驱动 （2）事件过程 当事件在对象身上发生后，应用程序就要处理这个事件，处理事 件的步骤就是事件过程。 VB应用程序设计的主要工作就是为对象编写事件过程的代码， 一般格式为： Private SubPrivate Sub 对象名_事件(参数列表) 事件过程

9、代码事件过程代码 End SubEnd Sub VB程序设计 第二章13 2、对象的事件、事件过程和事件驱动 （2）事件过程 例例【2-32-3】 有一命名为有一命名为Command1Command1的命令按钮对象，要求当对象单击的命令按钮对象，要求当对象单击 对象时，结束程序的运行对象时，结束程序的运行 解题思路：解题思路：VB系统中，结束程序运行的命令为“END”。在按钮的 click事件中填写该命令即可。 Private Sub Command1_click( ) end End Sub VB程序设计 第二章14 2、对象的事件、事件过程和事件驱动 （3）事件驱动程序设计 在传统的面向过

10、程的程序设计中，应用程序的执行总是从第一 行代码开始； 在面向对象的程序设计中，应用程序先等待某个事件的发生， 然后再去执行处理此事件的事件过程。发生事件的顺序决定了代码 执行的顺序，若没有事件发生，整个程序将处于停滞等待状态。 VB程序设计 第二章15 2、对象的事件、事件过程和事件驱动 （3）事件驱动程序设计 VB应用程序的执行步骤： 窗体或窗体上的对象等待事件的发生 事件发生时，执行相应的事件过程 启动应用程序，装载和显示窗体 如此周而复始地执行，直到遇到“END”语句结束程序的运行或单击 “结束结束”按钮强行结束程序的允许。 VB程序设计 第二章16 3、对象的方法 VB系统中的方法指

11、对象本身所包含的一些特殊函数或过程。当 用方法来控制一个对象的行为时，其实质就是调用该对象内部的某 个特殊的函数的过程。 例如：窗体对象拥有HideHide方法和ShowShow方法，调用HideHide方法可窗 体隐藏起来，调用ShowShow方法可使窗体显现出来。 在VB系统中对象方法的调用格式： 对象名对象名 方法名方法名 参数列表参数列表 如：如：form1.hideform1.hide form1.show form1.show VB程序设计 第二章17 3、对象的方法 例例【2-42-4】现有一个名为现有一个名为Command1Command1的命令按钮，当用户单击该按的命令按钮，

12、当用户单击该按 钮时，使其移动为坐标（钮时，使其移动为坐标（120120，300300）的位置。）的位置。 解题思路：解题思路：调用方法“move”，将按钮移动到指定的为止。 Private Sub command1_click( ) command1.move 120,300 End sub VB程序设计 第二章18 3 3、对象的方法、对象的方法 例例【2-52-5】当用户单击窗时，调用窗体对象的方法当用户单击窗时，调用窗体对象的方法PrintPrint，在窗体上打，在窗体上打 印出印出“欢迎你学习欢迎你学习Visual Basic 6.0”Visual Basic 6.0”字符串字符串.

13、 . 解题思路：解题思路：调用窗体的方法“print”，将字符串显示在窗体上 Private Sub Form_Click( ) form1.print “欢迎你学习欢迎你学习Visual Basic 6.0” End Sub VB程序设计 第二章19 Name ：窗体名称；默认为Form1，在属性窗口设置 Caption：窗体标题栏显示的文本，在属性窗口和程序中设置 Height，Width：指定窗体的高度和宽度。在属性窗口和程序中设置 Left，top：指定窗体的高度和宽度。在属性窗口和程序中设置 Font：用于改变窗体或对象上文本的外观。 FontName：字体类型，用于设置窗体或对象上

14、文本的字体。 FontSize：整型，用于设置窗体或对象上文本的大小。 FontBold：逻辑型，该值为True时用于设置窗体或对象上文本为粗体。 FontItalic：逻辑型，该值为True时用于设置窗体或对象上文本为斜体。 FontStrikethru：逻辑型，该值为True时给窗体或对象上文本加一删除线 FontUderLine：逻辑型，该值为True时用于给窗体或对象上文本加一下 划线 VB程序设计 第二章20 (6)Enabled：用于决定是否允许操作窗体。True为允许，False为禁止。 (7)Visible：用于决定程序运行时窗体是否可见。True为可见，False为不 可见。

15、 (8)MaxButton，MinButton：用于设置窗体右上角的最大化、最小化按 钮。 MaxButton属性为True时，窗体右上角有最大化按钮；为False时，则 无最大化 按钮；MinButton属性为True时，窗体右上角有最小化按钮， 为False时则无最小化按钮。只能在属性窗口中设置。 (9)Icon图标和图标和ControlBox控制菜单：控制菜单：在属性窗口中单击Icon设置框右边 的“”，可以装入一个扩展名为.ico或. Cur图标文件，当窗体最小化时 加以该图标显示。Icon属性在程序中设置的方法： Form1.Icon=Loadpicture(盘符路径及图标文件名盘符

16、路径及图标文件名) ControlBox属性为True时，窗体有上角有控制菜单框，为False时则无。 控制菜单以图标形势显示。 VB程序设计 第二章21 (10)BackColor：用于设置窗体或对象的背景颜色。 (11)ForeColor：用于设置窗体或对象的前景颜色。对于窗体，前景色 是窗体上用Print方法输出的文本的颜色，程序运行后才能看到。 (12)BorderStyle：用于设置窗体边框的样式。 0None，无边框，无法移动及改变大小 1Fixed Single，单线边框，可移动但不可改变大小 2Sizeable，双线边框，可移动、改变大小 3Fixed Dialog，为固定对话

17、框，不可改变大小 4Fixed ToolWindow，窗体外观与工具条相似，有关闭按钮，不能 改变大小 5Sizeable ToolWindow，窗体外观与工具条相似，有关闭按钮，能 改变大小 VB程序设计 第二章22 (13)Picture：用于设置窗体中要显示的图片。 方法：单击Picture设置框右边的“”，便可加载一个图形文件。 在程序中设置该属性的方法： Form1.Picture=LoadPicture(图形文件源路径及文件名图形文件源路径及文件名) (14)Windows State：用于设置窗口的状态。 0Normal，正常状态，有窗口边界 1Minimized，最小化状态，以

18、图标方式运行 2Maxmized，最大化状态，无边框，充满整个屏幕 VB程序设计 第二章23 事件分类事件分类：根据来源分为：鼠标事件鼠标事件、键盘事件键盘事件和系统事件系统事件。 窗体最常用的事件窗体最常用的事件：ClickClick(单击)，DblClickDblClick(双击)和LoadLoad(装入)。 另外：在窗体装载和关闭时，系统会自动产生一些事件。 Initialize事件，Resize事件，Paint事件，Active事件，Deactive 事件，QueryUnload事件，Unload事件，Terminate事件。 用户使用鼠标或键盘操作会触发窗体的一些事件： MouseD

19、own（鼠 标按下），MouseUp（键释放）， MouseMove（鼠标移动）， keyDown （键按下），KeyUp（键释放），KeyPress（键按下并释放） VB程序设计 第二章24 1、Click事件事件 当用户将鼠标置于窗体上，按下鼠标左键并立即释放（即单击操作）， 此时会在窗体上触发Click事件。 格式： Private Sub Form_Click (Index As Integer) End Sub 参数说明： 只有当对象为控件数组时，参数Index才会出现。Index参数值由 VB自动传入，在事件过程中可以引用，其值代表用户单击控件数组中的 那一个成员。 VB程序设计

20、第二章25 2、DblClick事件事件 当用户在窗体上用鼠标快速双击左键时产生DblClickDblClick（双击）事件。 格式： Private Sub Form_DblClick (Index As Integer) End Sub VB程序设计 第二章26 3、Load事件事件 当窗体从磁盘装入内存时引发的事件。它由系统操作触发或通过 Load语句触发。经常用来在启动应用程序时对属性和变量进行初始 化。 格式： Private Sub Form_Load( ) End Sub VB程序设计 第二章27 1、Print方法：在窗体或控件上输出变量的值或其他信息。 如：form1.pri

21、nt “欢迎使用Visual Basic” 2、Cls方法：清除窗体或控件上的信息。 如：form1.cls 3、Move方法：移动窗体或控件，并可改变其大小。 如：command1.move 120,300 VB程序设计 第二章28 例例【2-6】 窗体无最大化按钮和最小化按钮，窗体装入时，在窗体的标窗体无最大化按钮和最小化按钮，窗体装入时，在窗体的标 题栏显示题栏显示“装入窗体装入窗体”，并在窗体上装入一幅图片作为背景；当用户单，并在窗体上装入一幅图片作为背景；当用户单 击窗体时，在标题栏显示击窗体时，在标题栏显示“单击单击”，在窗体上显示，在窗体上显示“单击窗体单击窗体”；当用；当用 户

22、双击窗体时，在标题栏显示户双击窗体时，在标题栏显示“鼠标双击鼠标双击”，去除窗体的背景图案，并，去除窗体的背景图案，并 显示显示“双击窗体双击窗体” 解题思路解题思路：首先在窗体的属性列表框中设置相应属性值；在窗体的Load 事件、click事件和dblclick事件中填写相应的命令。 另：窗体载入图片的命令： form1.picture=loadpicture(图片所在的路径以及图片的名称图片所在的路径以及图片的名称) 清除窗体载入图片的命令： form1.picture=loadpicture(“”) form1.picture=loadpicture( ) VB程序设计 第二章29 2.

23、4.1 2.4.1 标签（标签（Label） 1 1、属性、属性 标签（Label）主要用于显示一小段文本，通常用来标注本身不 具有Caption属性的控件，如用标签给文本框附加描述等。 属性名属性值说明 Caption字符型数据显示在标签上的正文（标题） Alignment0,1,20靠左，1靠右，2居中 AutoSizeTrue,False根据显示的标题自动调整大小 BorderStyle0,10无边框,1有边框(单边框) BackStyle0,10透明，其后的背景色和内容为可见， 1非透明，可隐藏其后的背景色和内容 2 2、事件、事件 标签可以触发ClickClick和DblClickD

24、blClick等事件，但很少用来触发。 VB程序设计 第二章30 2.4.1 2.4.1 标签（标签（Label） 例例【27】 在窗体创建两个标签，单击一次窗体后，将两个标签上在窗体创建两个标签，单击一次窗体后，将两个标签上 的内容交换。的内容交换。 解题思路：解题思路：触发的事件为：窗体的click事件。 Temp A B Temp=A （1） A=B (2) B=Temp (3) VB程序设计 第二章31 2.4.2 2.4.2 文本框文本框 1 1、属性、属性 文本框（TextBoxTextBox）提供一个既能显示又能编辑文本的区域。在程序 运行中，可在文本框中输入正文，也可对其中的文

25、字进行选择、删除、 复制和粘贴等操作。 属性名属性值说明 Text字符型数据文本框中显示的文字内容。 MaxLength数值型数据允许输入的最大字符数。0无限制 MultiLineTrue,False是否允许输入多行文字 PassWordChar字符型数据设置密码输入。空，则原样显示 ScrollBars0，1，2，30无滚动条，1水平滚动条，2垂直滚动 条，3水平、垂直滚动条 SelLength数值型数据框中当前选中的字符个数。只能在程序运行 中设置和返回 VB程序设计 第二章32 2.4.2 2.4.2 文本框文本框TextBox 属性名属性值说明 SelStart数值型数据当前选中的字符

26、中第一个字符的位置。只能 在程序运行中设置和返回 SelText字符型数据当前心中的文字内容。只能在程序运行中设 置和返回 LockedTrue，False是否锁定文本框。 2、事件：除ClickClick、DblClickDblClick事件外，还有以下事件 （1）ChangeChange：当文本框的Text属性值发生变化时，将触发此事件。 （2）GotFocusGotFocus：当文本框获得焦点时，触发该事件。 (3）LostFocusLostFocus：当文本框失去焦点时，触发该事件。 （4）KeyPressKeyPress：当文本框获得焦点后，并在键盘按下某一个键时触发该事件 1 1、

27、属性（续、属性（续) ) VB程序设计 第二章33 2.4.2 2.4.2 文本框文本框 3 3、方法、方法 常用方法为SetFocusSetFocus方法。调用此方法可以使文本框获得焦点。 例例【2-82-8】在窗体上建立三个文本框，利用文本框的在窗体上建立三个文本框，利用文本框的changchang事件在另两事件在另两 个文本框中显示第一个文本框文字的大小写。个文本框中显示第一个文本框文字的大小写。 解题思路解题思路: : 触发的事件为第一个文本框的change事件；将字符串转换 为小写的函数为Lcase()Lcase()；将字符串转换为大写的函数为Ucase()Ucase()。 Priv

28、ate Sub Text1_Change() text2.text=lcase(text1.text) text3.text=ucase(text1.text) End Sub VB程序设计 第二章34 2.4.3 2.4.3 命令按钮命令按钮Command Button 1 1、属性、属性 属性名属性值说明 Caption字符型数据在按钮上显示的标题信息，可在其某个字母前 加“&”，则该字母将带下划线成为快捷键，当 用户按下Alt+快捷键相当于用鼠标单击该键 Cancel逻辑型数据该属性若为True，按键盘的ESC键与单击该命 令相同。在一个窗体中，只允许一个命令按钮 的Cancel属性设为

29、True Default逻辑型数据该属性为True时，若窗体中的按钮都不具有焦 点，则按回车键与单击该命令的按钮作用相同。 在一个窗体中只允许一个命令按钮的Default属 性为True ToolTipText字符型数据设置当鼠标在控件上暂停时显示的文本 VB程序设计 第二章35 2.4.3 2.4.3 命令按钮（命令按钮（Command Button） 2 2、事件、事件 常用事件为ClickClick事件。 例例【2-9】在窗体上设置两个按钮和一个文本框，在文本框中显示命在窗体上设置两个按钮和一个文本框，在文本框中显示命 令按钮点击的次数。令按钮点击的次数。 解题思路解题思路：设置一个统计

30、点击次数的变量。将该变量的值显示在文 本框中。 控件CaptionDefaultCancelTextTabindex Command1命令按钮TrueFalse1 Command2退出FalseTrue2 Text空0 VB程序设计 第二章36 2.4.4 2.4.4 焦点与焦点与TabTab顺序顺序 1 1、焦点、焦点 焦点是指控件对象接受鼠标或键盘输入的能力。只有具有焦点的控 件对象才能接受用户由鼠标和键盘的输入。 当控件对象获得焦点时，触发GotFocuGotFocus事件，失去焦点时，触发 LostFocusLostFocus事件。大多数控件都支持以上两个事件。 控件对象获得焦点的途径

31、： （1）直接操作：比如用TabTab键或用快捷键、鼠标直接点击； （2）在程序中调用SetFocusSetFocus方法； 2 2、TabTab顺序顺序 在程序运行中，当按下TabTab键时，焦点将在该程序的控件上顺序移 动，这就是Tab顺序。 通常，在设计程序过程中，TabTab顺序是由控件的建立顺序决定的。 若要修改TabTab顺序，需要改变TabIndexTabIndex的属性值即可。 返回 VB程序设计 第二章37 2.4.5 2.4.5 控件的默认属性控件的默认属性 控件的默认属性是指在程序运行中，不必指定控件的属性名就可以 改变其其值的属性。 如：文本框的默认属性为Text，则以

32、下的赋值是等价的: Text1.text =“Visual Basic”Text1.text =“Visual Basic” Text1=“Visual Basic” Text1=“Visual Basic” 控件名称默认属性控件名称默认属性 文本框（Text）Text标签(Label)Caption 命令按钮(Command Button)Default图形、图像框Picture 单选按钮(OptionButton)Value复选框(CheckBox)Value VB程序设计 第二章38 1、在窗体上建立对象、在窗体上建立对象 2、设置对象的属性、设置对象的属性 3、编写对象事件过程、编写对

33、象事件过程 4、保存和运行程序、保存和运行程序 VB程序设计 第二章39 例例【2-10】编写一个图片浏览器，以实现对两幅图片内容进行浏览。编写一个图片浏览器，以实现对两幅图片内容进行浏览。 解题思路解题思路：在窗体上放置一个图片框和三个命令按钮。 Private Sub Command1_Click( ) picture1.picture=loadpicture(“d:abctu1.jpg”) End Sub Private Sub Command2_Click( ) picture1.picture=loadpicture(“d:abctu1.jpg”) End Sub VB程序设计 第二

34、章40 2.6.1 2.6.1 工程的构成工程的构成 一个VB工程共包含7钟类型文件 1 1、工程文件、工程文件(.vbp)(.vbp) 该文件共包含与该工程有关的全部文件和对象的清单。 2 2、窗体文件、窗体文件(.frm)(.frm) 该文件包含窗体及控件对象的属性设置；窗体级的变量和外部 过程的声明；事件过程和用户自定义过程。每一个窗体都有一个窗体 文件。 3 3、窗体的二进制文件（、窗体的二进制文件（.frx).frx) 当窗体或控件的数据含有二进制属性（如图片或图标），将窗 体文件保存时，系统会自动产生同名的.frx文件。 4 4、标准模块文件（、标准模块文件（.bas).bas)

35、该文件包含模块级的变量和外部过程声明；用户自定义的、可 供本工程内各窗体调用的过程。该文件可选。 VB程序设计 第二章41 2.6.1 2.6.1 工程的构成工程的构成 5 5、类模块文件、类模块文件(.cls)(.cls) 该文件可选。用于创建含有属性和方法的用户自己的对象。 6 6、资源文件、资源文件(.res)(.res) 该文件可选，包含不必重新编辑代码就可以位图、字符串和其 他数据。 7 7、ActiveXActiveX控件的文件（控件的文件（.ocx).ocx) 该文件可以添加到工具箱并在窗体中应用。 VB程序设计 第二章42 2.6.2 2.6.2 创建、打开和保存工程创建、打开和保存工程 1 1、新建工程、新建工程 2 2、打开工程、打开工程 3 3、保存工程、保存工程 4 4、工程另存为、工程另存为 说