Access中VB程序基础.docVIP

Access中的VB程序设计 其实考的都比较简单，因为是Access，重点不在VB，你主要的是看看简单的VB语法知识，还有一些常用的函数，因为这是专门解决计算的。有什么示例可以找我探讨，我先给你一些常用函数，用与解决解答中的计算问题，你可一多练习一下，最好下载VB6.0实战下，效果很好： 计算机等级考试二级VB常用函数解析 （一）类型转换类函数 1. CType(X) [格式]： P=CBool(X) 将X转换为“布尔”（Boolean）类型 P=CByte(X) 将X转换为“字节”（Byte）类型 P=CCur(X) 将X转换为“金额”（Currency）类型 P=CDate(X) 将X转换为“日期”（Date）类型 P=CDbl(X) 将X转换为“双精度”（Double）类型 P=CInt(X) 将X转换为“整型”（Integer）类型 P=CLng(X) 将X转换为“长整型”（Long）类型 P=CSng(X) 将X转换为“单精度”（Single）类型 P=CStr(X) 将X转换为“字符串”（String）类型 P=Cvar(X) 将X转换为“变体型”（Variant）类型 P=CVErr(X) 将X转换为Error值 [ 范例 ]： (1). CStr(13)+CStr(23) 数值转换成字符串后，用+号连接， 结果：1323 (2). CInt(12)+12 字符串转换成整型后与12相加， 结果：24 (3). P=CInt(True) 输出结果为-1 布尔值与数值的转换时要注意，布尔值只有True和False，其中True在内存中为-1,False存为0 (4). CBool(-0.001) 输出结果为True 将数值转换为布尔型时，等于0的数值将得到False，不等于0的数值得到True. 2. Int(X),Fix(X)：取X的整数值 [格式]： P=Int(X) 取=X的最大整数值 P=Fix(X) 取X的整数部分，直接去掉小数 [范例]： (1) Int(-54.6) 结果为-55，取=-54.6的最大整数 (2) Fix(54.6) 结果为54，取整数并直接去掉小数 （二）常用数学函数 [格式]： 1. Abs(N) 取绝对值 例：Abs(-3.5) 结果：3.5 2. Cos(N) 余弦函数 例：Cos(0) 结果：1 3. Exp(N) e为底的指数函数 例：Exp(3) 结果：20.068 4. Log(N) 以e为底的自然对数 例：Log(10) 结果：2.3 5. Rnd[(N)] 产生随机数 例：Rnd 结果：0--1之间的数 6. Sin(N) 正弦函数 例：Sin(0) 结果：0 7. Sgn(N) 符号函数 说明：取正负号。Y=Sgn(X) 既 X0 则Y=1；X=0 则Y=0；X0 则Y= -1 8. Sqr(N) 平方根 例：Sqr(9) 结果：3 9. Tan(N) 正切函数 例：Tan(0) 结果：0 10.Atn(N) 反切函数 例：Atn(0) 结果：0 [注意]：在三角函数中，以弧度表示。 (一)字符串类函数： 1. ASC(X)，Chr(X)：转换字符字符码 [格式]： P=Asc(X) 返回字符串X的第一个字符的字符码 P=Chr(X) 返回字符码等于X的字符 [范例]： (1)P=Chr(65) ‘ 输出字符A,因为A的ASCII码等于65 (2)P=Asc(“A”) ‘ 输出65 2. Len(X)： 计算字符串X的长度 [格式]： P=Len(X) [说明]： 空字符串长度为0，空格符也算一个字符，一个中文字虽然占用2 Bytes，但也算一个字符。 [范例]： (1) 令X=”” (空字符串) Len(X) 输出结果为0 (2) 令X=”abcd” Len(X) 输出结果为4 (3) 令X=”VB教程” Len(X) 输出结果为4 3. Mid(X)函数：读取字符串X中间的字符 [格式]： P=Mid(X,n) 由X的第n个字符读起，读取后面的所有字符。 P=Mid(X,n,m) 由X的第n个字符读起，读取后面的m个字符。 [范例]： (1) X=”abcdefg” P=Mid(X,5) 结果为：P=”efg” (2) X=”abcdefg” P=Mid(X,2,4) 结果为P=”bcde” 4. Replace: 将字符串中的某些特定字符串替换为其他字符串 [格式]： P=Replace(X,S,R) [说明]：将字符串X中的字符串S替换为字符串R，然后返回。 [范例]： X=”VB is very good” P=Rep