Programación General > Visual Basic para principiantes
Como realizar busqueda incluyendo 3 textbox?
(1/1)
Dydimos:
Hola amigos....
lo que quiero es realizar una busqueda incluyen el contenido de 3 textbox
los textbox son donde esta el codigo de la clase: AD-131, periodo:1 (ese contenido esta por default siempre)
y en textbox de numero de cuenta que esta al lado izquierdo del boton busqueda.
Bueno el codigo que tengo es el siguiente pero no me funciona: (aqui hacia pruebas solo con 2 textbox codigo de clase y el numero de cuenta)
--- Código: Visual Basic ---Private Sub Command2_Click() Dim dato, ncuenta, num, clac As String dato = Trim(cuenta.Text) num = Trim(CClase.Text) ncuenta = "Numcuenta Like'*" & dato & "*'" clac = "CodClase Like'*" & num & "*'" Data1.Recordset.FindFirst ncuenta Data1.Recordset.FindNext clac If Data1.Recordset.NoMatch Then MsgBox "El alumno no existe en la lista", 32, "Advertencia" Exit Sub Else If Not Data1.Recordset.NoMatch Then busq0.Text = Data1.Recordset.Nombre busq1.Text = Data1.Recordset.Numcuenta End If End IfEnd Sub en ese codigo aun no incluyo la busqueda para periodo.. :p
lo ultimo del codigo es que el resultado apareceran en unos texbox mas abajo...
o incluyo imagenes porq no me permite el foro...
me ayudan plisss como deberia tener el codigo.
Dydimos:
--- Código: Text ---Private Sub Command2_Click() Dim dato, pdo, Filtro, clac As StringIf cuenta.Text = "" ThenMsgBox "Debe ingresar algún valor" + Chr(10) + "para la búsqueda correspondiente", _vbOKOnly + vbInformation, "Advertencia"cuenta.SetFocusElse dato = Trim(cuenta.Text) num = Trim(CClase.Text) pdo = Trim(Periodo.Text) Filtro = "Numcuenta Like '*" & dato & "*'" clac = Filtro & "CodClase Like '*" & num & "*'" pdo = Filtro & "Periodo Like '*" & pdo & "*'" Data1.Recordset.FindFirst Filtro If Data1.Recordset.NoMatch Then MsgBox "El alumno no existe en la lista", 32, "Advertencia" Else busq0.Text = Data1.Recordset.Nombre busq1.Text = Data1.Recordset.NumcuentaEnd If End IfEnd Sub
Buneo modifique el codigo y creo este es mejor pero aun asi me tira alumnos que no estan ligados a la clase...
Lo que quiero hacer es que el programa busque un alumno por numero de cuenta, numero de clase y periodo y debe cumplir esas condiciones para que lo traiga... de lo contrrio no... perosiempre me lo trae... :( porfa ayuda!
fm89-10:
hola, en esta pagina hay un ejemplo parecido, lo unico es que la busqueda lo hace desde un datagrid
http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/326-buscar-en-un-datagrid.htm
suerte :hola:
Navegación
Ir a la versión completa