Fungsi-Fungsi Angka VB

Mas rizki-Berikut ini adalah fungsi-fungsi yang sering digunakan untuk mengolah data bertipe angka (integer, long, double, dll). Sebelumnya khusus untuk VB .NET, ketikkan kode berikut dibagian paling atas dari jendela kode dari Form.

• Abs(n), digunakan untuk mencari nilai absolut dari n. Contoh :
  a = Abs(5) , nilai a adalah 5
  a = Abs(-5) , nilai a adalah 5


• CInt(n) dan Int(n), digunakan untuk mengubah nilai n menjadi nilai bertipe integer / bulat. Perbedaannya adalah jika CInt bila desimalnya bernilai lebih besar dari 0,5 , maka nilai akan dibulatkan 1 ke atas. Sedangkan Int tidak. Contoh :
  a = CInt(3.4) , nilai a adalah 3
  a = CInt(3.6) , nilai a adalah 4
  a = Int(3.4) , nilai a adalah 3
  a = Int(3.6) , nilai a adalah 3


• CDbl(n) dan Val(n), digunakan untuk menkonversi nilai n yang bertipe string ke nilai bertipe double / angka. Perbedaannya adalah jika Val nilai n harus berformat Inggris (karakter desimal adalah tanda titik), sehingga muncul permasalahan jika settingan komputer menggunakan format Indonesia (karakter desimal adalah tanda koma) yang akan menghasilkan nilai berbeda. Sedangkan bila CDbl mampu menyesuaikan nilai sesuai dengan setting format komputer.
  Berikut contoh yang diterapkan di komputer dengan setting format Indonesia.
  a = Val("2,5") , nilai a adalah 2
  a = CDbl("2,5") , nilai a adalah 2,5


• Randomize dan Rnd() * n, kedua fungsi ini sering dikombinasikan untuk mencari angka acak antara 0 sampai dengan n. Contoh :
  
  Randomize
  a = Rnd() * 4
  nilai a bisa bernilai antara 0 sampai dengan 4
  
  Namun jika Anda ingin angka bertipe bulat saja, berikut contohnya :
  
  Randomize
  a = CInt(Rnd() * 4)
  
  Dan jika Anda menginginkan acak dalam tipe boolean (True atau False),
  berikut contohnya :
  
  Randomize
  a = CBool(CInt(Rnd() * 1))
  nilai a bisa bernilai True atau False


• Log(n), digunakan untuk mencari nilai logaritma natural dari n. Contoh :
  a = Log(5) , nilai a adalah 1,60943791243
  Jika Anda ingin mencari nilai logaritma standar dari n gunakan fungsi berikut :
  VB 6.0 a = Log(n) / Log(10)
  VB .NET a = Log10(n)


• Exp(n), merupakan fungsi kebalikan dari Log(n). Contoh :
  a = Exp(1,60943791243) , nilai a adalah 5


• Round(n, x), digunakan untuk menyesuaikan jumlah angka desimal dari n sebanyak x. Contoh :
  a = Round(5.3784, 2) , nilai a adalah 5,38


• Sgn(n), digunakan untuk mencari tanda angka dari n. Fungsi ini menghasilkan nilai 1 jika n adalah positif, nilai -1 jika n adalah negatif, dan nilai 0 jika n adalah nol. Contoh:
  VB 6.0 a = Sgn(-9)
  VB .NET a = Sign(-9)
  nilai a adalah -1


• Sqr(n), digunakan untuk mencari akar kuadrat dari n. Contoh :
  VB 6.0 a = Sqr(9)
  VB .NET a = Sqrt(9)
  nilai a adalah 3


• Sin, Cos, Tan
  VB 6.0

  Nama	Fungsi
  Sin	a = Sin(n * Angle)
  Cosin	a = Cos(n * Angle)
  Tangen	a = Tan(n * Angle)
  Inv. Sin	a = Atn(n / Sqr(-n * n + 1)) / Angle
  Inv. Cosin	a = (Atn(-n / Sqr(-n * n + 1)) + 2 * Atn(1)) / Angle
  Inv. Tangen	a = Atn(n) / Angle
  Sin Hyp.	a = (Exp(n) - Exp(-n)) / 2
  Cosin Hyp.	a = (Exp(n) + Exp(-n)) / 2
  Tangen Hyp.	a = (Exp(n) - Exp(-n)) / (Exp(n) + Exp(-n))
  Inv. Sin Hyp.	a = Log(n + Sqr(n * n + 1))
  Inv. Cosin Hyp.	a = Log(n + Sqr(n * n - 1))
  Inv. Tangen Hyp.	a = Log((1 + n) / (1 - n)) / 2

  
  VB NET

  Nama	Fungsi
  Sin	a = Sin(n * Angle)
  Cosin	a = Cos(n * Angle)
  Tangen	a = Tan(n * Angle)
  Inv. Sin	a = Asin(n) / Angle
  Inv. Cosin	a = Acos(n) / Angle
  Inv. Tangen	a = Atan(n) / Angle
  Sin Hyp.	a = Sinh(n)
  Cosin Hyp.	a = Cosh(n)
  Tangen Hyp.	a = Tanh(n)
  Inv. Sin Hyp.	a = Log(n + Sqrt(n * n + 1))
  Inv. Cosin Hyp.	a = Log(n + Sqrt(n * n - 1))
  Inv. Tangen Hyp.	a = Log((1 + n) / (1 - n)) / 2

  
  Dalam beberpa fungsi diatas terdapat variabel dengan nama Angel, yang bisa digantikan dengan nilai berikut :
  Degress (DEG), gantikan dengan (3.14159265358979 / 180)
  Radians (RAD), gantikan dengan 1
  Grads (GRAD), gantikan dengan (3.14159265358979 / 200)
  Contoh menghitung Sin dari 5 dengan ukuran DEG :
  a = Sin(5 * (3.14159265358979 / 180))