Salam sahabat Jaco. Kali ini saya mencoba berbagi trik pemrograman Visual Basic menggunakan Microsoft Visual Studio 2010. Trik yang akan dibahas kali ini adalah teknik memisahkan sebuah kalimat yang diinputkan oleh pengguna aplikasi pada sebuah Textbox menjadi Array kata-kata dan kemud...

[VB.net] Split Kalimat Textbox per-Kata input ke Datagridview

Salam sahabat Jaco. Kali ini saya mencoba berbagi trik pemrograman Visual Basic menggunakan Microsoft Visual Studio 2010. Trik yang akan dibahas kali ini adalah teknik memisahkan sebuah kalimat yang diinputkan oleh pengguna aplikasi pada sebuah Textbox menjadi Array kata-kata dan kemudian memasukkan array kata-kata tersebut kedalam sebuah datagridview secara vertikal(atas kebawah/ dalam satu kolom)

 

Langsung saja kita coba Codingnya.


1. Pertama buka Microsoft Visual Studio nya dulu yah..kemudian Pilih Visual Basic -> Windows Form Application. Pilih juga directori untuk simpan Filenya. Lalu klik OK. Cek gambar dibawah low bingung.

 

 

2. Kalau udah muncul tampilan seperti dibawah ini. Kemudian untuk membuat sebuah Project baru, pilih menu File - New - Project.

 

3. Setelah itu akan muncul sebuah form kosong seperti berikut.

 

 

4. Masukkan sebuah Textbox, Button, dan DataGridview. Kemudian Posisikan seperti gambar dibawah. Ganti text pada Button1 menjadi "SPLIT" agar lebih Mantab.. Cek gambar dibawah :

 

5. Langkah selanjutnya adalah Proses Coding. Untuk memulai, silahkan double-klik pada button "SPLIT" untuk view code.

Perhatikan baik-baik tiap kode berikut ini dan juga penjelasannya :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If TextBox1.Text = "" Then TextBox1.Focus() : Exit Sub 'Untuk Mengecek Apabila Isi Textbox Kosong

        Dim Kalimat As String 'Deklarasi Variabel untuk Menampung Kalimat
        Dim i As Integer
        Dim ArrayKata() As String

        DataGridView1.Rows.Clear() ' Mengosongkan DatagridView


        With DataGridView1

            .ColumnCount = 1 'Membuat 1 Kolom Pada Datagridview sebelum mengisinya

            .Columns(0).Name = "KATA" 'Memberi nama pada kolom pertama dengan nama "Kata"

        End With

        Kalimat = Trim(TextBox1.Text) 'trim = Menghilangkan Spasi sebelum dan sesudah kalimat

        ArrayKata = Kalimat.Split(" ") ' Memisahkan kalimat menjadi kata dengan <spasi>

        For i = 0 To UBound(ArrayKata) ' UBound = batas atas array

            DataGridView1.Rows.Add(ArrayKata(i)) ' isi kata yang sudah di Split kedalam datagrid

        Next i

    End Sub

 

 

6. Nah, kalau sudah selesai ketik kode diatas. Coba di Compile saja (tekan F5 biar mudah). Hasil tampilan ketika dieksekusi seperti dibawah ini :

 

 

Makasih buat yang udah mampir baca. Semoga bermanfaat.
Salam Sahabat Jaco

 

Pembaca Yang Baik Selalu Tinggalkan Jejak ^_^

 


About Author

Lutfi Febriandita


Comment & Discussions

  • Yusak (Guest)
    kalo misalnya mas datagridnya terdiri atas 2 kolom, kolom kata dan jumlah kata. bagaimana mengisi jumlah katanya sekaligus dan apabila ada kata yg sama, maka jumlah kata yg sama ditambah, jadi tidak ada kata yg duplikat di datagrid. Trims sebelumnya

  • Please LOGIN before if you want to give the comment.