تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] اظهار بيانات Combo1 في Text
#1
اظهار بيانات Combo1 في Text


الملفات المرفقة صورة/صور
   

.rar   text.rar (الحجم : 1.62 ك ب / التحميلات : 16)
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

جرب التالي

كود :
Private Sub Combo1_Click()
Dim x() As String
x = Split(Combo1.Text, " ")
Text1.Text = x(1) & x(2)
Text2.Text = x(0)
Text3.Text = x(4)
End Sub

بالتوفيق.
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , Ahmed_Mansoor
#3
(07-11-16, 12:48 AM)AL_BRNS كتب : السلام عليكم

جرب التالي

كود :
Private Sub Combo1_Click()
Dim x() As String
x = Split(Combo1.Text, " ")
Text1.Text = x(1) & x(2)
Text2.Text = x(0)
Text3.Text = x(4)
End Sub

بالتوفيق.

بارك الله فيك اخي الكريم AL_BRNS  وجزاك الله الف خير

عزيزي [b]AL_BRNS التعديل تمام ( فقط ) بالنسبة للنص الوقع بين الارقام والحروف يأتي متشابك ؟[/b]
الرد }}}}
تم الشكر بواسطة: AL_BRNS
#4
السلام عليكم

جرب التالي


كود :
Private Sub Combo1_Click()
Dim x() As String
x = Split(Combo1.Text, " ")
Text1.Text = x(1) & " " & x(2)
Text2.Text = x(0)
Text3.Text = x(4)
End Sub


 بالتوفيق اخي .
الرد }}}}
تم الشكر بواسطة: Ahmed_Mansoor , عبد العزيز البسكري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [vb6.0] هل يمكن من خلال البرامجة عمل قيمة افتراضية في Text ؟؟ Microformt 0 16 أمس, 02:46 PM
آخر رد: Microformt
  [سؤال] كيفية اضافة استعلام وحفظه في قاعدة بيانات أبوسعود 4 93 17-05-17, 02:56 PM
آخر رد: أبوسعود
  [سؤال] معرفة اسماء الجداول الموجودة داخل قاعدة بيانات أبوسعود 5 164 15-05-17, 11:28 PM
آخر رد: Ahmed_Mansoor
  [سؤال] كود اضافة سجلات لجدول موجود في قاعدة بيانات باستخدام الاداة adox أبوسعود 2 77 04-05-17, 03:28 AM
آخر رد: أبوسعود
  [vb6.0] ارجوا المساعدة في اظهار بيانات الفورم الأول في الفورم الثالث عبدالقادرعواد 2 98 22-04-17, 11:00 AM
آخر رد: عبدالقادرعواد
  [سؤال] ادوات ربط قواعد بيانات اكسس أبوسعود 3 120 19-04-17, 02:53 PM
آخر رد: عبد العزيز البسكري
  [vb6.0] ممكن شرح طريقة ربط في قاعدة بيانات واحدة بجدولين MSHFlexGrid2+MSHFlexGrid1 عبدالقادرعواد 3 107 11-04-17, 06:08 PM
آخر رد: sendbad100
  هل من الممكن تعديل بيانات عدد من السجلات في الجدول دفعة واحدة كنونو 6 189 01-04-17, 03:56 PM
آخر رد: كنونو
  [ تمّ الحل ] : التّعامل مع بيانات جداول مختلفة عبد العزيز البسكري 5 154 18-03-17, 05:39 AM
آخر رد: Ahmed_Mansoor
  نقل بيانات الإكسيل إلى الاكسيس Abdellah 2 105 11-03-17, 06:08 PM
آخر رد: Abdellah

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 2 ) ضيف كريم