28-08-19, 10:19 AM
(28-08-19, 01:02 AM)ابراهيم ايبو كتب : السلام عليكم اخي فؤاد
ضع مربع نص عدد2 و Button واكتب فيه هذا الكود
وعند التشغيل اكتب ماتريد في التكست الاول لتظهر الجملة معكوسة في التكست الثانيكود :
textbox2.Text = StrReverse(TextBox1.Text)
عفوا اخي
تفضل اخي هذه اذا كانت اريع خانات
كود :
Dim kk() As Char = TextBox1.Text.ToCharArray()
TextBox2.Text = kk(2) & kk(3) & kk(0) & kk(1)
(28-08-19, 01:13 AM)سعود كتب :kk(2) & kk(3) & kk(0) & kk(1)برضو حيمشي مع الدوت نتPHP كود :
Text2.Text = Mid(Text1.Text, 3, 2)
Text2.Text = Text2.Text & Mid(Text1.Text, 1, 2)
شكرا لردكم الجميل
ولكن اذا كانت السلسلة طويلة
