STRING

Visual basic menyediakan beberapa fungsi yang dapat kita gunakan untuk mengolah nilai string. Karena fungsi pengolah string yang dimiliki VB sangat banyak, disini hanya akan dibahas tentang beberapa fungsi string saja yang sering digunakan dalam kehidupan sehari-hari.

o Length

Fungsi length berguna untuk menghitung jumlah karakter. Fungsi ini dapat menghitung jumlah karakter dalam variabel untuk kemudian disimpan dalam variabel jumlah. Fungsi Length akan mengembalikan hasilnya dalam format angka, sehingga kita harus menyimpannya dalam tipe data berjenis angka juga seperti dalam contoh berikut yang memiliki tipe data integer. Misalnya:

Kata     =   “Visual   Basic   2008”

Jumlah   =   Length   (kata)

‘   jumlah   :   17   karakter

o   ToUpper dan ToLower

Fungsi ToUpper digunakan untuk mengubah string menjadi huruf besar (Upper Case). Sedangkan fungsi ToLower digunakan untuk mengubah string menjadi huruf kecil (Lower Case). Misal:

Dim   myName   As   String   =   “Visual   Basic”

txtTampil.Text =  myName.ToUpper()

maka hasil yang akan ditampilkan pada textbox adalah VISUAL BASIC o Left (x, n)  : mengambil n karakter di sebelah kiri suatu string

s =  Microsoft.VisualBasic.Left(“Aku  Bisa”,3)   ‘nilai  s  =  “Aku”

o Right (x, n) : mengambil n karakter di sebelah kanan suatu string

s   =   Microsoft.VisualBasic.Right(“Aku Bisa”,3)         ‘nilai s =  “isa”

o   Trim (x): menghilangkan spasi kosong di awal dan akhir suatu string

s   =   Trim(“   Aku   Bisa   ”)                 ‘nilai s = “Aku Bisa”

o Ltrim (x) : menghilangkan spasi kosong di awal suatu string

s   =   Ltrim(“   Aku   Bisa   ”)                 ‘nilai s = “Aku Bisa ”

o   Rtrim(x) : menghilangkan spasi kosong di akhir suatu string

s   =   Rtrim(“   Aku   Bisa   ”)                 ‘nilai  s  =  “ Aku   Bisa”

o   Space(n) , digunakan untuk membuat karakter spasi sebanyak n. Contoh:

s  = Space(10) , maka  nilai s adalah "   "

o 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"

o   Replace :  mengganti karakter tertentu dengan sebuah karakter lain

Nilai awal  =   “Any   String”

Nilai akhir = Replace (nilai awal,“string yang akan  diganti”, “string pengganti”)

o   InStr(x,n)  , digunakan untuk mengetahui posisi karakter n didalam string x.

s  =  InStr("Aku  Bisa",  "u")                   ‘maka  nilai  s  adalah  3

o Split(x,n)(i) , digunakan untuk memecah string x berdasarkan karakter n dengan penomoran i.

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"

o   SubString     :  memotong string dari karakter ke-n sebanyak n. Misalnya:

Dim   myName   As  String   =   “Visual  Basic” txtTampil.Text =     myName.Substring(1,7) maka akan tampil kata “Basic” pada textbox.

CONTOH

script:

                 hasil