Skip to main content

AccessTr.neT


İsimleri Ad ve Soyad şeklinde Ayırma Ve Tablo Güncelleme.

İsimleri Ad ve Soyad şeklinde Ayırma Ve Tablo Güncelleme.

#5
dilerim işinize yarar
temel mantık aşağıdaki gibidir
Dim Uzunlk, x As Integer
Dim Hrf As String
Uzunlk = Len(Me.txtHepsi)
For x = 1 To Uzunlk
Hrf = Mid(Me.txtHepsi, x, 1)
If IsNumeric(Hrf) Then Me.txtsayi = Me.txtsayi & Hrf Else Me.txtMetin = Me.txtMetin & Hrf
Next x
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Cvp: İsimleri Ad ve Soyad şeklinde Ayırma Ve Tablo Güncelleme. - Yazar: berduş - 29/10/2019, 23:20
Task