Forms VisualBasic Script

Private Sub Form_Current()
    If Me.NewRecord Then
        Me.txtContactFirstName.SetFocus
    End If
End Sub