Cara SELECT/FILTER/SEARCH Data Dari DataTable VBNET

Mungkin belum banyak yang tahu bagaimana cara filter row dari object datatable, saya kasih kasus misalnya saya punya 1 datatable dan sudah terisi data "master barang", ok untuk memperjelas seperti ini sintaknya :

Dim myTable As New DataTable

Using con As NewSqlClient.SqlConnection("data source=DJIESOFT\SQL2012E;user id=sa;password=mypwd;initial catalog=mydb_dummy")

      con.Open()

      Using adp As NewSqlClient.SqlDataAdapter("SELECT * FROM M_PRODUK", con)

           adp.Fill(myTable)

       End Using

End Using

Nah saya ingin data barang yang satuan nya "PCS" masuk ke listview1, maka anda bisa lakukan dengan cara berikut ini :

'add barang berdasarkan satuan

Dim rowFind() As DataRow

'contoh 1 select/filter data dari datatable

rowFind = myTable.Select("SAT_KECIL='PCS'")

IfrowFind.Length > 0 Then

   For Each row As DataRow In rowFind

       ListView1.Items.Add(row.Item("produk_desc").ToString)

       ListView1.Items(ListView1.Items.Count - 1).SubItems.Add(row.Item("sat_kecil").ToString)

   Next

   ListView1.AutoResizeColumns(ColumnHeaderAutoResizeStyle.HeaderSize)

End If

Anda juga bisa gunakan SQL Operator : LIKE, =, >, <. >=, <=, BETWEEN dan sebagainya, contoh :

'contoh 2 select/filter data dari datatable

rowFind = myTable.Select("SAT_SEDANG IN ('LUSIN','BAND')")

IfrowFind.Length > 0 Then

   For Each row As DataRow In rowFind

       ListView2.Items.Add(row.Item("produk_desc").ToString)

       ListView2.Items(ListView2.Items.Count - 1).SubItems.Add(row.Item("sat_kecil").ToString)

    Next

    ListView2.AutoResizeColumns(ColumnHeaderAutoResizeStyle.HeaderSize)

End If

Selain itu juga anda dapat menggunakan AND atau OR sehingga pencarian data akan lebih spesifik lagi, contoh :

'contoh 3 select/filter data dari datatable

rowFind = myTable.Select("SAT_KECIL IN ('BOTOL') AND PRODUK_DESC LIKE 'M%'")

IfrowFind.Length > 0 Then

   For Each row As DataRow In rowFind

       ListView3.Items.Add(row.Item("produk_desc").ToString)

       ListView3.Items(ListView3.Items.Count - 1).SubItems.Add(row.Item("sat_kecil").ToString)

    Next

    ListView3.AutoResizeColumns(ColumnHeaderAutoResizeStyle.HeaderSize)

End If

Sehingga tampilan akhir nya seperti dibawah ini :

Jadi intinya SELECT dari DataTable ini hanya membutuhkan variable Array DataRow dan Sedikit Perintah SQL (Where/condition Only), so sangat mudah kan? semoga bermanfaat untuk sahabat DJIESOFT semua

Tags:
DataTable.Select Method (System.Data), vb.net - How to select data from datatable, Query Data in DataTable, User selectable rows - DataTables, Dynamicaly selecting data to display in datatables, Select query on datatable for filter data, contoh select data dari datatable