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)
Dim a, b As Integer
a = Len(metin1)
b = a - 2
Me.metin2 = Left(metin1, b)
Me.metin3 = Right(metin1, 2)
Bu Konudaki Yorumlar |
metin kutusuna yazılan verinin ilk 5 veya son 3 karakteri diğer metin kutusuna yazdır - Yazar: newcooo - 19/08/2009, 21:58
Cvp: metin kutusuna yazılan verinin ilk 5 veya son 3 karakteri diğer metin kutusuna yazdır - Yazar: ozanakkaya - 19/08/2009, 22:16
Cvp: metin kutusuna yazılan verinin ilk 5 veya son 3 karakteri diğer metin kutusuna yazdır - Yazar: newcooo - 19/08/2009, 22:31
Cvp: metin kutusuna yazılan verinin ilk 5 veya son 3 karakteri diğer metin kutusuna yazdır - Yazar: mehmetdemiral - 19/08/2009, 23:21
Cvp: metin kutusuna yazılan verinin ilk 5 veya son 3 karakteri diğer metin kutusuna yazdır - Yazar: newcooo - 19/08/2009, 23:29
|