Tutorial kali ini akan membahas tentang cara memecah string menjadi delimeter atau memisahkan kata-kata berdasarkan spasi. Kali ini kita menggunakan Fungsi Split. Kalau anda pernah menggunakan bahasa PHP. Fungsi Split ini hampir sama dengan Fungsi Explode pada PHP. Nah kita mulai saja
Buatlah sebuah Form dengan properties sebagai berikut :
Object
|
Properties
| |
Form1
|
Name
|
Form1
|
FormBorderStyle
|
FixedSingle
| |
Listbox1
|
Name
|
LsKata
|
Textbox1
|
Name
|
TxtKata
|
Setelah Itu Masukanlah Kode berikut pada
Form_Load
'Mengosongkan Semua Teks
TxtKata.Text = ""
LsKata.Items.Clear()
Txtkata_KeyDown
'rumus tombol Enter
If e.KeyCode = Keys.Enter Then
'Mengosongkan List
LsKata.Items.Clear()
'memiskahkan kata perspasi
Dim Kata() = TxtKata.Text.Split(" ")
'menampilkan kata didalam list
For Each TmpKata In Kata
LsKata.Items.Add(TmpKata)
Next
End If
0 komentar:
Posting Komentar
Komentar anda akan di tampilan setelah disetujui oleh moderator.