vb.net制作向导 vbnet action

提示：扫一扫查出行
【扫一扫了解最新限行尾号】
复制提示

在Vb.net中用SqlDataAdapter 向导配置怎样用变量来筛选数据？

Dim myDataset As New DataSet

Dim myBindingSource As New BindingSource

Private Function CreatDataAdapter(ByVal myConn As OleDbConnection, ByVal SQLstr As String, ByVal Connstr As String) As OleDbDataAdapter

Dim adapter As New OleDbDataAdapter

Dim mySelectCommand As OleDbCommand

adapter.SelectCommand = New OleDbCommand(SQLstr, myConn)

Dim cb As OleDbCommandBuilder = New OleDbCommandBuilder(adapter)

Return adapter

End Function

Private Sub Build_DGV(ByVal SQLstr, ByVal ConnStr)

myDataset.Reset()

Dim myConn As New OleDbConnection(ConnStr)

CreatDataAdapter(myConn, SQLstr , ConnStr).Fill(myDataset)

myBindingSource.DataSource = myDataset.Tables(0)

DataGridView1.DataSource = myBindingSource

myConn.Close()

myConn.Dispose()

End Sub

在按钮事件里调用Build_DGV（），不同的sql语句在DataGridView1里出不同的数据，控制sql语句的where条件就能筛选数据了。

另外，你还可以用myDataset.Tables(0).DefaultView.RowFilter(filetecause)