txtAdSoyad kutusunun çıkıldığında olayına
sonbos: soyaddan önceki boşluğun yeri
txtAdSoyad:Adsoyad metin kutusu
txtAd:Ad metin kutusu
txtSoyad:Soyad metin kutusu
InStrRev(metin, aranan karakter yada metin):metin aramaya sondan başlanır , baştan kaçıncı karakter
Kod:
SonBos = InStrRev(Me.txtAdSoyad, " ")
Me.txtAd = Mid(Me.txtAdSoyad, 1, SonBos - 1)
Me.txtSoyad = Mid(Me.txtAdSoyad, SonBos + 1)