资源描述:
《VB常用内部函数.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、第五章常用内部函数1、函数分为内部函数和用户自定义函数。2、VB常用的内部函数有:数学函数、字符串函数、转换函数、日期与时间函数和其他函数。3、函数的一般调用格式为:函数名([参数表])参数表是可选项,若没有参数,称无参函数,但圆括号一般不能省,各参数之间用逗号隔开。4、函数一般不能单独作为一个语句,要调用函数,一般使用时是将函数值的输出赋给某个变量。函数调用时要注意参数值及数据类型、函数值及数据类型。5.1常用函数5.1.1数学函数(参看表5-1,函数参数N表示数值型)函数名函数值类型功能示例返回值Sin(N)Double返回N的正弦值Sin(30*3.14/180)0
2、.5Cos(N)Double返回N的余弦值Cos(0)1Abs(N)与N相同返回N的绝对值Abs(-4*4)16Sqr(N)Double返回N的平方根Sqr(3)1.73205080Exp(N)Double返回eN的指数值Exp(1)2.71828182Hex(N)String返回N的16进制Hex(123)7BInt(N)Double返回不大于N的最大整数Int(5.78)Int(-5.78)5-6CInt(N)Double四舍五入取整CInt(5.78)CInt(-5.78)6-6Fix(N)Double去掉小数点取整Fix(5.78)Fix(-5.78)5-5例5-
3、1:设计输入一个年号,查看该年的元旦是星期几的程序。分析:确定某年的元旦是星期几可由以下公式得出:K=F-Int(F/7)×7,其中F=(Y-1)(1+1/4-1/100+1/400)+1Y为某年的年号,K=0是星期日,K=1是星期一,依次类推.例5-2:求方程ax2+bx+c=0的解,其中系数a,b,c由用户输入.分析:求一元二次方程的根可以利用公式x=(-b±Sqr(b2-4ac))/2a设disc=b2-4acpart1=-b/2apart=sqr(b2-4ac)/2a,分别考虑disc>0,disc=0,disc<0三种情况下的根.5.1.2字符串函数1.常用字符
4、串函数(参看表5-2S表示字符型变量,N表示数值型变量)函数名函数值类型功能示例返回值Trim(S)String去掉S左右两边空格字符Trim(“人”)“人”LTrim(S)String去掉S左边空格字符LTrim(“人”)“人”RTrim(S)String去掉S右边空格字符RTrim(“人”)“人”Left(S,N)String从S左边截取N个字符Left(“Hello”,2)“He”Rigth(S,N)String从S右边截取N个字符Rigth(“Hello”,2)“lo”Mid(S,N1[,N2])String从S中第N1个字符开始截取N2个字符Mid(“Compu
5、ter”,4,3)Mid(“Computer”,4)“put”“puter”Len(S)Integer测试S的字符个数Len(“中国-China”)8Space(N)String产生N个空格字符“中”+Space(2)+”国”“中国”Ucase(S)String将S的小写字母改为大写Ucase(“Visual”)“VISUAL”Lcase(S)String将S的大写字母改为小写Lcase(“Visual”)“visual”String(N,S)String重复输出N个S字符String(5,”*”)“*****”2.字符串的编码方案(1)ANSI方式:一个西文字符占用1个
6、字节,一个汉字占用2个字节。(2)UniCode方式(VB4.0以后):西文字符和汉字统一进行编码,一个英文字符和一个汉字都看作一个字符,均占用2个字节。例如:PrivateSubFrom_Click()DimsAsStrings=“Vbasic程序设计”Printlen(s)‘输出10PrintlenB(s)‘输出20PrintLeft(s,8)‘输出“Vbasic程序”PrintLeftB(s,8)‘输出“Vbas”EndSub例5-3不用StrReverse函数,编程将输入的字符串反向输出。(1)界面设计:添加两个标签,两个文本框,其中Text1是输入框,Text2
7、是输出框,一个命令按钮。(2)分析:利用循环和Mid函数,依次取出输入到字符框中的字符,然后将每次取到的字符连接即可.(注意:先取到的字符被连接到后面)5.1.3转换函数转换函数用于数据类型或数据形式的转换.(参看表5-3)函数名函数值类型功能示例返回值Asc(S)Integer给出S首字符的ASCII码值Asc(“ASDC”)65Chr(N)String给出ASCII码值是N的字符Chr(97)“a”Str(N)String将数字N转换为字符型Str(-234)“-234”Val(S)Double将数字字符串转换为数字Val