Originariamente inviato da xegallo
perché TxtBus è membro di un form
se all'esterno del form vuoi riferirti ad un membro di esso devi specifcare a chi appartiene
ovvero Maschera1.TxtBus
Se scrivo così mi dice che Maschera1 non è una variabile definita... eppure l'ho dichiarata quà:
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
Maschera1.TxtBus
TxtBus.Text = strSqlOrig
End Sub
![]()

Rispondi quotando