急，要用datagrid控件显示查询后的数据表，只显示满足条件的行！

Question

急，要用datagrid控件显示查询后的数据表，只显示满足条件的行！

Answer 1

Private Sub Command1_Click()
        Dim Rs As New ADODB.Recordset
        Dim StrSql As String
        Dim Cnn As New ADODB.Recordset
        
        StrSql = "SELECT * FROM [TABLENAME1] WHERE ID>=50"
        Rs.Open StrSql, Cnn, adOpenKeyset, adLockBatchOptimistic
        Set DataGrid1.DataSource = Rs
        DataGrid1.Refresh
End Sub

Answer 2

adodc.recordsource = "select * from ......条件"set datagrid.datasource = adodc可以吧