Log Function

์ˆซ์ž์˜ ์ž์—ฐ ๋กœ๊ทธ๋ฅผ ๊ตฌํ•ฉ๋‹ˆ๋‹ค.

๊ตฌ๋ฌธ:

Log (Number)

๋ฐ˜ํ™˜ ๊ฐ’:

Double

๋งค๊ฐœ ๋ณ€์ˆ˜:

Number: ์ž์—ฐ ๋กœ๊ทธ๋ฅผ ๊ณ„์‚ฐํ•  ์ž„์˜์˜ ์ˆซ์ž ์‹์ž…๋‹ˆ๋‹ค.

์ž์—ฐ ๋กœ๊ทธ๋Š” ๋ฐ‘์ˆ˜ e์˜ ๋กœ๊ทธ์ž…๋‹ˆ๋‹ค. ๋ฐ‘์ˆ˜ e๋Š” ๋Œ€๋žต์ ์ธ ๊ฐ’์ด 2.718282...์ธ ์ƒ์ˆ˜์ž…๋‹ˆ๋‹ค.

๋‹ค์Œ๊ณผ ๊ฐ™์ด ์ž„์˜์˜ ์ˆซ์ž(x)์˜ ์ž์—ฐ ๋กœ๊ทธ๋ฅผ ์ž„์˜์˜ ๋ฐ‘์ˆ˜(n)์˜ ์ž์—ฐ ๋กœ๊ทธ๋กœ ๋‚˜๋ˆ„์–ด x์— ๋Œ€ํ•œ n์˜ ๋กœ๊ทธ๋ฅผ ๊ณ„์‚ฐํ•  ์ˆ˜ ์žˆ์Šต๋‹ˆ๋‹ค.

Log n(x) = Log(x) / Log(n)

Error codes:

5 ์ž˜๋ชป๋œ ํ”„๋กœ์‹œ์ € ํ˜ธ์ถœ์ž…๋‹ˆ๋‹ค.

์˜ˆ:

Sub ExampleLogExp

Dim a As Double

Dim Const b1=12.345e12

Dim Const b2=1.345e34

    a=Exp( Log(b1)+Log(b2) )

    MsgBox "" & a & chr(13) & (b1*b2) ,0,"Multiplication by logarithm function"

End Sub