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 :
'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:
Post a Comment