buscar por caracteres en vb6

Iniciado por alfa_28, 3 Octubre 2006, 05:05 AM

0 Miembros y 1 Visitante están viendo este tema.

alfa_28

hala muchachos me pueden ayudar en esto:
   tengo un text1 y un dbgrid1 conectado a una tabla Almacen
   bueno yo al ingresar texto en el text1 quiero que lo busque en el dbgrid
   segun a los caracteres ingrezados bueno espero que me entiendan. porque ya lo e intentado y no me sale
de antemano agradezco y saludos

CeLaYa

puedes hacer una consula SQL usando el LIke

SELECT * FROM Tabla Where campo LIKE ' & text1.text & *'
"La soledad es el elemento de los grandes talentos".
Cristina de Suecia (1626-1689) Reina de Suecia.

MORFEO_2

creo q no entendi jejej un ejemplo de lo que entendi

quieres escribir un caracter o una cadena de caracteres a buscar (identificar en otro control) ejemplo si tengo un text1 donde e escrito  "hola amigos como estan"  quieres que si yo ingreso en un text2 la palabra amigos  me diga si esta o no en el text1  jajaja po me enrede fui abducido por un marciano jejej

bueno si es el caso aqui un code de ejemplo


Private Sub Command1_Click()
busca
End Sub
Sub busca(Optional ByVal bs As Integer)
Dim a As Integer
Dim b As String
b = Text2.Text
If Len(b) Then
a = InStr(bs + 1, Text1.Text, b)
If a > 0 Then
Text1.SelStart = a - 1
Text1.SelLength = Len(b)
  Text1.SetFocus
  Else
      MsgBox "No se encuentra: " & Chr$(13) & b, vbDefaultButton1, """"

       End If
End If

End Sub


controles a usar  dos text  y un command
bueno si no entendi y raye la papa pues no me pesques pero si es de lo que hablas te recomiendo q te interiorices en tratamiento de cadenas bueno solo si es el caso  bye bye


Aun puedes despertar...xD largavida a ][NetSpy][ and ][Humble&Team][