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


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

.rar   text.rar (الحجم : 1.62 ك ب / التحميلات : 21)
الرد }}}}
تم الشكر بواسطة:
#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] كيف اغلاق ملف قاعدة بيانات اكسس مفتوحة من خلال برنامجي ؟؟ Microformt 3 26 منذ 3 ساعة مضت
آخر رد: Amir_alzubidy
  [سؤال] كود فتح و اغلاق قاعدة بيانات gharib 1 28 منذ 11 ساعة مضت
آخر رد: Amir_alzubidy
  من يقدر استبدال قاعد بيانات المثال المرفق ب (sqlite) scsi7000 1 57 19-09-17, 01:06 PM
آخر رد: Amir_alzubidy
  من لديه طريقه اذا امتلئت قاعده البيانات اكسس يقوم البرنامج بتصنيع قاعده بيانات من نفس scsi7000 7 154 18-09-17, 01:41 PM
آخر رد: عبد العزيز البسكري
Question [vb6.0] كيف اجعل خلفية Text شفافه ؟؟ Microformt 3 108 17-09-17, 06:49 PM
آخر رد: Microformt
  [كود] انشاء مجلدات من بيانات سجل ragabsayed 1 41 17-09-17, 09:18 AM
آخر رد: Ahmed_Mansoor
  [سؤال] كيفية عرض نص موجود على الانترنت داخل اداة مربع نص (الحصول على بيانات من صفحة ويب) Mohamad Anan 10 316 10-09-17, 11:54 PM
آخر رد: Mohamad Anan
Question [سؤال] كود لتغيير لون أكثر من text box تنمية المعرفة 4 139 10-09-17, 01:59 AM
آخر رد: تنمية المعرفة
  [سؤال] اظهار مؤشر الماوس و إخفاءه تلقائيا Alhootti1 6 134 05-09-17, 01:15 AM
آخر رد: Alhootti1
Rainbow [vb6.0] ماهي قاعدة بيانات اكسس و اين تستعمل و مثال مفتوح المصدر للفهم anoname 1 78 30-08-17, 07:34 AM
آخر رد: Ahmed_Mansoor

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


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