Tutorial Cara Tentang Fungsi Kegunaan dari Split String dengan VB.Net
Dalam artikel kali ini kita akan menulis tentang fungsi kegunaan dari split string di vb.net, Awalnya bingung kalau memakai pemrograman VB.Net mengubah data string menjadi array secara cepat itu bagaimana? searching sana sini akhirnya ketemu dengan teknik yang dinamakan dengan split string.
Dibawah ini mari kita buat contoh kasusnya terlebih dahulu ya:
Misalkan kita punya database record data seperti gambar dibawah ini
Coba perhatikan di record data pada tabel article, di field/kolom categories terdapat data yang bernilai angka dengan pemisah koma. Data itu merupakan angka yang di dapat dari id_category milik tabel categories jadi disini saya asumsikan data tersebut mempunyai relasi secara tidak langsung.
Sekarang permasalahannya adalah kita ingin menampilkan record data article, yang nanti juga akan muncul nama-nama dari category yang ada di data article-nya. Bagaimana caranya? Disini kita akan menggunakan teknik yang namanya split string sebagai solusi dari permasalahan ini.
Saya anggap sampai sini kalian sudah mengenali dasar-dasar pemrograman VB.Net dan cara mengoperasikan aplikasi Visual Studio. Disini saya coba tanpa menggunakan database terlebih dahulu, saya akan menggantinya dengan database lokal yaitu dengan variable. Jadi langsung saja kita buat Proyek baru dengan nama terserah kalian. Lalu kita buat tampilan aplikasinya seperti ini:
Hanya menggunakan Label saja dan beberapa perubahan pada Properties, Jangan lupa untuk mengubah properties (name) dari object label yang teksnya Label Kosong itu, diberi nama boleh sesuai dengan keinginan anda. Selanjutnya kita langsung buat coding programnya di dalam Public Class milik Form ya.
|
1
|
Dim article() As String = {"Tutorial Testing", "isi konten", "2,1,3"}<br>Dim categories() As String = {"Programming", "VB.Net", "Web", "Mobile"} |
Kita sudah membuat variabel secara global. Datanya sengaja saya taruh di variable array sebagai penggantinya database. Struktur data tetap sama hanya berbeda ID saja, jadi disini kita tidak menentukan ID dari datanya tapi ID-nya akan menggunakan index dari array.
Kemudian kita buat Event Form Load. Dengan isi coding seperti ini:
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
Me.lbl_id.Text = "1"Me.lbl_title.Text = article(0)Me.lbl_content.Text = article(1)Dim category() As String = article(2).Split(",")Dim txt_categories As String = ""For Each val As Integer In category If (val < categories.Length - 1) Then txt_categories &= categories(val - 1) & ", " Else txt_categories &= categories(val - 1) End IfNextMe.lbl_categories.Text = txt_categories |
Dan inilah hasil akhir output dari programnya
