Visual Basic

[tachin83]

TENGO UN PROGRAMA QUE TIENE UNA BASE DE DATOS ACESSS

PERO EN LA BUSQUEDA NO ME FUNCIONA BIEN NO ME BUSCA MES Y FECHA

EL CODIGO ES ESTE

Private Sub Command1_Click()


If Opt1.Value Then
nreg = Text8.Text
sbuscar = "MES Y AÑO= " & " '" & nreg & "'"
End If

If Opt2.Value Then
sbuscar = "A= " & " '" & Text8.Text & "'"
End If
Adodc1.Recordset.Find sbuscar
End Sub


POR FAVOR LE DEJO MI CORREO PARA QUE QUENES ME QUIEREN AYUDAR LE MANDO EL PROGRAMA Y LE DIGO LAS OTRAS COASAS QUE NO ME SALEN


CHAUU FELIZ NAVIDAD