算法及VB初步实现2

复习：算法的特征 有穷性 确定性 可行性 步骤有限能终止 确切含义，不能模棱两可。 实际能做的，而且能在有限时间内完成。 有0个或多个输入 确定性 有穷性 步骤有限能终止 确切含义，不能模棱两可。 实际能做的，而且能在有限时间内完成。 有一个或多个输出 没有输出的算法是无意义的。

复习：流程图符号 图形符号 名 称 含 义 开始、结束框 表示算法的开始或结束 输入、输出框 表示输入输出操作 处理框 表示处理或运算的功能 名 称 含 义 开始、结束框 表示算法的开始或结束 输入、输出框 表示输入输出操作 处理框 表示处理或运算的功能 判断框 用来根据给定的条件是否满足决定执行两条路径中的某一路径 流线 表示程序执行的路径，箭头代表方向 连接框 用于连接因页面写不下而断开的流程线

算法的三种基本控制结构 顺序结构 选择结构 循环结构

流程图分析

Visual Basic 基础 QQ登录界面的设计

form1 VB应用程序设计环境的窗口主要由对象窗口、控件工具箱、属性窗口、工程窗口组成。 控件工具箱集中了常用的基本控件， 如标签label、文本框TextBox、命令按钮CommandButton、列表框ListBox等。 窗体.(Form)是VB应用程序的基本结构。窗体可以看作一个“容器” 。 text1 text2 image1 label1 label2 command1 command2 form1

对象（Object） 是Visual Basic应用程序的基本单元，每个对象都作为一个完整的独立组件出现在程序中。 特点： A、都有属性。

类（Class） 对相同性质的对象的一种抽象。 Label类 Textbox类 Image类 Commandbutton类

对象、 类、属性 属性： 用来描述对象的特征，如caption，width，height。 可通过2种方式设置对象的属性： ①在程序设计阶段利用属性窗口直接设置对象的属性值； ②在程序运行阶段通过赋值语句实现，格式为： 对象名.属性名＝属性值 如：txtname.text=“请在此输入你的姓名”

代码分析 Private Sub Command1_Click() MsgBox "你的QQ号是" + Text1.Text + "你的密码是" + Text2.Text MsgBox "你的QQ正在被盗中……请保持网络的畅通" MsgBox "恭喜你！你的QQ被盗成功！" End Sub Private Sub Command2_Click() End Private Sub Form_Load() MsgBox "欢迎使用超级无敌版QQ^_^" Form1.Top = Screen.Height / 2 - Form1.Height / 2 Form1.Left = Screen.Width / 2 - Form1.Width / 2

事件和事件处理 事件（event）就是发生在对象上的事情，通常这是由用户在对象上激发的一种动作。 例：在按钮1上单击鼠标（Click） 在键盘上按下一个键 事件处理：一个事件的发生，可以引起某个对象上某个方法（事件处理过程）的执行。即由某个事件驱动了相应的事件处理过程的执行。——事件驱动概念

事件、事件驱动过程 事件驱动过程： 一个事件的发生，可以引起某个对象上某个方法（事件处理过程）的执行。 事件过程格式如下： Sub 对象名_事件名（[参数列表]） 事件过程代码 End Sub 如：单击退出按钮的过程 Sub Command2_click() end End Sub

过程 每个过程是为了完成一定的任务，由一组独立的代码组成。 VB有两大类过程：事件过程与通用过程。 事件过程是当对象的某个事件发生时，对该事件做出相应的程序代码段，它是应用程序的主体。 如：Sub Command1_click() …… End Sub

VB特点 可视化。是一种开发具有图形用户界面（GUI）的应用程序。 事件驱动。每当用户或系统触发一个事件，应用程序就会执行一段相应的程序代码来响应。 VB应用程序设计的基本过程： 界面设计—代码编写—程序运行调试。

保存 使用“文件” 菜单中“保存工程”命令，VB应用程序的窗体和工程分别存储到相应的窗体文件(.frm)和工程文件(.vbp)中。 使用“文件”菜单中的“生成工程xxx.exe”命令，可将VB应用程序编译成能在Windows环境中直接运行的可执行程序。

练习 完成“QQ登录”器，要求： 事件 内容 当窗体启动 Form1.Top = Screen.Height / 2 - Form1.Height / 2 Form1.Left = Screen.Width / 2 - Form1.Width / 2 当按钮1按下 If Text1.Text = "" Or Text1.Text = "" Then MsgBox "请输入用户名或者密码！" Else MsgBox "你的QQ号是" + Text1.Text + "；你的密码是" + Text2.Text End If 当按钮2按下 Text1.Text = "" Text2.Text = "" 当图像被点击 Form1.Top = Form1.Top - 300 Form1.Left = Form1.Left - 300