VBA/Excel/Access/Word/Forms/Focus

Материал из VB Эксперт
Перейти к: навигация, поиск

If current record is new record, grab the focus

 
Private Sub Form_Current()
    If Me.NewRecord Then
        Me.txtContactFirstName.SetFocus
    End If
End Sub
Источник — «http://vbex.ru/index.php?title=VBA/Excel/Access/Word/Forms/Focus&oldid=1922»