Visual Basic 程序设计 教师：王 杨 电话：13648032216 邮箱：wangyang@swpu.edu.cn 教师：王 杨 电话：13648032216 邮箱：wangyang@swpu.edu.cn Q群： 272761139

Visual Basic 6.0集成开发环境 菜单及常用工具栏 工程资源管理器窗口 工具箱 窗体设计窗口 属性窗口 代码窗口

VB程序编写步骤 设计用户 界面 修改属性 编写代码 运行程序 保存文件

对 象 1 属性 2 事件 3 方法

课堂练习

大小发生改变后，移动距离是否合适？

思考

Africa 2.175 123 2/20/2012 The quick brown fox 整型 非整型 Jackie Chan 数值 非数值 999 9002.12 TRUE 数据属于不同类别

第2章 Visual Basic语言基础知识 数据类型 1 常量和变量 2 运算符与表达式 3 常用内部函数简介 4

Integer Long

基本数据类型 P22 数据结构 关键字 类型符 前缀 占字节数 举例 字节型 Byte 无 byt 1 0~255 整型 Integer % -32768~32767 长整型 Long & lng 4 -2147483648~2147483647 单精度型 Single ! sng 4 123.45、123.45！、0.12345 E+3 双精度型 Double # dbl 8 123.45#、0.12345D+3、0.12345E+3# 货币型 Currency @ cur 8 $12.345、12.345@ 日期型 Date(Time) 无 dtm 8 #03/25/1999# 逻辑型 Boolean 无 bln 2 True False 字符串型 String $ str 字符串 “abcdef”、”程序 设计“、”123“ 对象型 Object 无 obj 4 Command 变体型 Variant 无 vnt 按需分配 任一值 VarType()检测

VB中不允许在定义变量的同时对其赋值 如：Dim a% = 100（错误） Private Sub Form_Click() Dim r As Single, s As Double ,c# r = Text1.text s = 3.1415926 * r ^ 2 c = 2 * 3.1415926 * r Print s , c End Sub VB中不允许在定义变量的同时对其赋值 如：Dim a% = 100（错误） Private Sub Form_Click() Dim r As Single, s As Double ,c# Const pi #=3.1415926 r = Text1.text s = pi * r ^ 2 c = pi * r Print s , c End Sub

第2章 Visual Basic语言基础知识 数据类型 1 常量和变量 2 运算符与表达式 3 常用内部函数简介 4

变量的声明 Dim a As Double, b As Double Dim a%，b& Dim a,b As Double Dim 变量名 As 类型 Dim a As Double, b As Double Dim a%，b& Dim a,b As Double Dim S1 As String Dim S2 As String * 50 不声明变量类型直接使用为变体类型 S = “12” + “ 34” S = S + 4

命名规则 仅由字母、汉字、数字及下划线组成 首字符只能是字母或汉字 不能是VB保留字 变量名不区分大小写

第2章 Visual Basic语言基础知识 数据类型 1 常量和变量 2 运算符与表达式 3 常用内部函数简介 4

VB运算 算术运算 字符串运算 关系运算 逻辑运算

操作数应是数值型,若是数字字符或逻辑型，则自动转换 1、算术运算符 例： 5 * 4 + 10 mod 10 \ 9 / 3 + 2 ^ 2 运算符 含义 优先级 实例 结果 ^ 幂运算 1 2 ^ 2 4 * 乘 3 5 * 4 20 / 除 9 / 3 \ 整除 9.7 \ 3.2 Mod 取余数 5 10 mod 3 +（-） 加（减） 6 20 + 1 + 4 25 操作数应是数值型,若是数字字符或逻辑型，则自动转换 例：False + 12 + “24” ‘结果为36 算术表达式可以使用多层括号，且乘号不能省略 例：2*（x^3+5*(y1+y2))

2、关系运算符 关系运算：结果为逻辑值 "a">"c" 结果为？ 关系运算 运算符 优先级 示例 大于 > 3 >  3 100>99结果为True 小于 <  1.2<-23结果为False 大于等于 >= Sin(1)>=0结果为True 小于等于 <= Sqr(3)<=0结果为False 等于 = 12=13结果为False 不等于 <>  12<>13结果为True 关系运算：结果为逻辑值 "a">"c" 结果为？

3、逻辑运算符 逻辑运算 运算符 优先级 示例 非（求反） Not 2 Not(12<>13)结果为False 与（并且） And 1 (23>10) and (30<23)结果为False 或（或者） Or (23>10) or (30<23)结果为True 关系运算和逻辑运算由老师在第四章复习时强调其注意事项

4、字符串运算符 “123” + “456” “123” & “456” ”123456” “123456” 579 “123456” “123” + 456 “123 ” & 456 “ a23” + 456 “ a23” & 456 出错 ”a23456”

第2章 Visual Basic语言基础知识 数据类型 1 常量和变量 2 运算符与表达式 3 常用内部函数简介 4

数学函数 P27

字符串函数 P28 Len(x) LenB(x) InStr(str1, str2) Left$ (str，n) 测试字符 串大小 Len(x) LenB(x) 取子串函数 Left$ (str，n) Right$ (str，n) Mid$ (str，p，n) 返回字符串 String$(n,str)/ String$(n,Ascii) space$(n) 找子串函数 InStr(str1, str2)

总 结 数据类型 1 常量和变量 2 运算符与表达式 3 常用内部函数简介 4

作 业 复习并掌握表2-1,表2-5 自学并了解P21变量如何用Deftype成批定义？ 自学并了解P24变量类型转换函数？ 自学并了解表2-6,表2-7 自学并掌握表2-4 课后习题P30选择题、填空题、简答题3、4、5、6 预习第三章