Langsung ke konten utama

Mengambil Karakter Dari Awal Spasi

Tidak akan ada habisnya coding seputar manupalisi string termasuk postingan ini yang akan membahas tentang bagaiman cara mengambil karakter dari awal spasi dan tentu itu sangat mudah sekali apabila kalian tau fungsi-fungsi string pada visual basic, mau tau? ya cari tau HaHa..



Buat desaign seperti ini

Komponen;
  • 1 biji label
  • 1 biji TextBox
  • 1 biji CommandButton
Code untuk CommandButon;

     Dim iniarray() As String
    Dim yup As String
   
    iniarray = Split(Text1, " ")
    On Error Resume Next
    Label1.Caption = vbNullString
   
    For i = 0 To UBound(iniarray)
   
        yup = String(Len(iniarray(i)), "*")
         Mid(iniarray(i), 2) = yup
        Label1 = Label1 & Space(1) & UCase(iniarray(i))
       
    Next i
 Result;



Komentar

Postingan populer dari blog ini

Pemahaman Do While dan Do Until

Proses Pengulangan dengan menggunakan Do While dan Do Until adalah proses pengulangan yang di tentukan oleh sebuah kondisi, sama seperti statement IF Then Else beda nya do While adalah untuk proses pengulangan yang artinya proses akan berulang terus sesuai kondisi apa yang di berikan. 1/ Do While Proses Pengulangan dengan menggunakan do while adalah sebuah proses pengulangan dalam kondisi benar/true, jadi jika nilai pada sebuah kondisi adalah benar/true maka proses akan terus berulang dan akan berhenti jika nilai pada sebuah kondisi adalah salah/false. Contoh; dim a as integer a = 1 Do While a < 10      MsgBox a      a = a + 1 Loop Dari coding diatas, kita membuat variable "a" sebagai integer, dan 1 adalah nilainya, berarti a adalah 1. Selanjutnya adalah melakukan perulangan dengan menentukan kondisi yang benar, bahwa "1 itu lebih kecil dari 10". Karena kondisi yang di tentukan adalah kondisi yang benar maka proses pengulangan di ...

Penggunaan Statement If Then Else VB 6.0

Penggunaan If Then Else pada visual basic 6.0 kalo menurut keyakinan saya adalah untuk mengajukan kondisi pada jalan program, dalam kondisi tersebut menyimpan dua syarat yang masing masing syartanya mempunyai tugas masing-masing. Contoh gini;

Fungsi Split VB 6.0

Split VB 6.0     Fungsi atau kegunaan split adalah untuk memecahkan/memisahkan string dengan ditentukan pembatasnya kemudian di tampung dalam variable array.    syntax;             split(ekspresi as string,[delimiter],[limit as long=-1],[Compare as VbCompareMethod=VbBinaryCompore])