سؤال بربط تاكست بعدة تاكسات - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=1759)

سؤال بربط تاكست بعدة تاكسات - wolf1120 - 30-01-14 سؤال بربط تاكست بعدة تاكسات لدينا 5 text و command بحيث text 1 فيه قيمة 166 00 45 123 المطلوب عند الضغط على زر command تطلع النتيجة على الشكل : text2 =123 text3 = 45 text4 = 00 text2 =166 انا استعملت هذه الدالة لكنها بتطلع فى msgbox وليس داخل التاكست On Error Resume Next Dim a() As String a() = Split(Text1.Text, " ") For i = 0 To Val(a(Index)) MsgBox a(i) Next اريد الغاء عمل msgbox المثال فى المرفقات RE: سؤال بربط تاكست بعدة تاكسات - السيد الغالي - 30-01-14 تفضل اخي هذا الكود يفي بالغرض Text2.Text = Split(Text1, " ")(0 Text3.Text = Split(Text1, " ")(1 Text4.Text = Split(Text1, " ")(2 Text5.Text = Split(Text1, " ")(3 مع مراعاة وضع الاقواس هكذا يصبح (0) و (1) و (2) و (3) لاني اجد مشكلة بكتابة الكود بصورة كاملة تحياتي...[/align][/font][/php][/code]