单元2-VB语言基础教学课件2-11数学函数及转换函数.pptxVIP

VB程序设计数学函数及转换函数问题引入 可以将这样的数学公式表示成VB表达式吗？数学函数及转换函数列表框1 数学函数2 转换函数3 函数应用函数概述函数是一种特定的运算，在程序中经常使用。 Visual Basic提供了大量的内部函数，可以直接调用完成特定的功能。 按内部函数的功能和用途，可以分为：数学函数、字符串函数、日期时间函数、转换函数、随机函数、格式输出函数等。1数学函数 数学函数用于各种数学运算。包括三角函数、指数函数、平方根函数、对数函数、绝对值函数等。函 数 名说 明示 例结 果Abs(x)取绝对值Abs(–6.5)6.5Atn(x)反正切函数Atn(0)0Cos(x)余弦函数Cos(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)01数学函数【示例】 Sin(300) Sin(30*3.14159/180)Private Sub Command1_Click() Dim x As Single x = Sin(30 * 3.14159 / 180) Print xEnd Sub1数学函数【示例】 y=Sqr(5)Private Sub Command1_Click() Print Sqr(5)End Sub2转换函数 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)–432转换函数续表函 数 名说 明示 例结 果Lcase$(s)大写字母转换为小写字母Lcase$(ABC)abcOct[$](n)将十进制转换成八进制Oct$(100)144Str$(n)将数值转换为字符串Str$(123.45)123.45Ucase$(s)小写字母转换为大写字母Ucase$(abc)ABCVal(s)将数字字符串转换为数值Val(123AR)1232转换函数【示例】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 xEnd Sub如何计算的？2转换函数0.4999996 Sin(30 * 3.14159 / 180) Int(5.499996) → 5 Int(Sin(30 * 3.14159 / 180) * 10 + 0.5) Int(Sin(30 * 3.14159 / 180) * 10 + 0.5) / 105/10→ 0.52转换函数【示例】Val(“123asd”) 123123是数值Str(123) “123”“123”是字符串Ucase(“Visual”) “VISUAL”Lcase(“Visual”) “visual”3函数应用【应用】?写出半角三角函数的VB表达式。表达式(1-Cos(A*3.14159/180))/Sin(A*3.14159/180)将计算结果保留2位小数总 结 学会灵活运用各种函数。 函数是一种特定的运算，在程序中经常使用。知识在于积累