常用函数的应用举.pptVIP

常用函数的应用 （1）求平方根函数Sqr。格式：Sqr(x) 对x开平方根。X=0 （2）取整函数Int。格式：Int(x) 求不大于x的最大整数。Int不进行四舍五入。如：Print Int(-3.4), Int(3.8), 显示：-4 3 （3）取整函数Fix。格式：Fix(x) 求x的整数部分。Fix也不进行四舍五入。如：Print Fix(-3.4), Fix(3.8) , 显示：-3 3 （4）四舍五入函数Round。 格式：Round(x1 [,x2]) 省略x2(=0)时表示四舍五入取整。它将x1四舍五入保留小数x2位。如：Print Round(12.455, 2), Round(-12.57), Round(12.34, 1)显示： 12.46 -13 12.3 常用函数的应用 （5）绝对值函数Abs。格式：Abs(x) 该函数求出x的绝对值。如：Abs(-25)的值为：25。 （6）正弦函数Sin。格式：Sin(x) 该函数用于求x的正弦值。参数一律采用弧度。如sin90°的VB函数表达式应为sin(3.1415926*90/180) 即 Sin(3.1415926/2)。 （7）转换函数Val()。格式：Val(x$) 将参数对应的字符串值中的最前部的数字字符转换为数值。如： Print Val(“ 12.3abc”), Val(“-12.367.8abc”), Val(“abc123”) 显示：12.3 -12.367 0 常用函数的应用 （9）颜色函数QBColor。格式：QBColor(x) 根据x的值产生一种颜色，其中0 ≤x ≤ 15 QBColor(0)为黑色，QBColor(15)为白色。例如：Form1.BackColor = QBColor(12) （10）颜色函数RGB。格式：RGB(x1,x2,x3) 该函数将根据x1、x2和x3的值产生一种颜色。 各参数范围一般应为0~255。可表示224种颜色。 x1表示红色成分 x2表示绿色成分 x3表示蓝色成分。 部分颜色可用颜色常量或颜色值(3个字节)，如： vbBlack H0 黑 Form1.BackColor = RGB(255, 0, 0) Form1.ForeColor = RGB(255, 255, 0) 常用函数的应用 11.LoadPicture()函数被用来为控件的Picture属性加载图片 例如：要想在程序运行时，加载给窗体的Picture属性。应在窗体的Load事件过程中，添加如下代码： Form1.Picture=LoadPicture(“路径+图片”) 例：Form1.Picture=LoadPicture(app.path+”\图片名”）（表示图片和应用程序在同一个文件夹中） Form1.Picture=LoadPicture(“图片所在的路径\图片名”）（图片在任意的文件夹中） 12.IsNumeric() 该函数被用来判断一个表达式是否是数字。其返回值是Boolean（布尔）型。 例如： IsNumeric(“123.34”)返回值是True，IsNumeric(“AER”)返回值是False。 表达式书写举例 应用举例 例1、 把 “x是5或7的倍数” 写成VB表达式为： x Mod 5=0 or x Mod 7=0 例2、把 “10≤x20” 写成VB表达式为： x=10 And x20 例3、年份N符合下面条件之一既为润年。⑴　能被4整除，但不能被 100整除，⑵　能被4整除又能被400整除。 N为润年的VB表达式为： ( N Mod 4=0 And N Mod 1000 ) or( N Mod 4=0 And N Mod 400=0 ) 例4、将任意一个两位数X的个位与十位对换的VB表达式为： 用 x Mod 10 便可算出 x 的个位上的数字。用 x \ 10 便可算出 x 的十位上的数字。故转换后的数是：(X MOD 10)*10+X\10 练习：1、计算表达式 16/4-2^5*8/4 Mod 5\2 = ( ) 2、当x=2时，计算 (x+12 Or int(-3.5)-3 ) And 3x^2-3 3、取出一个三位整数x的十位上的数字（例如：324十位上的数字是2）的VB表达式是 (x mod