المساعد الشخصي الرقمي

مشاهدة نسخة كاملة : كود قلب النص

malk
02-06-07, 02:43 PM
هذا الكود لقلب النص مثلاً (على) تصبح (ىلع)

Private Sub Command1_Click()
Mystr = Text1.Text
Mystr = StrReverse(Mystr)
Text2.Text = Mystr
End Sub
sniperser
05-06-07, 04:52 PM
ألف شكر أفادني الكود
العولقي11
07-06-07, 11:57 PM
مشكورررررررررررررررررررررررررررررر
Ab_Shamali
23-01-08, 06:27 PM
ألف شكر