Visual Basic - Refrescar un datagrid

Life is soft - evento anual de software empresarial
   
Vista:

Refrescar un datagrid

Publicado por Ale (47 intervenciones) el 28/10/2010 03:22:31
Hola a todos tengo la siguiente estructura en un form de consulta, la cual funciona sin problemas al momento de escribir algo en el text1 , el problema es que al dejar el blanco el text1 el datagrid no me muestra los registros, es decir no hace el refresf del datagrid..

Que me falta o que tengo mal ????

Dim consulta As String
Private Sub Form_Load()
Set DataGrid1.DataSource = Adodc1.Recordset
Adodc1.Refresh
Adodc1.RecordSource = "Ingreso5"
End Sub

Private Sub Text1_Change()
If Op1 = True Then
consulta = "Nombre"
ElseIf Op2 = True Then
consulta = "empresa"
End If
With Adodc1
If Text1 <> "" Then
.Recordset.Filter = consulta & " Like '*" + Text1 + "*'"
Set DataGrid1.DataSource = Adodc1.Recordset
Else
.Recordset.Filter = ""
End If
.Refresh
End With
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Refrescar un datagrid

Publicado por Pedro Luis (128 intervenciones) el 28/10/2010 09:10:44
También la ayuda aconseja usar Select en vez de Filter
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar