Cara Membuat Form Untuk Memanipulasi String dan Karakter di Visual Basic 6.0

Pada artikel kali ini saya akan membahas tentang cara membuat form untuk memanipulasi string dan karakter yang ada divisual basic 6.0. 

String merupakan deretan atau rangkaian karakter yang membentuk sebuah kata atau kalimat yang diawali dan diakhiri dengan tanda (“). Adapun pada artikel ini kita akan membahas berbagai macam manipulasi string yang ada di visual Basic diantaranya adalah :

  • Membalik String
  • Menggabungkan String
  • Mengulang String
  • Menentukan Panjang string
  • Mengganti karakter
  • Mengambil Sebagian karakter
  • Mencari karakter atau String

Dari daftar diatas kita akan membahas satu persatu dengan menambahkan kedalam sebuah form dan menambahkan syntax syntax untuk masing-masing fungsi tersbut diatas.

Pada artikel kali saya tidak menjelaskan fungsi dan syntax penulisannya tapi langsung memperaktekannya pada form visual Basic 6.0., karena fungsi dan syntax dasar manipulasi string sudah pernah saya bahas dalam blog ini, kalau Anda ingin tau syntax sintax dasarnya silakan cek manipulasi string dan Karakter yang saya pernah tulis di blog ini.

Mudah-mudahan dengan cara memperaktekannya kedalam sebuah form bisa lebih dimengerti bagaimana output dari syntax-syntax tersebut.

Contoh Manipulasi String dan Karakter di sebuah Form

Berikut dibawah ini adalah form yang akan kita desain untuk memanipulasi sebuah string atau karakter :


Desain Form Manipulasi String dan Karakter


Setelah Anda mendesain form seperti ini lalu masukan kode untuk tiap Commanbutton dengan kode dibawah ini :


Private Sub Command1_Click()


'menggabungkan anatara 2 kata

Label4.Caption = Text5.Text & " " & Text6.Text


End Sub


Private Sub Command2_Click()


'mengulang karakter sebanyak yang diiginkan

Label8.Caption = String(Text8.Text, Text7.Text)


End Sub


Private Sub Command3_Click()


'menghitung panjang termasuk spasi

Label11.Caption = Len(Text9.Text)


End Sub


Private Sub Command4_Click()


'mengambil karakter sebanyak nx termasuk spasi dari kiri

Label14.Caption = Left(Label12, Text4.Text)


End Sub


Private Sub Command5_Click()


'mencari string atau kalimat

Label17.Caption = InStr(1, Label15, Text3.Text, 1)


End Sub


Private Sub Command6_Click()


'membalik sebuah string atau kalimat

Label20.Caption = StrReverse(Text10.Text)


End Sub


Private Sub Command7_Click()


'mengganti string atau kalimat

Label23.Caption = Replace(Label22, Text2.Text, Text1.Text)


End Sub


Jalankan program Anda, masukan kata atau string pada textbox yang akan di manipulasi.

Lihat gambar dibawah ini adalah output dari Manipulasi String dan Karakter


Ouput Manipulasi String dan karakter


Catatan :

Maaf kalau Desain Form diatas agak berantakan, silahkan Anda modifikasi dan kembangkan sendiri sesuai keinginan Anda. 

Demikian artikel tentang Membuat Form Untuk Manipulasi String dan Karakter di Visual Basic 6.0. Semoga artikel ini bermanfaat buat kita semua.Amin

 

No comments: