1. Fungsi String, Fungsi Matematika, Fungsi Date/Time
A. Fungsi String
Dalam Visual Basic terdapat banyak fungsi yang digunakan untuk mengolah data bertipe string. Berikut ini adalah penjelasan tentang fungsi-fungsi string yang sering digunakan:
1. LCase(x), digunakan untuk mengubah semua huruf dalam string x menjadi kecil semua.
Contoh:
s = LCase("Aku Bisa")
maka nilai s adalah "aku bisa"
2. UCase(x) , digunakan untuk mengubah semua huruf dalam string x menjadi besar semua.
Contoh:
s = LCase("Aku Bisa")
maka nilai s adalah "AKU BISA"
3. Left(x,n), digunakan untuk mengambil karakter dari string x yang dimulai dari kiri sebanyak n..
Contoh:
VB 6.0, s = Left("Aku Bisa", 3)
VB .NET, s = Strings.Left("Aku Bisa", 3)
maka nilai s adalah "Aku"
4. Right(x,n), digunakan untuk mengambil karakter dari string x yang dimulai dari kanan sebanyak n.
Contoh:
VB 6.0, s = Right("Aku Bisa", 3)
VB .NET, s = Strings.Right("Aku Bisa", 3)
maka nilai s adalah "isa"
5. Mid(x,m,n) , digunakan untuk mengambil karakter dari string x yang dimulai dari karakter ke m sebanyak n.
Contoh:
s = Mid("Aku Bisa", 2, 2)
maka nilai s adalah "ku"
6. LTrim(x), digunakan untuk menghapus karakter spasi di bagian kiri dari string x.
Contoh:
s = LTrim(" Aku Bisa ")
maka nilai s adalah "Aku Bisa "
7. RTrim(x) , digunakan untuk menghapus karakter spasi di bagian kanan dari string x.
Contoh:
s = RTrim(" Aku Bisa ")
maka nilai s adalah " Aku Bisa"
8. Trim(x), digunakan untuk menghapus karakter spasi di bagian kiri dan kanan dari string x.
Contoh:
s = Trim(" Aku Bisa ")
maka nilai s adalah "Aku Bisa"
9. Len(x) , digunakan untuk menghitung jumlah karakter dari string x.
Contoh:
s = Len("Aku Bisa")
maka nilai s adalah 8.
10. String(n,x), digunakan untuk membuat karakter x sebanyak n.
Contoh:
VB 6.0, s = String(10, "A")
VB .NET, s = New String("A", 10)
maka nilai s adalah "AAAAAAAAAA"
11. Space(n) , digunakan untuk membuat karakter spasi sebanyak n.
Contoh:
s = Space(10)
maka nilai s adalah " "
12. Asc(x) , digunakan untuk mengetahui nilai ASCII dari karakter x.
Contoh:
s = Asc("A")
maka nilai s adalah 65
13. Chr(x) , digunakan untuk mengetahui karakter dari nilai ASCII x.
Contoh:
s = Chr(65)
maka nilai s adalah "A"
14. InStr(x,n) , digunakan untuk mengetahui posisi karakter n didalam string x.
Contoh:
s = InStr("Aku Bisa", "u")
maka nilai s adalah 3
15. StrComp(x,y,n) , digunakan untuk membandingkan string x dan string y berdasarkan n. Jika n bernilai 0 maka akan dibandingkan secara case-sensitive, sedangkan jika n bernilai 1 maka akan dibandingkan secara biasa.
Contoh:
s = StrComp("Aku", "aku", 0)
maka nilai s adalah -1
s = StrComp("Aku", "aku", 1)
maka nilai s adalah 0
Khusus untuk fungsi ini, jika menghasilkan nilai 0 maka dianggap sebagai True, dan jika menghasilkan nilai selain 0 maka dianggap False.
16. StrConv(x,n) , digunakan untuk mengubah huruf dalam string x berdasarkan nilai n. Contoh:
s = StrConv("Aku Bisa", 1)
maka nilai s adalah "AKU BISA"
s = StrConv("Aku Bisa", 2)
maka nilai s adalah "aku bisa"
s = StrConv("aku bisa", 3)
maka nilai s adalah "Aku Bisa"
17. StrReverse(x) , digunakan untuk membalikkan posisi huruf dalam string x.
Contoh:
s = StrReverse("Aku Bisa")
maka nilai s adalah "asiB ukA"
18. Replace(x,m,n) , digunakan untuk menggantikan karakter m dalam string x dengan karakter n.
Contoh:
s = Replace("Kamu Juga Bisa","a","o")
maka nilai s adalah "Komu Jugo Biso"
19. Split(x,n)(i), digunakan untuk memecah string x berdasarkan karakter n dengan penomoran i.
Contoh:
s = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")(0)
maka nilai s adalah "Kuda"
s = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")(1)
maka nilai s adalah "Kerbau"
s = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")(4)
maka nilai s adalah "Macan"
20. Join(x,n), digunakan untuk menggabungkan rangkain string x yang dihubungkan dengan string n.
Contoh:
VB6, s = Join(Array("Hani", "Indah", "Budi", "Herman"), " & ")
VB.NET, s = Join(New Object() {"Hani", "Indah", "Budi", "Herman"}, " & ")
maka nilai s adalah "Hani & Indah & Budi & Herman"
Fungsi-fungsi diatas juga dapat djadikan fungsi lain diantaranya adalah :
1. Mengecek keberadaan string dalam string. Misalnya Anda ingin memeriksa ada tidaknya string "a" dalam string "anda berhasil", maka kodenya adalah :
If CBool(InStr("anda berhasil", "a")) Then
'jika ada
Else
'jika tidak ada
End If
2. Menghitung karakter tertentu dalam string. Misalnya Anda ingin menghitung karakter "a" dalam string "anda berhasil", maka kodenya adalah :
t = "anda berhasil"
s = Len(t) - Len(Replace(t, "a", ""))
maka nilai s adalah 3
3. Menghitung jumlah kata dalam string. Misalnya Anda ingin menghitung jumlah kata dalam string "anda berhasil", maka kodenya adalah :
s = UBound(Split("anda berhasil", " ")) + 1
maka nilai s adalah 2
4. Menghilangkan karakter tertentu dalam string. Misalnya Anda ingin menghilangkan karakter "a" dalam string "anda berhasil", maka kodenya adalah :
s = Replace("anda berhasil", "a", "")
maka nilai s adalah "nd berhsil"
5. Mengisi variabel array dinamis dengan string. Contoh kodenya sebagai berikut :
Dim Binatang() As String
Binatang = Split("Kuda,Kerbau,Sapi,Kambing,Macan", ",")
maka variabel Binatang memiliki 5 index (0-4) dengan rincian:
nilai Binatang(0) = "Kuda"
nilai Binatang(1) = "Kerbau"
nilai Binatang(2) = "Sapi"
nilai Binatang(3) = "Kambing"
nilai Binatang(4) = "Macan"
CATATAN :
Dalam beberaa fungsi string, terdapat optional property 'CompareMethod'. Bila properti ini bernilai Binary, maka fungsi tersebuat melakukan metode case-sensitive terhadap string. Sedangkan bila bernilai Text, maka fungsi tersebut tidak melakukan metode case-sensitive.
B. Fungsi Matematika
1. Fungsi abs()
Fungsi ini digunakan untuk menghasilkan nilai absolut berjenis integer.
Perintah yang digunakan adalah : abs()
Bentuk penulisannya adalah : int abs(int x)
2. Fungsi ceil()
Fungsi ini digunakan untuk menghasilkan pembulatan keatas dari suatu nilai desimal.
Perintah yang digunakan adalah : ceil()
Bentuk penulisannya adalah : double ceil(double x)
3. Fungsi floor()
Fungsi ini digunakan untuk menghasilkan pembulatan kebawah dari suatu nilai desimal.
Perintah yang diunakan adalah : floor()
Bentuk penulisannya adalah : double floor(double x)
4. Fungsi pow()
Fungsi pow() kependekan dari Raise to pow, digunakan untuk menghasilkan nilai berpangkat.
Perintah yang digunakan adalah: pow(x, y).
Fungsi pow() juga memiliki fungsi varian yaitu fungsi pow10(x), yang khusus digunakan untuk menghitung 10 dipangkatkan dengan x.
5. Fungsi sqrt()
Fungsi sqrt() kependekan dari square root, digunakan untuk menghasilkan nilai akar dari suatu nilai.
Perintah yang digunakan adalah: sqrt(x).
6. Fungsi fmod()
Fungsi fmod() digunakan untuk menghasilkan nilai sisa hasil pembagian.
Perintah yang digunakan adalah : fmod(x,y).
C. Fungsi Date/Time
Berikut ini merupakan Fungsi-fungsi dasar untuk mengolah data jenis Date/Time atau Tanggal/Waktu di Visual Basic.
• Now, digunakan untuk mendapatkan Tanggal dan Waktu sekarang.
d = Now
hasilnya 13/01/2012 1:22:42
• Date, digunakan untuk mendapatkan Tanggal sekarang.
[ VB 6.0 ] d = Date
hasilnya 13/01/2012
[ VB .NET ] d = Now.Date
hasilnya 13/01/2012
• Time, digunakan untuk mendapatkan Waktu sekarang.
[ VB 6.0 ] d = Time
hasilnya 1:22:42
[ VB .NET ] d = Now.ToLongTimeString
hasilnya 1:22:42
• Day(x), digunakan untuk mengambil nilai Tanggal saja dari x.
[ VB 6.0 ] d = Day(#1/13/2012#)
hasilnya 1
[ VB .NET ] d = #1/13/2012#.Day
hasilnya 13
• Month(x), digunakan untuk mengambil nilai Bulan saja dari x.
[ VB 6.0 ] d = Month(#1/13/2012#)
hasilnya 1
[ VB .NET ] d = #1/13/2012#.Month
hasilnya 1
• Year(x), digunakan untuk mengambil nilai Tahun saja dari x.
[ VB 6.0 ] d = Year(#1/13/2012#)
hasilnya 2012
[ VB .NET ] d = #1/13/2012#.Year
hasilnya 2012
• Hour(x), digunakan untuk mengambil nilai Jam saja dari x.
[ VB 6.0 ] d = Hour(#1:22:42 AM#)
hasilnya 1
[ VB .NET ] d = #1:22:42 AM#.Hour
hasilnya 1
• Minute(x), digunakan untuk mengambil nilai Menit saja dari x.
[ VB 6.0 ] d = Minute(#1:22:42 AM#)
hasilnya 22
[ VB .NET ] d = #1:22:42 AM#.Minute
hasilnya 22
• Second(x), digunakan untuk mengambil nilai Detik saja dari x.
[ VB 6.0 ] d = Second(#1:22:42 AM#)
hasilnya 42
[ VB .NET ] d = #1:22:42 AM#.Second
hasilnya 42
• DateSerial(x, y, z), digunakan untuk menghasilkan Tanggal dari kombinasi x, y, z.
d = DateSerial(2012,1,13)
hasilnya 13/01/2012
• TimeSerial(x, y, z), digunakan untuk menghasilkan Waktu dari kombinasi x, y, z.
d = TimeSerial(1, 22, 42)
hasilnya 1:22:42
• MonthName(x), digunakan untuk mendapatkan nama Bulan dari x.
d = MonthName(2)
hasilnya Februari
• WeekdayName(x), digunakan untuk mendapatkan nama Hari dari x.
d = WeekdayName(2, , vbSunday)
hasilnya Senin
Referensi :
http://putravb.blogspot.com/2010/10/fungsi-fungsi-string.html
http://www.frieyadie.com/94-penggunaan-fungsi-matematika-pada-c.html
http://putravb.blogspot.com/2012/01/fungsi-fungsi-datetime.html
link mediafire
http://www.mediafire.com/?9rpwk8f52p236cs
Tidak ada komentar:
Posting Komentar