منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
لديا قيمة في تاكست بوكس اريد تحويلها - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : لديا قيمة في تاكست بوكس اريد تحويلها (/showthread.php?tid=21703)



لديا قيمة في تاكست بوكس اريد تحويلها - wolf1120 - 14-09-17

السلام عليكم ورحمة اله وبركته

لديا قيمة في تاكست بوكس اريد تحويلها الى المثال التالى

مثلا

عندى  1DA811     اريد  ارجاعها الى 11A81D

انشاء الله الفكرة وصلت للمبدعين في الفيجول بسيك


RE: لديا قيمة في تاكست بوكس اريد تحويلها - أبو نوره - 14-09-17

مرحبا اخى

اذا كان الطول ثابت 6حروف
PHP كود :
Dim s As String
"1DA811"

Dim r As String
Mid$(s52) & Mid$(s32) & Mid$(s12)

MsgBox r 



RE: لديا قيمة في تاكست بوكس اريد تحويلها - wolf1120 - 14-09-17

بارك الله فيك اخي ابو نورة