AccessTr.neT
İsim ve Soyismi ayırarak farklı kutulara yazma örneği - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Örnekleri ve Uygulamaları (https://accesstr.net/forum-access-ornekleri-ve-uygulamalari.html)
+--- Konu Başlığı: İsim ve Soyismi ayırarak farklı kutulara yazma örneği (/konu-isim-ve-soyismi-ayirarak-farkli-kutulara-yazma-ornegi.html)

Sayfalar: 1 2


Cvp: İsim ve Soyismi ayırarak farklı kutulara yazma örneği - mühendis58 - 15/10/2012

abiler ablalar bana müşteri girisi yapıp. Arazi bilgilerini girip ektiği ürünü belirleyip ona göre gelir gider analizi yapacağım bir program lazım ha birde yılda kaç kez kontrole gittim onu da belirtecek. yani mantık olarak 1. sayfamızda kişisel bilgiler 2. sayfamızda ÇKS (çiftçi kayıt sişstemi bilgileri) 3. sayfamızda kontrol ve tavsiyeler sayfası 4. sayfamızda Çks bilgilerine göre veri ve hesaplama gelr gider analizi son sayfamızda ise değerlendirme ve raporlama. hadi şimdiden Allah razı olsun bakalım kimler ilminin zekatını verecek


Cvp: İsim ve Soyismi ayırarak farklı kutulara yazma örneği - C*e*l*o*y*c*e - 15/10/2012

Merhaba Sayın mühendis58
dediğiniz şeyler hemen yapalım demek ile olmaz,ayrıca bu sitemizde siz başlayıp yapacaksınız biz size takıldıgınız yerde yardım edeceğiz kural bu ,yada bu istedikleriniz özel bir iş olarak ücret karşılığı yapılır,bunun için yönetimle irtibata geçin seçim sizin ..kolay gelsin


Cvp: İsim ve Soyismi ayırarak farklı kutulara yazma örneği - raindorfler - 09/03/2019

Konuyu hortlatayım ve bilginin her zaman gerekli olduğu ortaya çıksın Img-grin

Bu örnekte tek isim kullanılmış. İki isim olursa nasıl yaparız? İsim ve soy isim girildiği anda ayırma işlemi yapabilir mi?

Teşekkürler...


Cvp: İsim ve Soyismi ayırarak farklı kutulara yazma örneği - berduş - 09/03/2019

kaç isimli olursa olsun son kelimeyi soyisim olarak ayırır
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)