Contoh Dasar Penggunaan Fungsi String/Karakter Visual Basic 6.0 (Vb6)

8 views
Pada kesempatan kali ini admin akan share sedikit perihal Fungsi dan pengolahan data String/Karakter secara dasar pada Microsoft Visual Basic 6.0 yang kerap kali kita jumpai dalam membangun sebuah sistem khususnya memakai Microsoft Visual Basic 6.0, pada artikel sebelumnya telah admin singgung mengenai pengolahan data bertype string yaitu pada posting  Cara Mencari Posisi Sebuah Karakter/String Dengan VB6, Cara Menghitung Jumlah Kata dan Membalikan Tulisan VB6, Function String Hilangkan Seluruh Spasi Kalimat | VB6 untuk lebih jelasnya sebagai berikut : 
LCase(x), fungsi string ini dipergunakan untuk merubah karakter (x) menjadi abjad kecil.
nKarakter = LCase(“AKU Ganteng”) , maka nilai nKarakter ialah “aku ganteng”

UCase(x), fungsi string ini dipergunakan untuk merubah karakter (x) menjadi abjad besar.
nKarakter = UCase(“AKU Ganteng”) , maka nilai nKarakter ialah “AKU GANTENG”

Left(x,n), dipakai untuk mengambil karakter dari string x yang dimulai dari kiri sejumlah n.
s = Left(“Aku Ganteng”, 3) maka nilai s ialah “Aku”

Right(x,n), fungsi string ini dipakai untuk mengambil karakter dari string x yang dimulai dari kanan sebanyak n.
s = Right(“Aku Ganteng”, 3) maka nilai s ialah “eng”

Mid(x,m,n), fungsi string ini dipakai untuk mengambil karakter dari string x yang dimulai dari karakter ke m sebanyak n.
s = Mid(“Aku Ganteng”, 2, 2) , maka nilai s ialah “ku”

LTrim(x) , fungsi string ini dipakai untuk menghapus karakter spasi di bab kiri dari string x.
s = LTrim(“     Aku Ganteng     “), maka nilai s ialah “Aku Ganteng     “

RTrim(x) , fungsi string ini dipakai untuk menghapus karakter spasi di bab kanan dari string x.
s = RTrim(“     Aku Ganteng     “) , maka nilai s ialah “     Aku Ganteng”

Trim(x) , fungsi string ini  dipakai untuk menghapus karakter spasi di bab kiri dan kanan dari string x.
s = Trim(“     Aku Ganteng     “) , maka nilai s ialah “Aku Ganteng”

Len(x) , fungsi string ini dipakai untuk menghitung jumlah karakter dari string x.
s = Len(“Aku Ganteng”) , maka nilai s ialah 8.

String(n,x) , fungsi string ini dipakai untuk menciptakan karakter x sebanyak n.
s = String(10, “A”)
maka nilai s ialah “AAAAAAAAAA”

Space(n) , fungsi string dipakai untuk menciptakan karakter spasi sebanyak n.
s = Space(10) , maka nilai s ialah “          “

Asc(x) , fungsi string dipakai untuk mengetahui nilai ASCII dari karakter x.
s = Asc(“A”) , maka nilai s ialah 65

Chr(x) , fungsi string dipakai untuk mengetahui karakter dari nilai ASCII x.
s = Chr(65) , maka nilai s ialah “A”

InStr(x,n) , fungsi string  dipakai untuk mengetahui posisi karakter n didalam string x.
Contoh s = InStr(“Aku Ganteng”, “u”) , maka nilai s ialah 3

StrConv(x,n) , fungsi string  dipakai untuk mengubah abjad dalam string x menurut nilai n.
s = StrConv(“Aku Ganteng”, 1) , maka nilai s ialah “AKU GANTENG”
s = StrConv(“Aku Ganteng”, 2) , maka nilai s ialah “Aku Ganteng”
s = StrConv(“Aku Ganteng”, 3) , maka nilai s ialah “aku ganteng”

StrReverse(x) , fungsi string  dipakai untuk membalikkan posisi abjad dalam string x.
s = StrReverse(“Aku Ganteng”) , maka nilai s ialah “gnetnaG ukA”

Replace(x,m,n) , fungsi string  dipakai untuk menggantikan karakter m dalam string x dengan karakter n.
s = Replace(“Aku Ganteng”, “Jelek”, “Ganteng”), maka nilai s ialah “Aku Ganteng”

Split(x,n)(i) , fungsi string dipakai untuk memecah string x menurut karakter n dengan penomoran i.
s=Split(“REG#04020022#DIAN#LAKI-LAKI#JEPARA”, “#”)(0), maka nilai s ialah “REG”
s=Split(“REG#04020022#DIAN#LAKI-LAKI#JEPARA”, “#”)(1), maka nilai s ialah “04020022”
s=Split(“REG#04020022#DIAN#LAKI-LAKI#JEPARA”, “#”)(2), maka nilai s ialah “DIAN”
s=Split(“REG#04020022#DIAN#LAKI-LAKI#JEPARA”, “#”)(3), maka nilai s ialah “LAKI-LAKI”
s=Split(“REG#04020022#DIAN#LAKI-LAKI#JEPARA”, “#”)(4), maka nilai s ialah “JEPARA”

Menghitung jumlah kata dalam string. Misalnya Anda ingin menghitung jumlah kata dalam string Aku Ganteng Tenan, maka kodenya ialah :
s = UBound(Split(“Aku#Ganteng#Tenan”, “#”)) + 1
maka nilai s ialah 3

Menghilangkan karakter tertentu dalam string. Misalnya Anda ingin menghilangkan karakter “a” dalam string “Aku Ganteng Tenan”, maka kodenya ialah :
s = Replace(“Aku Ganteng Tenan”, “a”, ““)
maka nilai s ialah “Aku Gnteng Tenn”
Semoga contoh-contoh fungsi dasar pengolahan data bertype string/karakter sanggup bermanfaat bagi pembaca sekalian
Author: 
    author
    No related post!