Estoy usando Access. Lo que trato de hacer es que por cada número de lista asignada a cada cliente,
cambie a la tabla correspondiente. Muchas gracias y si tienen alguna pregunta sobre el código...solo haganla.
muchas gracias.
Código:
Private Sub txtcant1_GotFocus()
If (txtlista = 1) Then
Data1.RecordSource = "ARTICULOS"
Data1.Recordset.FindFirst "cod Like '" & txtart1.Text & "'"
ElseIf (txtlista = 2) Then
Data1.RecordSource = "Art2"
Data1.Recordset.FindFirst "cod Like '" & txtart1.Text & "'"
ElseIf (txtlista = 3) Then
Data1.RecordSource = "Art3"
Data1.Recordset.FindFirst "cod Like '" & txtart1.Text & "'"
ElseIf (txtlista = 4) Then
Data1.RecordSource = "Art4"
Data1.Recordset.FindFirst "cod Like '" & txtart1.Text & "'"
End If
End SUb