Perchè se all'interno di un modulo di classe inserisco un campo di testo della form richiamata Access non lo riconosce e mi ritorna errore 'Variabile non definita'?
Ho creato questa subroutine sull'evento change del campo TxtObliteratrice
In questa subroutine voglio che al change del campo TxtObliteratrice la query ne recuperi il dato e valorizzi il campo 'TxtBus' con il vaore recuperato dalla select.
Solo che all'esecuzione del debug mi da errore su riga :
TxtBus.Text = strSqlOrig
indicandomi 'Variabile non definita su'TxtBus.Text'
Per quale motivo??
Dov'è lo sbaglio?
Questa è la subroutine:
Private Sub TxtObliteratrice_Change()
Dim VObliteratrice As String
Dim strSqlOrig As String
Dim VBusAttuale As String
Dim frm As Form
DoCmd.OpenForm "Maschera1"
Set frm = Forms!Maschera1
'Maschera1.Visible = True
'Maschera1.Caption = "Nuovi impiegati"
TxtObliteratrice.SetFocus
VObliteratrice = TxtObliteratrice.Text
strSqlOrig = ""
strSqlOrig = strSqlOrig & "SELECT BusAttuale "
strSqlOrig = strSqlOrig & " FROM Tabella1"
strSqlOrig = strSqlOrig & " WHERE Data =(SELECT Max(Data) FROM TABELLA1 WHERE OBLITERATRICE='" & VObliteratrice & "'"
VBusAttuale = strSqlOrig
TxtBus.Text = strSqlOrig
End Sub
Grazie,![]()