Visual Basic - Buscar en un DataGrid 2 o mas criterios

Life is soft - evento anual de software empresarial
   
Vista:

Buscar en un DataGrid 2 o mas criterios

Publicado por lixander (3 intervenciones) el 26/03/2017 05:53:13
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim buscar As String, criterio As String
If Text3.Text = "" Then
MsgBox ("El Campo se encuentra vacio"), vbInformation
Else
buscar = Text3.Text
If buscar = "" Then Exit Sub
criterio = "Trayecto like '*" & buscar & "*'"
Adodc1.Recordset.MovePrevious
 Label7.Caption = CStr(DataGrid1.Appearance)
If Not Adodc1.Recordset.EOF Then
Adodc1.Recordset.Find criterio
End If
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find criterio
If Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveLast
respuesta = MsgBox("La Cedula no esta registrada", vbCritical)
 
End If
End If
End if

Necisito modicar este codigo para que me busque otro criterio aparte del que se muestra " trayecto " . Visual Basic 6. Espero que me puedan ayudar, Gracias..
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
Imágen de perfil de Andres Leonardo

Buscar en un DataGrid 2 o mas criterios

Publicado por Andres Leonardo (1164 intervenciones) el 27/03/2017 15:48:32
Deberias crear segun algo ... el armado del SQL donde te diga or ..criterio .. or criterio or criterio

Debes en el formulario segun marques algo y solo enviar el stringsql o la sentencia sql mandarla al procedimiento

espero me hayas entendido.
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
Revisar política de publicidad