AccessTr.neT

Tam Versiyon: metin kutusuna yazılan verinin ilk 5 veya son 3 karakteri diğer metin kutusuna yazdır
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Ustalar bir metin kutusuna zafer123 yazdım diğer 2 metin kutusuna zafer ve 123 yazdırmak istiyorum yardımcı olursanız sevinir..
Örneğinizi düzenleyerek ekledim. Lütfen örnek uygulamalarınızı sıkıştırma programlarıyla sıkıştırarak ekleyiniz.
sn sledgeab
sıkıştırma için kusura bakmayın..
yaptığınız örneğe baktım ilginiz için teşekkür ederim..
yalnız yaptığınız örnekte sayılar ve metin lar olarak ayrılıyor..
benim yapmak istediğim yazılan metnin son 2 karakteri ayrı metin kutusuna yazdırmak istiyorum.. son iki karakter sayı ve metin olabilir..
örnek...........
metin1: sdja1
metin2:sdj
metin3:a1
Sayın newcoo
Admin'in kodlarını şu şekilde düzeltin

Kod:
Dim a, b As Integer
a = Len(metin1)
b = a - 2
Me.metin2 = Left(metin1, b)

Me.metin3 = Right(metin1, 2)

Kolay gelsin
sn mehmetdemiral
ilginiz için teşekkürler sağolun
verdiğiniz kodlar ile istediğim şeyi gerçekleştirdim..