+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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)
+---- الموضوع : [vb6.0] نقل من Combo الي TEXT (/showthread.php?tid=17441)
نقل من Combo الي TEXT - iisys - 25-09-16
برفقه مثال يتكون من :
1- COMBO1
2- Text
combo1 يتكون من ارقام وحروف
المطلوب : عند الاختيار من Combo1 يتم نقل الارقام الي Text1
ونقل الحروف الي Text2
ارجو المساعدة
تحياتي للجميع
[attachment=11783]المرفق
RE: نقل من Combo الي TEXT - abulayth - 25-09-16
السلام عليكم
اخي الكريم الملف المرفق غير كامل
ارفق المثال كامل لكي يتم التعامل معه
يعطيك العافية
RE: نقل من Combo الي TEXT - iisys - 25-09-16
مرفق المثال
RE: نقل من Combo الي TEXT - سعود - 25-09-16
شوفو حيلتي
PHP كود :
Private Sub Combo1_Click()
Text1.Text = ""
Text2.Text = ""
For Each h In Split(Combo1.Text, " ")
If IsNumeric(h) Then
Text2.Text = h
Else
Text1.Text = Text1.Text & " " & h
End If
Next
End Sub
طريقتي ماتضبط الا اذا فيه فراغ
RE: نقل من Combo الي TEXT - سعود - 25-09-16
(25-09-16, 08:51 PM)Amir_alzubidy كتب : انبسط لما اشوف عنصر مهم من عناصر الدوت نت تتجول بقسمنا
عاشت الايادي اخوي سعود
ربي يحفظك
الصراحة الاصدار هذا يهدي الاعصاب يعمل بسرعة واقصد عند فتح البرنامج ....لكن لا ادري لماذا عند غلقه تظهر رسالة خطا من ميكروسوفت يعني يبحث عن حل
RE: نقل من Combo الي TEXT - سعود - 25-09-16
المشكلة ويندوز 10 على مااظن
حتى نسخة sp6 لم تكمل تحديث الاصدار
RE: نقل من Combo الي TEXT - iisys - 26-09-16
تسلم يمينك اخوي سعود
RE: نقل من Combo الي TEXT - iisys - 26-09-16
مع الشكر والتقديري اخي امير بارك الله فيك