VB程序设计概述.doc

VB程序设计概述教学目的：1、 了解程序设计的分类及特点2、 了解VB程序设计的产生及发展历程。3、 掌握VB6.0程序设计的上机编程环境。教学重点：1、 编译与解释两两种不同程序执行方式的差别。2、 VB程序设计的特点。3、 VB程序设计的一般步骤。课时安排：理论教学安排10课时，上机练习6课时一、 程序设计概述1、 程序及程序设计（1）程序：计算机内能完成特定功能的指令的有序集合文件称为程序。（其实质为计算机文件，不同的计算机语言有不同的编写规则。）（2）程序设计语言的分类：机器语言（面向计算机的语言，特点为：由二进制代码编写而成，计算机可直接执行，效率高，但可读性差，不可以在不同机器上移植。）汇编语言（面向计算机的语言，特点为：由特点的少量命令编写而成，指令可以由汇编语言的编译程序解释执行，代码的执行效率也比较高，有一定的跨平台可移植性，目前多用于工业控制编程。程序的可读性较差。）高级语言（面向程序编制都的语言，特点为：由类高级语言命令编写而成，代码必须在高级语言特定的编译或解释条件下才能被执行，代码的执行效率略低，但程序的可读性与可移植都较强，不依赖机器的硬件环境。）注：目前的高级语言通常被分为面向过程的高级语言和面向对象的高级语言。2、 高级语言的两种执行方式：（1）解释方式：高级语言源程序高级语言解释程序执行结果特点：高级语言源程序在解释程序的作用下逐句执行，可以及时发现源程序的编写错误，但由于执行结果依赖于源程序，所有不利于保护程序编制者的权益。（2）编译方式：高级语言源程序目标程序高级语言编译程序可执行程序高级语言连接程序执行结果操作系统环境 特点：高级语言源程序在编译程序的作用下生成目标代码（.obj），再与高级语言的环境参数库一起在连接程序的作用下生成可以在操作系统下直接执行的可执行程序（.exe或.com），最后的可执行程序可以脱离源程序独立存在。这种方式不容易直接发现源程序的编写错误，但有利于保护程序编制者的权益，程序的使用者无法直接看到源程序。注：目前的高级语言一般都为程序的编制者同时提供编译及解释两种执行方式的集成程序设计环境。程序调试时使用解释方式，程序完成时可以编译连接生成可执行的程序。二、 VB程序设计1、 VB的起源与发展（1）起源：basic语言-visual basic（可视化的basic程序设计）（2）发展：1991年，VB1。0-1995年 VB3。0-1998年VB6。0-现在VB。NET2、 VB的特点（1） 可视化的界面设计（2） 事件驱动编程机制（3） 结构化程序计方法（4） 集成化的程序设计环境作业：1、 程序设计语言常被分为哪三类，各有何特点。2、 高级语言有哪几种执行方式，试说明各自的特点。3、 VB程序设计有哪些特点。三、 结构化程序设计1、 结构化程序的特点：（1） 程序的所有语句由顺序、分支、循环三大基本结构组成。（2） 程序中无死语句。（死语句-永远不执行的语句）（3） 程序中无死循环。（死循环-程序永远无法自动结束）（4） 程序中所有结构保持单入口单出口。2、 三大基本结构：（1） 顺序结构：语句一语句二语句N特点：程序按书写顺序逐句执行。（2） 分支结构：语句序列2条件式语句序列1truefalse特点：语句序列1与语句序列2两者只执行其中之一。条件成立时执行语句序列1，不成立执行语句2。（3） 循环结构：条件式语句序列truefalse特点：当条件式成立时，执行循环体，直到条件式不成立为止。 3、 结构化程序举例（1）输入圆的半径r，求圆的周长c及面积s。（2）输入数a,b,c求最大数四、VB程序设计步骤1、VB程序的启动1）桌面图标2）开始-程序-VB精简版-VB程序2、VB界面新建-标准EXE-打开3、创建VB程序的步骤1） 创建窗体2） 编写程序代码3） 调试运行程序4） 保存程序(.Frm,.vbp) P6-8例1代码:Private Sub Form_Click()Form1.ClsPrint 欢迎你使用VB程序设计!End SubPrivate Sub Form_Load()Form1.BackColor = RGB(255, 255, 225)End Sub练习:在窗体上加入一个标签label1,单击窗体时,标签变为红色,单击标签时,窗体变为绿色。Private Sub Form_Click()Label1.BackColor = RGB(255, 0, 0)End SubPrivate Sub Label1_Click()Form1.BackColor = RGB(0, 255, 0)End SubPrivate Sub Label1_DblClick()Form1.BackColor = RGB(0, 0, 255)End SubP6-8例21、Label(标签)2、textbox(文本框)3、commandbutton(命令按钮)界面设计如下：代码设计如下：Private Sub Command1_Click()Dim x As Singlex = Val(Text1.Text)Text2.Text = x * xEnd SubPrivate Sub Command2_Click()EndEnd Sub上机练习：P25上机练习1 窗体的属性窗体属性的设置除了在界面设计阶段在属性窗口中完成之外还可以通过代码来设置。Private Sub Form_Load() load是窗体的载入事件Form1.Width = 8000Form1.Height = 8000Form1.BackColor = RGB(125, 255, 255)End SubP25上机练习2 Label1.caption-用来设置标签的显示内容。Private Sub Form_Click()Label1.Caption = 你单击了窗体!End SubPrivate Sub Form_DblClick()Label1.Caption = 你双击了窗体!End Sub练习：在窗体上设置“红色”“绿色”“兰色”三个标签，单击指定标签时，窗体的背景变为指定的颜色。五、对象与事件的基本概念1、对象及其三要素1）对象：代码及数据的集合。例如：标签对象，图文框对象。2） 对象的三要素：属性：描述对象的特征。如颜色，大小，形状等。 对象名.属性名，与VB中的变量等价。例如： 1)VB程序自动产生对象form1,form1有属性如下：form1.backcolor(背景色),form1.fontsize(字号大小),form1.width(宽度)2)在form1上加入标签label1。Label1的属性如下：Label1.caption（标题）Label1.backcolor注意：对象的属性既可以在属性窗口中设置，也可以程序执行的过程中设置。窗体对象的对象名可以省缺。例题：1）利用rgb(r,g,b)及标签的单击来改变窗体的背景色。rgb(0,0,0)-黑色，rgb(255,255,255)-白色Private Sub Label1_Click()Form1.BackColor = RGB(255, 0, 0) 设置窗体的背景色为红色。End SubPrivate Sub Label2_Click()Form1.BackColor = RGB(0, 255, 0) 设置窗体的背景色为绿色。End SubPrivate Sub Label3_Click()Form1.BackColor = RGB(0, 0, 255) 设置窗体的背景色为蓝色。End Sub上机练习：1）单击标签时，对应的标签变为指定的颜色。 设置label1.backcolorPrivate Sub Label1_Click()Label1.BackColor = RGB(255, 0, 0) 设置标签1的背景色为红色。End SubPrivate Sub Label2_Click()Label2.BackColor = RGB(0, 255, 0) 设置标签2的背景色为绿色。End SubPrivate Sub Label3_Click()Label3.BackColor = RGB(0, 0, 255) 设置标签3的背景色为蓝色。End SubPrivate Sub Label4_Click()Label1.BackColor = RGB(150, 150, 150)Label2.BackColor = RGB(150, 150, 150)Label3.BackColor = RGB(150, 150, 150)End Sub方法：对象可以执行的动作。这种动作用来完成某种特定的功能。对象名.方法名 方法参数表例如：Form1.print “2008中国奥运”Form1.cls 清除屏幕内容Form1.show 用来显示窗体事件：对象能够识别的动作。这种动作用于与用户的交互。事件通过用户编写过程来使用。Private sub 对象名_事件（）用户用来编写代码End sub例题：1 ）在窗体上加上一个按钮command1，单击按钮，在窗体上画一个圆。 画圆使用方法：form1.circle (x,y),r （x,y）是圆的坐标，r是半径。 Private Sub Command1_Click()Form1.Caption = 在窗体上画圆Form1.ForeColor = RGB(255, 0, 0)Form1.Circle (1000, 1500), 800End Sub2、 对象的分类1）控件对象（预定义对象）2）用户对象（VB6.0中的用户对象不多）也可以分一般对象与容器对象-用来包含其它对象的对象。例如，窗体对象，表格对象都是容器对象。作业：P23-251）1、2直接做在书上。2）3做在作业本上。3）上机调试上机完成，提交。上机调试题1窗体的基本属性的认识。改变程序：(1) 单击窗体时窗体向下移动。Private Sub Form_Click()Form1.top =form1. top + 50Form1.left=form1.left+50End Sub(2) 窗体的放大Private Sub Form_Click()Form1.Width = Form1.Width + 50Form1.Height = Form1.Height + 50End Sub练习：单击向左时，label1向左移动。单击向右时，label1向右移动。上机调试题2 窗体的单击(click)与双击(dblclick)事件及标签的caption属性使用。Private Sub Form_Click()Label1.BackColor = RGB(255, 0, 0)Label1.Caption = 你单击了窗体！End SubPrivate Sub Form_DblClick()Label1.BackColor = RGB(0, 255, 0)Label1.Caption = 你双击了窗体！End Sub改变程序：(1) 在窗体上加入一个标签与一个按钮。单击标签时，按钮变为红色；双击标签时，按钮变为绿色。按钮的变色？command1.sytle=1,按钮为图形方式才可以变色。按钮无双击事件。Private Sub Label1_Click()Command1.BackColor = RGB(255, 0, 0)Command1.caption=”红色”End SubPrivate Sub Label1_DblClick()Command1.BackColor = RGB(0, 255, 0)Command1.caption=”绿色”End Sub上机习题3Private Sub Command1_Click()Dim x As SingleDim j As Singlex = Val(Text1.Text) 从text1文本框中取得输入数并放入变量xj = x * 15 求积并放入变量j中Text2.Text = j 输出积End Sub上机作业：1、 在窗体上加入两个标签及一个按钮，标签标题分别为“按钮放大”与“按钮缩小”。单击标签时，按钮发生对应的改变。2、 在窗体上加入两个标签，标题分别为“苹果”“香蕉”。再加入一个按钮，标题为“交换”。单击按钮时，标签的内容发生交换。 Private sub comma