cmbFindSatf_AfterUpdate secundario privado ()
Rs déviles como objeto
'Me.FilterOn = falso
Fijar los rs = Me.Recordset.Clone
¡rs.FindFirst “[SATF_NO] =” y yo! [cmbFindSatf]. Columna (1)
Si no rs.EOF entonces Me.Bookmark = rs. Señal
Me.Refresh
Submarino del extremo
'si el campo [SATF_NO] es uso del texto esto los códigos
cmbFindSatf_AfterUpdate secundario privado ()
Rs déviles como objeto
'Me.FilterOn = falso
Fijar los rs = Me.Recordset.Clone
¡rs.FindFirst “[SATF_NO] = “” y yo! [cmbFindSatf]. Columna (1) y “” “
Si no rs.EOF entonces Me.Bookmark = rs. Señal
Me.Refresh
Submarino del extremo
|