3. altforma geçiş için 2. altformun "TelefonnoA" metin kutusuna benzeri kod eklemelisin.
Private Sub TelefonnoA_Exit(Cancel As Integer)
If Forms!frm_odabilgileri!Kisisayisi.Value = 2 Then
Me.Parent.SetFocus
Me.Parent![KISI1].SetFocus
Me.Parent![KISI1].Form![Tckimlikno].SetFocus
End If
End Sub