Sub Fungsi
Fungsi –
Fungsi Bawaan VB.Net
1. Fungsi Numerik à Fungsi Pembulatan Angka
-
Cint() à Pembulatan nilai desimal sebesar 0,5dan lebih ke
nilai integer terdekat
contoh : Cint(99,2) à menghasilkan 99
-
Fix() à pemotongan suatu nilai desimal menjadi integer
contoh : Fix(99,8) à menghasilkan 99
-
Int() à pembulatan kebawah pada suatu nilai desimal
contoh : Int(99,8) à menghasilkan 99
2. Fungsi Matematika à Fungsi-fungsi
yang berkaitan dengan tujuan matematis terdapat dalam class math, Oleh sebab
itu, pemanggilan terhadap fungsi-fungsi ini harus didahului oleh prefiks
(awalan) Math
-
Math.Abs() à mengembalikan nilai absolut dari suatu argumen
contoh : dim angka as double=Math.Abs(-50.3)
-
Math.Atan() à mengembalikan nilai arc tangen dari suatu argumen
dalam bentuk radian, nilai tersebit bertipe double
contoh : dim hitung as double=Math.Atan(30)
-
Math.Cos() à mengembalikan nilai cosinus dari suatu sudut, nilai
yang dikembalikan bertipe double
contoh : dim hitung as double=Math.Cos(30)
-
Math.Exp() à mengembalikan nilai exponensial dari suatu argumen,
nilai yang dikembalikan bertipe double
contoh : dim hitung as double=Math.Exp(1.9)
-
Math.Log à mengembalikan nilai logaritma dari suatu argumen,
nilai yang dikembalikan bertipe double
contoh : dim hitung as double=Math.Log(8,2)
-
Math.Pow() à mengembalikan nilai perpangkatan dari suatu argumen,
nilai yang dikembalikan bertipe double
contoh : dim hitung as double=Math.Pow(4,3)
3. Fungsi String à Fungsi yang
digunakan dalam operasi String
-
LCase() dan UCase à LCase akan
mengembalikan suatu string dalam
tipe huruf kecil
(lowercase), sedangkan Ucase akan mengembalikan suatu
string dalam tipe huruf besar (uppercase)
Contoh : Dim awal As String ="Saya Belajar"
Dim akhir As String
‘mengembalikan "ikut kuliah alpro"
akhir = LCase(awal)
‘mengembalikan "IKUT KULIAH ALPRO"
akhir = Ucase(awal)
-
Left(), Mid(),Right() à Ketiga fungsi
ini mengembalikan substring dengan jumlah
karakter yang telah
ditentukan dari suatu argument, Pengambilan karakter ini dimulai dari sisi paling kiri (Left),
dari sisi paling kanan (Right), atau dari urutan tertentu.
Contoh : Dim awal As String = “Hai Dunia!”
‘mengembalikan "Hai"
Left(awal, 3)
‘mengembalikan "Dunia!"
Right(awal, 6)
‘mengembalikan "Dun"
Mid(awal, 6, 8)
-
Len() à Mengembalikan suatu
nilai integer yang merupakan panjang string
Contoh : Dim awal As String = "Hai, Dunia!"
‘mengembalikan 11
Dim hasil As Integer = Len(awal)
-
Ltrim(), Rtrim(), Trim() à Mengembalikan
suatu string tanpa menyertakan spasi
yang terletak sebelumnya
(LTrim), spasi yang terletak
setelahnya (RTrim), atau spasi
yang terletak sebelum dan setelahnya (Trim)
Contoh : Dim awal As String = "
<-alpro-> "
Dim hasil As String
'mengembalikan "<-alpro->
".
hasil = LTrim(awal)
'mengembalikan "
<-alpro->".
hasil = RTrim(awal)
'mengembalikan "<-alpro->".
hasil = LTrim(RTrim(awal))
'dengan Trim diberikan hasil yang sama
hasil = Trim(awal)
-
Replace() à mengganti huruf
Contoh : Dim awal As String = “makan”
‘mengembalikan “mokon”
Dim hasil As
String=Replace(awal, “a”, “o”)
-
StrComp() à Mengembalikan -1, 0, atau 1
berdasarkan hasil dari perbandingan dua
string. Opsi metode perbandingan dapat
menggunakan text (lowercase atau
uppercase dihiraukan) atau binary (lowercase atau uppercase
diperhatikan)
Contoh : Dim inStr1 As String = "ABCD"
Dim inStr2 As String = "abcd"
Dim outStr As Integer
'kedua string diurutkan secara ekual.
'mengembalikan 0
outStr = StrComp(inStr1, inStr2,CompareMethod.Text)
'urutan inStr1 setelah inStr2
'mengembalikan -1
outStr = StrComp(inStr1, inStr1,CompareMethod.Binary)
'urutan inStr1 sebelum inStr2
'mengembalikan 1
outStr = StrComp(inStr1, inStr2)
-
StrReverse() à Mengembalikan suatu
string yang mempunyai karakter sama dengan argumen, tetapi dengan urutan yang berkebalikan
Contoh : Dim inStr As String = "ABCDEFG"
'mengembalikan "GFEDCBA"
Dim outStr As String = StrReverse(inStr)
-
StrDup() à Mengembalikan suatu
string yang yang
terdiri dari karakter yang
berulang. Karakter yang diulang ini merupakan karakter awal dari
string yang menjadi argument
Contoh : Dim inStr As String = "Hai, Dunia!"
Dim outStr As String
'mengembalikan “SSSSSSSSS”
outStr = StrDup(9, “S”)
'mengembalikan “HHH”
outStr = StrDup(3, inStr)
