3.7 VB程序设计初步ppt课件

《3.7 VB程序设计初步ppt课件》由会员分享，可在线阅读，更多相关《3.7 VB程序设计初步ppt课件（20页珍藏版）》请在七七文库上搜索。

1、第7节 VB程序设计初步,至今为止计算机仍无法识别用自然语言和流程图等形式描述的算法。那么如何才能使计算机来实现算法呢？,学习目标,1.初步了解VB程序的界面 2.了解VB程序中对象、类、属性等相关概念 3.学会简单程序的设计与调试,一、VB简介,Visual Basic简称VB，是微软公司推出的一款功能强大的软件开发工具。Visual 意即可视的、可见的，指的是开发像Windows操作系统的图形用户界面的方法。 Basic 实际上是一个短语的缩写，这个短语就是 Beginners all_purpose symbolic instruction code ，其中文意思为“初始者通用符号指令代

2、码语言”。,二、VB基本概念,所有的人构成了一个类。,一个对象,一个对象,一个对象,每个人是该对象 类的实例（实体）,对象：是现实世界中的实体在计算机中的映射。,张老师,小斌,小红,VB中常用基本类有： Label类：标签类 Commandbutton类：命令按钮类 Textbox类：文本框类 Form类：窗体类 Shape类：形状类,属性：即静态特征,每个特征的具体取值，称属性值。它的一个范围称属性域,属性描述了对象的状态特征,张老师,张老师的身高为170,对象名 属性名 属性值,.,=,例：Text1. Text = “你好“,二、VB基本概念,二、VB基本概念,打架：是个外部的动作，称为

3、事件,小钱哭，就是受到外部刺激所做出的反应。这个反应在计算机中要通过用户自己的编程实现,这整个过程就是一个事件驱动的过程。VB中最主要的一个思想就是事件驱动。即通过什么事件，做出什么反应。,小吴,小钱,男生打架事件,二、VB基本概念,告状,和解,逃跑,一个对象具有逃跑、告状、求助、和解等能力，即对象的动态特征，称为方法。,一个事件的发生，可以引起某对象上事件处理过程（方法）的执行,求助,三、VB程序工作界面,Visual Basic 6.0启动与退出 1、Visual Basic 6.0的启动 选择【开始】【所有程序】【Microsoft Visual Basic 6.0 中文版】【Micro

4、soft Visual Basic 6.0 中文版】菜单命令，即可启动Visual Basic 6.0。 2、 Visual Basic 6.0的退出 单击窗口右上角的【关闭】按钮。 选择【文件】【退出】菜单命令。,三、VB程序工作界面,【新建工程】对话框,三、VB程序工作界面,工程资源管理器窗口,属性窗口,窗体设计器窗口,工具箱,窗体布局窗口,工程窗口,工具栏,标题栏,菜单栏,三、VB程序工作界面,三、VB程序工作界面,主窗口也称设计窗口位于集成开发环境的顶部，由标题栏、菜单栏和工具栏组成。,表示当前的状态,菜单栏中的菜单命令提供开发、调试和保存应用程序所需要的工具,“常用”工具栏,以图标的

5、方式提供对常用命令的快速访问,“视图”/ “工具栏”命令打开（关闭）其它工具栏,窗体左上角坐标,窗体大小,单位是twip 1440twip=1英寸,三、VB程序工作界面,窗体设计器窗口简称窗口(Form)，即是设计VB应用程序界面的工作窗口，也是应用程序最终面向用户的界面。,设计应用程序时，窗体就像是一块画布，在其上可以画出组成应用程序的各构件。,三、VB程序工作界面,工程是指用于创建一个应用程序的文件集合。 工程资源管理器窗口含有建立一个应用程序所需要的文件清单。,三、VB程序工作界面,工具箱主要用于应用程序的界面设计 工具箱窗口由工具图标组成,这些图标是VB应用程序的构件，称为控件 工具箱

6、中的控件有三类： 内部控件（标准控件）、ActiveX控件和可插入对象 启动VB后，工具箱中只有内部控件 ActiveX控件在需要时通过执行“工程”/“部件”命令添加到工具箱中,程序（Program）：是为实现特定目标或解决特定问题而用计算机语言编写的命令序列的集合。 程序的基本结构：顺序结构、选择结构、循环结构。,S1,S2,Sn,S,C,是,否,C,S1,S2,顺序结构，如求解“鸡兔同笼”问题,选择结构，如求解一元二次方程问题,循环结构，如求最大公约数问题,四、VB程序设计,四、VB程序设计,程序设计：就是编写程序的过程，这个过程包括了分析问题、建立模型、设计算法和把该算法用某种计算机程序

7、设计语言（如VB语言）转换成为程序，并保证这种转换无二义性。,具体问题,程序设计过程,程序设计,计算机程序,分析问题、建立模型、设计算法、编写程序,例：用VB实现高考倒计时,Private Sub Form_Load() Timer1.Interval = 1000 End Sub Private Sub Timer1_Timer() Label4.Caption=Str(#6/7/2016#) Label5.Caption=Str(Date) Label6.Caption=Str(CDate(Label4.Caption) - CDate(Label5.Caption) & “天“ End Sub,课堂小结,