1、复习数据的输入输出,复 习,1.VB编程的特点,可视化的平台 面向对象的设计方法 事件驱动的编程机制 结构化的程序设计语言 强大的数据库编程能力,2.VB设计中的基本概念,1. 对象现实生活中每个可见的实体 2. 对象的三要素 属性(Property)-描述对象的性质和状态特征，也称数据。 事件(event)是指由VB预先设置的、能够被对象识别的动作。如单击控件、鼠标移动、键盘按下等操作。 方法(method) 是指各种可在对象上进行的操作，他是对象本身所内含的函数或过程（注意：不是事件程）。,对象名.方法名参数列表,对象名.属性名=属性值,3.建立VB应用程序的步骤,1.创建一个工程（Pro
2、ject） 2.设计程序运行界面，设置窗体及其他控件的属性 3.编写事件过程代码 4.程序的运行和调试 5.程序文件的保存 先保存窗体文件（.frm），再保存工程文件（.vbp）,4.标准数据类型,5.变量,1. 显示声明： 使用Dim语句,Dim 变量名 AS 类型或 Dim 变量名类型符,3. 强制显式声明Option Explicit语句,2. 隐式声明,4. 变量的赋值,变量表达式,5.变量,5.变量的作用域,6.运算符优先级,算术运算符字符运算符关系运算符逻辑运算,7. 程序基本结构,（一） 顺序结构 （二） 选择结构,1. If Then语句（单分支结构）,If ThenEnd I
3、f,2. IfThenElse语句（双分支结构）,If ThenElseEnd If,3. IfThenElseIf语句 （多分支结构）,If ThenElseIf Then ElseEnd If,4. Select Case语句（情况语句）,Select CaseCase Case Case Case Else End Select,（三） 循环结构,1. For循环语句,For 循环变量 =初值 To 终值 Step 循环体语句块Exit For Next 循环变量,循环次数,2. DoLoop循环,形式1： Do While|Until 语句块Exit Do语句块Loop,形式2：Do
4、语句块Exit Do语句块LoopWhile|Until ,8. 数组,在使用数组前必须先声明它，声明数组的一般形式：,Dim 数组名（下标1，下标2，） As 数据类型,一维数组的大小为（上界-下界）+1,多维数组的大小为每一维的大小的乘积,“下标”的一般形式为：下界 To 上界,Dim Sc(3 To 6) As Integer,9.过程,1. 定义sub子过程Private Public Static Sub 过程名 (参数表)Exit SubEnd Sub2.调用sub子过程Call 过程名 (参数表),3.函数过程 Private Public Static Function 函数名
5、 (参数表) As 类型Exit FunctionEnd Function,函数过程的特点是函数名至少在函数体中被赋值一次： 函数名=表达式,数据的输入输出,一.数据的输入,使用输入框（InputBox）函数输入数据变量=InputBox (“Prompt” ,“Title” ,Default ,posx ,posy),MsgBox函数和MsgBox语句 作用：弹出一个信息框，等待用户选择一个按钮。 函数的返回值是一个整数，可判断按了哪一个按钮若不需要返回值，可以使用MsgBox语句。 函数形式:变量= MsgBox( Prompt ,Button ,Title ) 语句形式:MsgBox P
6、rompt ,Button ,Title,二.数据的输出,函数按钮设置值 函数返回值,任务一： 编一帐号和密码检验程序。 (1)帐号不超过6位数字,密码为四个字符“Gong” (2)若帐号含有非数字字符，则显示出错信息，按“确定”按钮后清除原内容以便再输入,(3)密码输入时在屏幕上显示 “*”; 按“确定”后，若密码错，显示出错信息；若密码正确，则显示“输入正确”信息框。在密码出错时，若选择“重试”按钮，清除原内容等待再输入，若选择“取消”按钮，则停止运行。,设计思路(1)界面设置：窗体中设置两个文本框，用于输入帐号和密码；两个标签分别显示“帐号”和“密码”字样；一个 “确定”按钮 (2)属性
7、设置：为保证帐号6位,令MaxLength为6；为保证密码为4位,令MaxLength为4；为使密码显示“*”，令passwordchar为“*” (3)事件过程当帐号文本框输入帐号结束后，焦点离开Text1，可编写Text1_LostFocus()事件过程，用IsNumeric函数来检查帐号是否均为数字字符，并作相应处理当密码输入完毕并按了“确定”按钮Command1后，用command1_Click()事件检查密码是否正确，并作相应处理,练习一,任务说明： 使用inputbox输入三边长，计算三角形的面积 计算三角形面积的公式为： 其中p为三角形周长的一半,练习二：输入任意字符存放在变量s
8、trC中，判断该字符是字母、数字还是其他字符。用InputBox()接收键盘输入的任意字符事件：用Form_Click()事件过程，即每当单击窗体时，弹出输入框，输入字符后，立即弹出信息框，显示是字母、数字还是其他字符。,判断一个字符是字母、数字还是其他字符， 可用多分支结构实现Private Sub Form_click()Dim StrC As String * 1StrC = InputBox$(“输入一个任意字符“)If UCase(StrC) = “A“ And UCase(StrC) = “0“ And StrC = “9“ ThenMsgBox “数字“ElseMsgBox “其他字符“End If End Sub,
