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

السلام عليكم اخواني الاعزاء 



ممكن كود نقل جميع البيانات من Multi textbox الى  combo box بنفس الترتيب بضغطت زر واحدة كما في الصورة المرفقة

(20-01-23, 11:29 PM)abu7shihab كتب : [ -> ]السلام عليكم اخواني الاعزاء 



ممكن كود نقل جميع البيانات من Multi textbox الى  combo box بنفس الترتيب بضغطت زر واحدة كما في الصورة المرفقة

و عليكم السلام و رحمة الله و بركاته
تفضل

(20-01-23, 11:43 PM)asmarsou كتب : [ -> ]

(20-01-23, 11:29 PM)abu7shihab كتب : [ -> ]السلام عليكم اخواني الاعزاء 



ممكن كود نقل جميع البيانات من Multi textbox الى  combo box بنفس الترتيب بضغطت زر واحدة كما في الصورة المرفقة

و عليكم السلام و رحمة الله و بركاته
تفضل

PHP كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim i As Long
        Dim a() As String

        a = Split(TextBox1.Text, vbCrLf)

        For i = LBound(a) To UBound(a)
            ComboBox1.Items.Add(a(i))
            ComboBox1.SelectedIndex = 0
        Next

    End Sub 


هو المطلوب اخي العزيز asmarsou 


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

(20-01-23, 11:58 PM)abu7shihab كتب : [ -> ]

(20-01-23, 11:43 PM)asmarsou كتب : [ -> ]

(20-01-23, 11:29 PM)abu7shihab كتب : [ -> ]السلام عليكم اخواني الاعزاء 



ممكن كود نقل جميع البيانات من Multi textbox الى  combo box بنفس الترتيب بضغطت زر واحدة كما في الصورة المرفقة

و عليكم السلام و رحمة الله و بركاته
تفضل

PHP كود :

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim i As Long
        Dim a() As String

        a = Split(TextBox1.Text, vbCrLf)

        For i = LBound(a) To UBound(a)
            ComboBox1.Items.Add(a(i))
            ComboBox1.SelectedIndex = 0
        Next

    End Sub 


هو المطلوب اخي العزيز asmarsou 


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

وفيك بارك الله

وهذا كود عكسي ينقل جميع البيانات من combo box الى Multi textbox بنفس الترتيب بضغطت زر واحدة

Dim i As Long
For i = 0 To ComboBox1.Items.Count - 1
TextBox1.Text = TextBox1.Text & ComboBox1.Items(i) & vbNewLine
Next

للفائدة

ممكن كذا ايضا:

(21-01-23, 08:52 AM)سعود كتب : [ -> ]ممكن كذا ايضا:

PHP كود :

ListBox1.Items.AddRange(TextBox1.Lines) 


وهذا عكس الكود لنقل العناصر من ComboBox الى TextBox