Code (vbnet):
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim pretraga As New DataSet1TableAdapters.pretragaTableAdapter
Dim dts As New DataTable
dts = pretraga.GetData(Me.TextBox8.Text)
Me.DataGridView1.DataSource = dts
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim pretraga As New DataSet1TableAdapters.pretragaTableAdapter
Dim dts As New DataTable
dts = pretraga.GetData(Me.TextBox8.Text)
Me.DataGridView1.DataSource = dts
End Sub
Kako da ovdje sada ubacim i osposobim progress bar. Molim za pomoc.
[Ovu poruku je menjao Shadowed dana 09.02.2010. u 18:11 GMT+1]