Oct 14, 2008
Operator
Bilangan
Operator
|
Gunanya
|
Format
|
Contoh
|
^
|
Pangkat
|
x ^ y
|
3 ^ 2 =9
|
-
|
Negatif
|
- y
|
- 9
|
*
|
Perkalian
|
x * y
|
3 * 2 = 6
|
/
|
Pembagi real
|
x / y
|
5 /2 = 2.5
|
\
|
Pembagi Integer
|
x \ y
|
5 / 2 = 2
|
mod
|
Modulo (sisa pembagian)
|
x mod y
|
5 mod 2 = 1
|
+
|
Tambah
|
x +y
|
2 + 4 = 6
|
-
|
Kurang
|
x - y
|
4 -2 = 2
|
Fungsi Matematik Internal
VB menyediakan fungsi matematika siap pakai untuk manipulasi variabel.
Fungsi
|
Contoh
|
Penjelasan
|
Abs(x)
|
a =
abs(-32) 'a=32
|
nilai
absolut x
|
Atn(x)
|
Nilai
arcus tangent x
|
x dalam
radian : degree = radian * 180/phi
|
Cos(x)
|
Nilai
cosinus x
|
x dalam
radian
|
Exp(x)
|
Nilai
exponensial x
|
|
Fix(x)
|
fix(3.2) =
3
fix(-3.2)
= -3
|
mencari
integer bilangan pecah, untuk bilangan negatif; mencari bilangan pertama >
x
|
Int(x)
|
int(5.4) =
5
int(-5.4)
=-6
|
Bilangan
negatif; mencari bilangan pertama <=x
|
Log(x)
|
nilai
natural log x
|
|
Rnd(x)
|
0 <=
hasil random <1
nilai x
menentukan hasil random
|
sebelumnya
gunakan perintah Randomize untuk memastikan bahwa hasil Rnd(x) selalu beda
|
Sgn(x)
|
menghasilkan
:
1 bila x
> 0
0 bila x =
0
-1 bilaa x
< 0
|
|
Sin(x)
|
A =
SQR(16) 'A=4
A =
SQR(-16) 'error
|
nilai
cosinus x dalam radian
|
Sqr(x)
|
Akar
bilangan x
|
|
Tan(x)
|
Q =
Tan(45*phi/180) 'Q=1
|
nilai
tangent x dalam radian
phi=3.141592653589732
|
Derifat Fungsi Matematika
Fungsi matematika yang tidak ada dapat diderifasi dari fungsi yang tersedia.
Fungsi
|
Derifat
Sepadan
|
Secant
|
Sec(X) = 1
/ Cox(X)
|
Cosecant
|
Cosec(X) =
1 / Sin(X)
|
Cotangent
|
Cotan(X) =
1 / Tan(X)
|
Inverse Sinus
|
Arcsin(X)
= Atn(X / Sqr(-X * X +1))
|
Inverse
Cosinus
|
Arcos(X) =
Atn( -X / Sqr(-X * X +1)) + 2 * Atn(1)
|
Inverse
Secant
|
Arsec(X) =
2 * Atn(1) - Atn(Sgn(X) / Sqr(X * X -1))
|
Inverse
Cosecant
|
Arccosec(X)
= Atn(Sgn(X) / Sqr(X * X -1))
|
Inverse
Cotangen
|
Arccotan(X)
= 2 * Atn(1) - Atn(X)
|
Hyperbolic
Sinus
|
HSin(X) =
(Exp(X) - Exp(-X)) / 2
|
Hyperbolic
Cosinus
|
HCos(X) =
(Exp(X) + Exp(-X)) / 2
|
Hyperbolic
Tangent
|
HTan(X) =
(Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
|
Hyperbolic
Secant
|
HSec(X) =
2 / (Exp(X) + Exp(-X))
|
Hyperbolic
Cosecant
|
HCosec(X)
= 2 / (Exp(X) - Exp(-X))
|
Hyperbolic
Cotangent
|
HCotan(X)
= (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))
|
Inverse
Hyperbolic Sinus
|
HArcsin(X)
= Log(X + Sqr(X * X + 1)
|
Inverse
Hyperbolic Cosinus
|
HArccos(X)
= Log(X + Sqr(X * X - 1)
|
Inverse
Hyperbolic Tangent
|
HArctan(X)
= Log(1 + X) / (1 - X)) / 2
|
Inverse
Hyperbolic Secant
|
HArcsec(X)
= Log((Sqr(-X * X +1) + 1) / X)
|
Inverse
Hyperbolic Cosecant
|
HArccosec(X)
= Log(Sgn(X) * Sqr(X * X +1) + 1) / X)
|
Inverse
Hyperbolic Cotangent
|
HArcotan(X)
= Log((X + 1) / (X - 1)) / 2
|
Logaritgm
ti base N
|
LogN(X) =
Log(X) / Log(N)
|
Fungsi Manipulasi Bilangan
VB mempunyai fungsi untuk memanipulasi data numerik sebagai berikut :
Round : membulatkan bilangan cacah dengan jumlah desimal tertentu
MyValue = Round(33.4549, 2) ‘hasil 33.45
MyValue = Round(33.455, 2) ‘hasil 33.46
MyValue = Round(33.456, 2) ‘hasil 33.46
Val : menghasilkan bilangan numerik dari suatu variabel string
MyValue = Val(“2457”) ‘hasil 2457
MyValue = Val(“2 4 5 7”) ‘hasil 2457
MyValue = Val(“24 and 57”) ‘hasil 24
Str : menghasilkan variabel string (Variant) dari ekspresi numerik
MyString = Str (459) ‘hasil “459”
MyString = Str (-459.65) ‘hasil “-459.65”
MyString = Str (459.001) ‘hasil “459.001”
Hex : menghasilkan nilai hexadesimal dari suatu bilangan
MyHex = Hex(5) ‘hasil 5
MyHex = Hex(10) ‘hasil A
MyHex = Hex(459) ‘hasil 1CB
Oct : menghasilkan nilai octal dari setiap bilangan
MyOct = Oct(4) ‘hasil 4
MyOct = Oct(8) ‘hasil 10
MyOct = Oct(459) ‘hasil 713
posted by :
ade
ThankQ..
BalasHapusMAkasih Banyak atas infox.. Boleh belajar VB dr kamu donk niee...
Yepz .. sama-sama...
BalasHapushehee .. aku boleh terlalu bisa kok tentang vb jadi blom bisa membantu kamu..
hehehe