bind data grid

Private Sub bindDataGrid()
Dim koneksi As New SqlConnection(Connection.GetConnectionString)
Dim dsPro As New DataSet
Dim strQuery As String
//bla bla bla.... do something
Dim daPro As New SqlDataAdapter(strQuery, koneksi)
daPro.Fill(dsPro)
dgPro.DataSource = dsPro
dgPro.DataBind()
koneksi.Close()

gw coba tulis code ini, supaya gag lupa... soalnya banyak dipakai kedepanya tuk develop web lainnya.....simple kan??

hmm... coba pelajari teknik lainnya menggunakan object rational mapping , beuh... jadi query yang disimpan berbeda pula dengan struktur koding logic, maupun desainnya...
tapi aku belum sempat mendalami... sedang akan.... semangat buat yang lainnya yah!!
GG!!