VB内建函数与应用

VB內建函數數值函數字串函數日期時間型態轉換一、數值函數共9個數值函數INT(X)：比輸入的數值還小的整數。(高斯函數)CINT(X)：4捨6入，5偶去FIX(X)：將數值的小數部份去除。(無條件捨去)SGN(X)：取符號值。ABS(X)：取絕對值。SQR(X)：取平方根。EXP(X)：計算ex值。(e=2.718282)LOG(X)：計算以logeX

之值RND：產生亂數值，數值介於0與1之間。1、INT(X)

INT：Integer，即「整數」之意

比輸入的數值還小的整數。(高斯函數)

例：(1)INT(3.6)=3(2)INT(-3.6)=-4(3)INT(-99.2)=-100(4)INT(-85.6)=-86(5)INT(18.5)=182、CINT(X)

4捨6入。小數為5，整數偶數時捨去，奇數進位。

口訣：4捨6入，5偶去例：(1)CINT(3.6)=4(2)CINT(-3.6)=-4(3)CINT(4.5)=4(4)CINT(5.5)=6(5)CINT(-1.9)=-23、FIX(X)：

將數值的小數部份去除。(無條件捨去)例：(1)FIX(3.6)=3(2)FIX(-3.6)=-3(3)FIX(10.8)=10(4)FIX(99.8)=99(5)FIX(5.001)=54、SGN(X)：

sign，即「符號」之意

取符號值。數值為正數為1，負數為-1，零為0。

例：(1)SGN(3)=1(2)SGN(-8)=-1(3)SGN(0)=0(4)SGN(15)=1(5)SGN(-3)=-15、ABS(X)：

ABS：abslolutevalue，「絕對值」之意

取絕對值。將數值變成正數。

例：(1)ABS(3.6)=3.6(2)ABS(-12)=12(3)ABS(12.56)=12.56(4)ABS(-12.33)=12.33(5)ABS(-6.16)=6.166、SQR(X)：

SQR：square，意即「平方」之意

取平方根。例：(1)SQR(16)=4(2)SQR(100)=10(3)SQR(25)=5(4)SQR(0)=0(5)SQR(-100)=會印出不正確的函數呼叫小小測驗，答對鼓鼓掌1、INT(6.5)=2、CINT(-5.5)=3、FIX(88.8)=4、SGN(-6.1)=5、ABS(-101)=6、SQR(81)=6-688-110197、EXP(X)：

EXP：exponent，意即「指數」之意

計算ex

值。(e=2.718282)

例：(1)EXP(1)=e1=2.718282(2)EXP(0)=e0=1(3)EXP(2)=e2=7.3890568、LOG(X)：

LOG：logarithm，意即「對數」之意。

計算以

logeX

之值。

例：LOG函數與EXP函數互為反函數所以EXP(LOG(X))=X

LOG(EXP(X))=X(e=2.718282)(1)LOG(1)=loge1

=0(3)EXP(LOG(5))=5(4)LOG(EXP(7))=7(2)LOG(-1)=印出不正確的函數呼叫9、RND：

產生亂數值，數值介於0與1之間。(1)會產生一個亂數值，0<=RND<1

PRINTRND結果.143502.5962511.23112這是不可能的啦！例：FORI=1TO3PRINTRNDNEXTIPRINTFORI=1TO3PRINTRNDNEXTI迴圈Ｉ從1到3印出亂數值下一個I結果.143502.348721.298700印出空白行迴圈Ｉ從1到3印出亂數值下一個Ｉ.783214.543211.111003INT()9、RND：

產生亂數值，數值介於0與1之間。(2)如何產生A~B之間的隨機整數值？公式：(B-A+1)RND*+A例1：要產生1~6之間的隨機整數，其公式為？

INT(RND*(6-1+1)+1)INT(RND*(6-1+1))+1或INT(RND*(B-A+1))+A亂數公式：例：欲產生5~10的隨機整數,其公式為？

INT(RND*(6)+5)INT(RND*(6))+5(B-A+1)RND*+AINT()或INT(RND*(B-A+1))+AINT()例2：INT(RND*15)+2產生的亂數範圍？

B-A+1=15

A=2

所以

B=16A=2

亂數公式：(B-A+1)RND*+A或INT(RND*(B-A+1))+A例3、產生3個1~6之間的隨機整數INT()亂數公式：(B-A+1)RND*+A或INT(RND*(B-A+1))+AFORI=1TO3NEXTIPRINTINT(RND*6)+1，結果：26310、RANDOMIZE[N]N為種子數，範圍：-32768~32767不同的種子數，會產生不同組的亂數亂數變化更大的方式：

RANDOMIZETIMER

利用電腦時間，因為數值一直在變，所以亂數變化會更大例：RANDOMIZETIMERFORI=1TO5PRINTINT(RND*12)+1NEXTI結果：651134內建函數應用(一)Dima,bAsIntegerDimcAsDouble

PrivateSub計算_Click()a=Val(Text1.Text)b=Val(Text2.Text)c=(a^2+b^2)^0.5Label3.Caption="直角三角