第二章用 Visua1 Basic编程 教学内容 在这章里要求掌握VB编程的基本概念 二、目的要求 1.熟悉VB程序中代码和语句书写规则 2.掌握VB的数据类型;VB的运算符和表达式的使用 3.熟练掌握赋值语句、输入/输出消息框函数的使用 4.掌握常用内部函数的使用 三、教学重点与难点 教学重点:变量和常量的定义及使用、运算符和表达式的使用输入/输出消息框函数的 使用、及常用内部函数的使用。 教学难点:数据类型、运算符与表达式。 四、教学方法 多媒体教学为主。适当提问,加深学生对概念的理解
第二章 用 Visual Basic 编程 一、教学内容 在这章里要求掌握 VB 编程的基本概念。 二、目的要求 1．熟悉 VB 程序中代码和语句书写规则； 2．掌握 VB 的数据类型；VB 的 运算符和表达式的使用； 3．熟练掌握赋值语句、输入/输出消息框函数的使用； 4．掌握常用内部函数的使用； 三、教学重点与难点 教学重点：变量和常量的定义及使用、运算符和表达式的使用输入/输出消息框函数的 使用、及常用内部函数的使用。 教学难点：数据类型、运算符与表达式。 四、教学方法 多媒体教学为主。适当提问，加深学生对概念的理解
第一讲(2学时) 教学内容 Visual basic语言程序的构成、变量、常量的声明及使用 二、目的要求 1.熟悉VB语言程序的构成 2.掌握变量、常量的声明及使用 三、教学重点与难点 教学重点:变量、常量的声明及使用 教学难点:变体类型数据的使用 四、教学方法 多媒体教学 五、教学过程 2.1 Visual basic程序的构成 1、传统流程图中的基本符号 起止点 判断 流线 2、三种基本结构的表示 (1)顺序结构 语句1 语句2 (2)选择结构
第一讲 （2 学时） 一、教学内容 Visual Basic 语言程序的构成、变量、常量的声明及使用。 二、目的要求 1．熟悉 VB 语言程序的构成。 2．掌握变量、常量的声明及使用。 三、教学重点与难点 教学重点：变量、常量的声明及使用。 教学难点： 变体类型数据的使用 四、教学方法 多媒体教学。 五、教学过程 2.1 Visual Basic 程序的构成 1、传统流程图中的基本符号 起止点 输入/输出 处理 判断 流线 2、三种基本结构的表示 （1）顺序结构 （2）选择结构 语句1 语句2
件 语句1 语句2 (3)循环结构 条件 语句组 (a)当型循环 语句组 条件 (b)直到循环 2.2.1数据类型 数字型 见书40页表2.1 2.字符串型( String)
（3）循环结构 2.2.1 数据类型 1. 数字型 见书 40 页表 2.1 2. 字符串型(String) 条件 语句组 Y N ( b )直到循环 条件 语句1 语句2 Y N 条件 (a)当型循环 a) Y N 语句组
3.布尔型( Boolean) 4.日期型ate) 5.对象类型( Ob ject) 6.变体类型( Variant) 7.用户自定义的数据类型 2.2常量与变量 1.常量 常量声明格式: [ Public| Private) Const常量名[ as type]= value 2.变量 、变量的命名规则 1.以字母或汉字开头,后可跟字母、数字或下划线组成 2.变量名最长为255个字符 3.VB中不区分变量名的大小写,不能使用VB中关键字 声明变量有两种方式:显式声明和隐式声明。 (1)显式声明语法 声明格式: Dim/Static Public PrivateAs 语句功能:声明变量并分配存储空间。 (2)隐式声明语法 声明格式:Dim(或者不声明变量,而直接使用变量) 2.2.3变量作用域 不同作用域变量的声明方式 作用范围 局部变量模块级变量公共变量 声明方式 Dim, Static Dim, Private Public 变量的声明位置 过程内部模块的声明段模块的声明段 本模块中其他过程能否访问 「其他模块能否访问 不能 不能能
3. 布尔型(Boolean) 4. 日期型(Date) 5. 对象类型（Object） 6. 变体类型(Variant) 7. 用户自定义的数据类型 2.2.2 常量与变量 1. 常量 常量声明格式： [Public | Private] Const 常量名 [as type]=value 2. 变量 一、变量的命名规则 1. 以字母或汉字开头，后可跟字母、数字或下划线组成. 2. 变量名最长为 255 个字符； 3. VB 中不区分变量名的大小写，不能使用 VB 中关键字； 二、声明变量有两种方式：显式声明和隐式声明。 (1) 显式声明语法 声明格式：Dim|Static|Public|Private As 语句功能：声明变量并分配存储空间。 (2) 隐式声明语法 声明格式：Dim （或者不声明变量，而直接使用变量） 2.2.3 变量作用域 不同作用域变量的声明方式 作用范围 局部变量 模块级变量 公共变量 声明方式 Dim，Static Dim，Private Public 变量的声明位置 过程内部 模块的声明段 模块的声明段 本模块中其他过程能否访问 不能 能 能 其他模块能否访问 不能 不能 能
六、小结 在这一讲里,我们要掌握变量,常量的声明及使用方法。要掌握变量有哪些类型,怎么 使用它们,注意ⅦB里的变体类型的变量,自定义变量等,以及常量的使用。 七、作业 习题2.1,2.2
六、小结 在这一讲里，我们要掌握变量，常量的声明及使用方法。要掌握变量有哪些类型，怎么 使用它们，注意 VB 里的变体类型的变量，自定义变量等，以及常量的使用。 七、作业 习题 2.1, 2.2
第二讲(2学时) 教学内容 Visual basic中表达式、基本语句赋值语句的用法 二、目的要求 1.熟悉VB语言中表达式的使用 2.掌握赋值语句的使用。 三、教学重点与难点 教学重点:表达式,赋值语句。 教学难点:赋值语句的用法 四、教学方法 多媒体教学 五、教学过程 2.2.4表达式 1.算术运算符及算术表达式 (1)“/”和“\”运算符的区别 (2)写B表达式时,要注意的几点 2.字符运算符及字符表达式 字符运算符用于将两个字符型表达式连接生成一个新字符串。其运符主要有“+” 运算符和“&”运算符 3.关系运算符及关系表达式 4.逻辑运算符及逻辑表达式 5.运算符的优先顺序 在一个表达式中,如果同时有多个运算符存在,则它们的优先顺序由高到低依 次为 算术运算符→字符运算符→关系运算符→逻辑运算符
第二讲 （2 学时） 一、教学内容 Visual Basic 中表达式、基本语句赋值语句的用法。 二、目的要求 1．熟悉 VB 语言中表达式的使用。 2．掌握赋值语句的使用。 三、教学重点与难点 教学重点：表达式，赋值语句。 教学难点： 赋值语句的用法 四、教学方法 多媒体教学。 五、教学过程 2.2.4 表达式 1. 算术运算符及算术表达式 ⑴“/”和“\”运算符的区别： （2） 写 VB 表达式时，要注意的几点 2. 字符运算符及字符表达式 字符运算符用于将两个字符型表达式连接生成一个新字符串。其运符主要有“+” 运算符和“&”运算符 3. 关系运算符及关系表达式 4. 逻辑运算符及逻辑表达式 5. 运算符的优先顺序 在一个表达式中，如果同时有多个运算符存在，则它们的优先顺序由高到低依 次为： 算术运算符→字符运算符→关系运算符→逻辑运算符
算术运算符的优先级顺序由高到低依次为 ∧(指数运算);-(负数):*,/(乘法,浮点除法);\(整数除法);Mod(取模 运算):+,-(加法,减法) 其中,“*”,“/”具有相同的优先级;“+”,“-”具有相同的优先级。 在关系运算符中,所有的运算符具有相同的优先级 逻辑运算符的优先级顺序由高到抵依次为 Not(非),And(与),Or(或),Xor(异或),Eqv(同或),Imp(蕴含) 用括号控制运算的优先次序可以是程序清晰易读,而且不易出错。 [例2.4]写出VB表达式4*6>3*70rNot5>2的值 计算步骤如下: (1)算术运算:24210rNot5>2 (2)关系运算: True Or Not True (3)逻辑运算: True Or false (4)结果:True 2.3.1赋值语句 赋值语句语法:变量名对象的属性名=表达式 功能:将表达式的值赋给指定的变量或对象的属性。 说明:赋值语句在程序设计中的使用非常广泛,每一个赋值语句可以单独放在一行 中,也可以将多条赋值语句放在一行中,但每一语句间必须用“:”冒号作为分隔符 【例25】已知长和宽,求矩形的面积 设计步骤如下 (1)设计程序界面。选择“新建”工程,然后在窗体中增加一个标签 Labell,一个 命令按钮 Command1和一个文本框 TextI。 (2)设置对象属性。如表2.8所示 表28属性设置 对象 属性 属性值 Label 已知:长=5,宽=7 Label2 Commandl Caption则矩形面积 (3)编写事件代码。 命令按钮 Command1的 Click事件代码为: Private Sub Commandl Click Dim a as single b as single area As single area=a*b Label2 Caption=Str(area) End Sub 六、小结 在这一讲里,我们要掌握表达式的的用法,知道六种表达式的用法及书写规则。还要利 用赋值语句编写简单程序
算术运算符的优先级顺序由高到低依次为： ∧（指数运算）；-（负数）；*，/（乘法，浮点除法）；\（整数除法）；Mod（取模 运算）；+，-（加法，减法）。 其中，“*”，“/”具有相同的优先级；“+”，“-” 具有相同的优先级。 在关系运算符中，所有的运算符具有相同的优先级。 逻辑运算符的优先级顺序由高到抵依次为： Not（非），And（与），Or（或），Xor（异或），Eqv（同或），Imp（蕴含）。 用括号控制运算的优先次序可以是程序清晰易读，而且不易出错。 [例 2.4] 写出 VB 表达式 4*6>3*7 Or Not 5>2 的值。 计算步骤如下： ⑴ 算术运算：24>21 Or Not 5>2 ⑵ 关系运算：True Or Not True ⑶ 逻辑运算：True Or False ⑷ 结果：True 2.3.1 赋值语句 赋值语句语法：变量名|对象的属性名=表达式 功能：将表达式的值赋给指定的变量或对象的属性。 说明：赋值语句在程序设计中的使用非常广泛，每一个赋值语句可以单独放在一行 中，也可以将多条赋值语句放在一行中，但每一语句间必须用“：”冒号作为分隔符。 【例 2.5】已知长和宽，求矩形的面积。 设计步骤如下： ⑴ 设计程序界面。选择“新建”工程，然后在窗体中增加一个标签 Label1，一个 命令按钮 Command1 和一个文本框 Text1。 ⑵ 设置对象属性。如表 2.8 所示。 表 2.8 属性设置 对象 属性 属性值 Label1 Caption 已知：长=5，宽=7 Label2 Caption Command1 Caption 则矩形面积= ⑶ 编写事件代码。 命令按钮 Command1 的 Click 事件代码为： Private Sub Command1_Click() Dim a As Single,b As Single,area As Single a=5 b=7 area=a*b Label2.Caption=Str(area) End Sub 六、小结 在这一讲里，我们要掌握表达式的的用法，知道六种表达式的用法及书写规则。还要利 用赋值语句编写简单程序
七、作业 补充课外习题
七、作业 补充课外习题
第三讲(2学时) 教学内容 Visual 中输入、输出语句和VB提供的内部函数 二、目的要求 1.掌握VB语言中输入、输出语句的用法 2.掌握一些常用函数使用。 三、教学重点与难点 教学重点:输入、输出语句。 教学难点:函数的使用 四、教学方法 多媒体教学 五、教学过程 2.3.2输入语句 语句格式: value= Input Box( message; title [ default[ cord, cord]]) 语句功能:产生一个具有提示信息并可供用户输入数据的对话框。返回字符串型数 据 例:输入一个整数,并在文本框Text1中显示输入的整数 程序代码为 Private Sub Form Cl Dim temp As String, num As Integer temp= Input Boxi("请输入一个整数","输入窗口演示") Iext1Text=”你输入的数是:”&num End Sub 2.3.3输出语句 语句格式: Msg Box message [,buttons, title] 函数格式:vlue= Msg box( message, buttons[,tlel) 例:利用 MsgBox函数产生一个询问对话框,并根据用户的回答作出相应的操作 程序代码为 Dim value As Integer value= Msg Box("确定退出本系统吗?",1+32+0+0,″演示窗口") If value= yboK Then end
第三讲 （2 学时） 一、教学内容 Visual Basic 中输入、输出语句和 VB 提供的内部函数。 二、目的要求 1．掌握 VB 语言中输入、输出语句的用法。 2．掌握一些常用函数使用。 三、教学重点与难点 教学重点：输入、输出语句。 教学难点： 函数的使用 四、教学方法 多媒体教学。 五、教学过程 2.3.2 输入语句 语句格式：value=InputBox(message [,title [,default [,xcord,ycord] ] ]) 语句功能：产生一个具有提示信息并可供用户输入数据的对话框。返回字符串型数 据。 例：输入一个整数，并在文本框 Text1 中显示输入的整数 程序代码为 Private Sub Form_Click() Dim temp As String, num As Integer temp = InputBox(请输入一个整数:, 输入窗口演示) num = Val(temp) Text1.Text= 你输入的数是: & num End Sub 2.3.3 输出语句 语句格式：MsgBox message [,buttons[, title] ] 函数格式：value=MsgBox ( message [,buttons[, title] ]) 例：利用 MsgBox 函数产生一个询问对话框，并根据用户的回答作出相应的操作。 程序代码为： Dim value As Integer value = MsgBox(确定退出本系统吗？, 1+32+0+0, 演示窗口) If value = vbOK Then End
如果不需要返回值,则可采用 Msgbox的过程形式 例:产生一个提示窗口,提示用户必须输入1~100之间的整数,窗口中只需一个“确 定”按钮,则实现的语句为: MsgBox"请不要输入超过100的整数”,0+48+0+0,"提示窗口 2.4函数 1.算术运算函数 例:Abs(-8)=8 Sqr(25)=5 Sgn(-8)=-1 Fix(3.57)=3 Fix(-3.57)=-4 Int(3.57)=3 Int(-3.57)=-4 Exp (3) Log (3)=Ln (3) 2.字符串函数 例:Len(“ World”)=5 Left(“ Hello”,2)=“He” Right c String(3,“*”)=“***” InStr(“abc",“ab”) InStr(1,“ pretty",“re”)=2 Lcase(“ World”)=“ world” Chr(65)=“A Str(65)=“65” Asc(“A”)=65 3.日期与时间函数 例:使用 Weekday函数将日期转换为星期几。 程序代码如下: im MyDate, My WeekDay dAte=#08/16/2000# My WeekDay= Weekday( MyDate)' My WeekDay的值为4,因为 My Date是星
如果不需要返回值，则可采用 MsgBox 的过程形式。 例：产生一个提示窗口，提示用户必须输入 1~100 之间的整数，窗口中只需一个“确 定”按钮，则实现的语句为： MsgBox 请不要输入超过 100 的整数，0+48+0+0 , 提示窗口 2.4 函数 1. 算术运算函数 例：Abs（-8）=8 Sqr（25）=5 Sgn（8）=1 Sgn（0）=0 Sgn（-8）=-1 Fix（3.57）=3 Fix（-3.57）=-4 Int（3.57）=3 Int（-3.57）=-4 Exp（3）=e 3 Log（3）=Ln（3）。 2. 字符串函数 例：Len（“World”）=5 Left（“Hello”，2）=“He” Right（“Something”，3）=“ing” String（3，“*”）=“***” InStr（“abc”，“ab”）=1 InStr（1，“pretty”，“re”）=2 Ucase（“World”）=“WORLD” Lcase（“World”）=“world” Chr（65）=“A” Str（65）=“65” Asc（“A”）=65。 3. 日期与时间函数 例：使用 Weekday 函数将日期转换为星期几。 程序代码如下： Dim MyDate, MyWeekDay MyDate = #08/16/2000# MyWeekDay = Weekday(MyDate) MyWeekDay 的值为 4，因为 MyDate 是星 期三