منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

برفقه مثال يتكون من :

1- COMBO1
2- Text

combo1 يتكون من ارقام وحروف

المطلوب : عند الاختيار من Combo1 يتم نقل الارقام الي Text1
ونقل الحروف الي Text2

ارجو المساعدة

تحياتي للجميع

[attachment=11783]المرفق

السلام عليكم

اخي الكريم الملف المرفق غير كامل

ارفق المثال كامل لكي يتم التعامل معه

يعطيك العافية

مرفق المثال

شوفو حيلتي Smile

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 