数据库课件5

填空3：整型变量x中存放了一个两位数，要将这个两位数交换 位置，例如13变成31，实现的表达式是 。 思路：取x的个位数并乘以10 + x的十位数 •x的个位数：x MOD 10 •x的十位数：x \ 10 •表达式： (x MOD 10) * 10 + x \ 10
填空4：书写表达式 1. (1+xy)6：（1+x*y）^6 1 1/(1/r1+1/r2+1/r3) 注意：不应有下标形式 2. 1 1 1
⑷ 字符串转换成数字函数：Val（<字符串表达式>）
• 功能：将数字字符串转换成数值型数字。 • 注意，数字串转换时可自动将字符串中的空格、制表符合换 行符去掉，当遇到它不能识别位数字的第一个字符时，停止 读入数字串。 • 例如： ?val("16")+2 '结果：18 ?val("3 45")+2 '结果：347 ?val("76abc43")+2 '结果：78
'变量x长度为10
'结果：x1=5 '出错 '结果：x3=2 '结果：x4=4 '结果：x5=10
⑶ LTrim、RTrim、Trim函数
x=" ab cde " ?"12"+ltrim(x)+"34" ?"12"+rtrim(x)+"34" ?"12"+trim(x)+"34" '结果："12ab cde 34" '结果："12 ab cde34" '结果："12ab cde34"
⑶ 数字转换成字符串函数：Str（<数值表达式>）
• 功能：将数值表达式值转换成字符串。 • 注意，当一数字转换成字符串时，总会在前头保留一空格 来表示正负。表达式值为正，返回的字符串包含一前导空 格表示有一位正号。 • 例如： s=str(99) ? "ab"+s '结果："ab 99" s=str(-6) ? "ab"+s '结果："ab-6"
复习程序部分
逻辑表达式 •运算符：与(AND)、或(OR)、非(NOT) •运算规则 •应用
表达式作业
选择2：下面 是合法的变量名。 A) X_yz B) 123abc C) integer D) X-Y 答案B：不能以数字开始 答案C：是VBA的保留字 答案D：是表达式 填空1：下列哪些是合法常量，分别指出其类型： ⑴ 100.0 ⑵ 1E1 ⑶ 123,456 ⑷ 0100 ⑸ "ASDF" ⑹ #2000/10/7# ⑺ π ⑻ True ⑼ T ⑴ 数值型、 ⑵ 数值型、 ⑶ 非法、⑷ 数值型、⑸ 字符型 ⑹ 日期型、 ⑺ 非法、 ⑻ 逻辑型、⑼ 非法
VBA程序是由大量的语句构成的。一个语句是能够完成某 项操作的命令。VBA程序语句按照功能不同分为两大类：一是 声明语句，用于给变量、常量或过程定义命令；二是执行语句， 用于执行赋值操作、调用过程、实现各种流程控制。 例如，有如下程序清单： Dim x As Boolean 声明语句 x=2>3 执行语句
•单击“视图”菜单选择“立即窗口” 选项，打开立即窗口以便观察运行结 果
•按<F5>或单击看结果
•运行出错或结果不合理，修 改程序再调试 •此程序即为顺序结构
⑵ 取整函数：Fix(<数值表达式>) • 功能：返回数值表达式的整数部分。 • 举例： ?fix(-3.4+1),fix(-2.6),fix(2.4),fix(2.6) 结果： -2 -2 2 2
\ 与 Mod 运算的作用 X X/2 X\2 X MOD 2 INT(X/2) FIX(X/2) 0 0 1 0 1 0.5 1 1 2 1 1 0 1 1 3 1.5 1 1 2 2 4 2 2 0 即当 X 为偶数时会使 X/2 = X\2 或 X MOD 2 = 0 扩充：若 X/Y = X\Y 或 X MOD Y = 0 则： X是Y的倍数 X/2 = X\2 或 X MOD 2 = 0 X能被Y整除 或 X/2=INT(X/2)或 X/2= FIX(X/2) 因此判断X是否能被3整除可表示为： 若 X/3 = X\3 或 X MOD 3 = 0，则X能被3整除，否则不能。 即人处理问题的思维理念，在计算机中用数学公式表示。 X/Y = X\Y 或 X MOD Y = 0 或 X/Y=INT(X/Y)或 X/Y= FIX(X/Y)
⑶ 四舍五入函数：Round(<表达式1>[,(<表达式2>])
• 功能：按照指定的小数位数进行四舍五入运算。 [(<表达式2>]是进行四舍五入运算小数点右边应保留的小 数位数。 • 举例： ?round(3.254,1),round(3.254,2),round(13.75,0) 结果：3.3 3.25 14 ⑷ 产生随机函数：Rnd • 功能：产生一个 0 – 1(含0、不含1) 之间的随机数。
227页
VBA编程
11.2.4
函数
1.常用数学函数如下表： √ √ √ √ √
⑴ 向下取整函数：Int(<数值表达式>)
• 功能：返回数值表达式向下取整数的结果。自变量为负数 时返回小于等于自变量的第一个整数负数。 • 举例： ?int(-3.4+1),int(-2.6),int(2.4),int(2.6) 结果：-3 -3 2 2
'结果：x1="opq" '结果：x2="计算机基" '结果：x3="st" '结果：x4="教程" '结果：x5="rs" '结果：x6="计算机" '结果：x7="基础教程"
'结果：x1="" '结果：x2="opqrst" '结果：x3="" '结果：x4="计算机基础教程"
⑵ Len函数பைடு நூலகம்
Dim x As String * 10 x="123" i=12 x1=len("12345") x2=len(12) x3=len(i) x4=len("考试中心") x5=len(x) ?x1,x3,x4,x5
11.3.1
顺序结构
顺序结构是在程序执行时，根据程序中语句的书写顺 序依次执行的语句序列。顺序结构语句的基本流程，如图 所示:
在程序中经常使用的顺序结构的语句有：赋值语句(=)、 输入、输出语句(Print)、注释语句（’或Rem）、终止程序 （End）等。 1. 赋值语句的格式： 变量名 = 值或表达式
r r
1


2
r
3
4. 5.
10 x 3 y xy
ab 1 1 cd c5 2
(10*x+(3*y)**(1/2))/(x*y) (a+b)/(1/(c+5)-(1/2)*c*d)
• 表示条件60≤X＜100的逻辑表达式是
X>=60 AND X<100 或 X<100 AND X>=60 或 !(X<60 OR X>=100)
2.程序注释 注释语句是以单引号（'）开头的语句行，或以单引 号（'）为后段语句的语句段落。 例如：x = 2>3 „将2、3的比较结果存入变量x 3.语句的构成：命令动词+命令操作对象 语句是由保留字及语句体构成的，而语句体又是由命令 短语和表达式构成的。保留字和命令短语中的关键字，是系 统规定的“专用”符号，必须严格地按系统要求来写；语句 体中的表达式，可由用户定义，用户要严格按“语法”规则 来写。 4.程序书写规则 在Visual BASIC系统中，通常每条语句占一行，一行最 多允许有255个字符；如果一行书写多个语句，语句之间用 冒号“：”隔开；如果某个语句一行写不完，可用连接符空 格和下划线“_”。
程序的1 – 4 行为声明语句，5 – 11 行执行语句 程序清单的编辑： •数据库窗口选择模块对象单击“新建”按钮打开程 序编辑器，以便输入清单。
•单击“插入”菜单插入过程
•单击“插入”菜单插入过程
•单击“插入”菜单插入过程 •输入过程名，假设proc1(proc1就是一个标识符)
•输入程序清单
• 已知直角坐标系中任意一点的坐标（x，y），表示其位于第 1或第3象限内。
x*y>0 或 (x>0 AND y>0) OR (x<0 AND y<0)
•
x、y之一小于z用逻辑表达式为：
x<z and y>=z or x>=z and y<z x<z or y<z 不太准确
• x、y都大于z用逻辑表达式为。
⑸ 符号函数：Sgn(<数值表达式>) • 功能： 1 ,x>0 Sgn(x)= 0 ,x=0 -1 ,x<0
2. 常用字符函数如下表：全部
?instr(“abcd”,”f”)
'结果：0
⑴ Left、Right、Mid函数
str1="opqrst" str2="计算机基础教程" x1=left(str1,3) x2=left(str2,4) x3=right(str1,2) x4=right(str2,2) x5=mid(str1,4,2) x6=mid(str2,1,3) x7=mid(str2,4) ?x1,x2,x3,x4,x5,x6,x7 x1=left(str1,0) x2=left(str1,8) x3=right(str2,0) x4=right(str2,10) ?x1,x2,x3,x4