Fungsi String di VB .Net
Dalam Visual
Basic terdapat banyak fungsi yang digunakan untuk mengolah data bertipe string.
Berikut ini adalah penjelasan tentang fungsi-fungsi string yang sering
digunakan.
- LCase(x) ,
digunakan untuk mengubah semua huruf dalam string x menjadi kecil semua.
Contoh:
s = LCase(“Aku Bisa”) , maka nilai s adalah “aku bisa”
- UCase(x) ,
digunakan untuk mengubah semua huruf dalam string x menjadi besar semua.
Contoh:
s = LCase(“Aku Bisa”) , maka nilai s adalah “AKU BISA”
- Left(x,n) ,
digunakan untuk mengambil karakter dari string x yang dimulai dari kiri
sebanyak n. Contoh:
VB .NET, s = Strings.Left(“Aku Bisa”, 3)
maka nilai s adalah “Aku”
- Right(x,n) ,
digunakan untuk mengambil karakter dari string x yang dimulai dari kanan
sebanyak n. Contoh:
VB .NET, s = Strings.Right(“Aku Bisa”, 3)
maka nilai s adalah “isa”
- 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”
- LTrim(x) ,
digunakan untuk menghapus karakter spasi di bagian kiri dari string x.
Contoh: s = LTrim(” Aku Bisa “) , maka nilai s adalah “Aku Bisa ”
- RTrim(x) ,
digunakan untuk menghapus karakter spasi di bagian kanan dari string x.
Contoh: s = RTrim(” Aku Bisa “) , maka nilai s adalah ” Aku Bisa”
- 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”
- Len(x) ,
digunakan untuk menghitung jumlah karakter dari string x. Contoh:
s = Len(“Aku Bisa”) , maka nilai s adalah 8.
- String(n,x) ,
digunakan untuk membuat karakter x sebanyak n. Contoh:
VB .NET, s = New String(“A”, 10)
maka nilai s adalah “AAAAAAAAAA”
- Space(n) ,
digunakan untuk membuat karakter spasi sebanyak n. Contoh:
s = Space(10) , maka nilai s adalah ” ”
- Asc(x) ,
digunakan untuk mengetahui nilai ASCII dari karakter x. Contoh:
s = Asc(“A”) , maka nilai s adalah 65
- Chr(x) ,
digunakan untuk mengetahui karakter dari nilai ASCII x. Contoh:
s = Chr(65) , maka nilai s adalah “A”
- InStr(x,n) ,
digunakan untuk mengetahui posisi karakter n didalam string x. Contoh:
s = InStr(“Aku Bisa”, “u”) , maka nilai s adalah 3
- 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.
- 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”
- StrReverse(x)
, digunakan untuk membalikkan posisi huruf dalam string x. Contoh:
s = StrReverse(“Aku Bisa”) , maka nilai s adalah “asiB ukA”
- 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”
- 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”
- 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 :
- 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 - 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 -
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 -
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” -
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
beberapa 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
tersebuat tidak melakukan metode case-sensitive.
No comments:
Post a Comment