4 Januari 2012

Operasi Matematika pada VB


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

2 komentar:

  1. ThankQ..

    MAkasih Banyak atas infox.. Boleh belajar VB dr kamu donk niee...

    BalasHapus
  2. Yepz .. sama-sama...
    hehee .. aku boleh terlalu bisa kok tentang vb jadi blom bisa membantu kamu..
    hehehe

    BalasHapus