VB程序设计(第2版)教学课件2-11-数学函数及转换函数

1、VB程序设计数学函数及转换函数问题引入 可以将这样的数学公式表示成VB表达式吗？列表框 数学函数1 转换函数2 函数应用3数学函数及转换函数函数概述函数是一种特定的运算，在程序中经常使用。 Visual Basic提供了大量的内部函数，可以直接调用完成特定的功能。 按内部函数的功能和用途，可以分为：数学函数、字符串函数、日期时间函数、转换函数、随机函数、格式输出函数等。数学函数1 数学函数用于各种数学运算。包括三角函数、指数函数、平方根函数、对数函数、绝对值函数等。函 数 名说 明示 例结 果Abs(x)取绝对值Abs(6.5)6.5Atn(x)反正切函数Atn(0)0Cos(x)余弦函数Co

2、s(0)1Exp(x)以e为底的指数函数，即exExp(3)20.086Log(x)以e为底的自然对数Log(10)2.3Sin(x)正弦函数Sin(0)0Sgn(x)符号函数Sgn(3.5)1Sqr(x)平方根Sqr(16)4Tan(x)正切函数Tan(0)0数学函数1 Sin(300)【示例】 Sin(30*3.14159/180)Private Sub Command1_Click() Dim x As Single x = Sin(30 * 3.14159 / 180) Print xEnd Sub数学函数1【示例】 y=Sqr(5)Private Sub Command1_Click

3、() Print Sqr(5)End Sub转换函数2 Visual Basic中，一些数据类型可以自动转换，如：数字字符串可自动转换为数值型，但多数类型不能自动转换，就需用类型转换函数来实现。常用的转换函数如下表所示。函 数 名说 明示 例结 果Asc(c)将字符转换成ASCII码值Asc(A)65Chr$(n)将ASCII码值转换成对应的字符Chr$(65)AFix(n)截取取整Fix(3.5)3Hex$(n)将十进制转换成十六进制Hex(100)64Int(n)正数取整同Fix，负数取不大于N的最大整数Int(3.5)Int(3.5)43转换函数2函 数 名说 明示 例结 果Lcase$

4、(s)大写字母转换为小写字母Lcase$(ABC)abcOct$(n)将十进制转换成八进制Oct$(100)144Str$(n)将数值转换为字符串Str$(123.45)123.45Ucase$(s)小写字母转换为大写字母Ucase$(abc)ABCVal(s)将数字字符串转换为数值Val(123AR)123续表转换函数2【示例】Int(15.5) 15 如何将Sin(300)的结果输出为0.5？Private Sub Command1_Click() Dim x As Single x = Int(Sin(30 * 3.14159 / 180) * 10 + 0.5) / 10 Print

5、xEnd Sub如何计算的？真实输出转换函数2Sin(30 * 3.14159 / 180) Int(Sin(30 * 3.14159 / 180) * 10 + 0.5) Int(Sin(30 * 3.14159 / 180) * 10 + 0.5) / 100.4999996 Int(5.499996) 55/10 0.5转换函数2Val(“123asd”) 【示例】123Str(123) “123”123是数值“123”是字符串“visual” “VISUAL”Ucase(“Visual”) Lcase(“Visual”) 函数应用3写出半角三角函数的VB表达式。【应用】表达式(1-Cos(A*3.141