"ozetbilgi" isimli metin kutusunun değiştiğinde olayına

Dim harfsayisi As String

harfsayisi = Me.ozetbilgi.Text

If Len(harfsayisi) = "2030" Then

DoCmd.GoToControl "ozetbilgi2"

End If

yaz