ربط تكست بوكس بي كومبو بوكس - نسخة قابلة للطباعة

ربط تكست بوكس بي كومبو بوكس - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (https://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (https://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (https://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ربط تكست بوكس بي كومبو بوكس (/showthread.php?tid=24421)

ربط تكست بوكس بي كومبو بوكس - mawadaalmogrbi - 04-04-18

السلام عليكم اخواتي عندي منظومة يوجد بها الرقم الوظيفي واسم الموظف بنسال ع طريقة بمجرد ادخال الرقم الوظيقي يظهر اسمه تلقائيا في الكومبو يااريت تساعدوني ضروري وشكرا مقدما

RE: ربط تكست بوكس بي كومبو بوكس - سعود الشامان - 04-04-18

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

هنالك عدة طرق لذالككك

[صورة مرفقة: 1522863633352.png]

رابط المثال :

http://sr83a.com/up/Sr/1522863633351.zip

الكود بالكامل :

كود :
Public Class Form1

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

        Dim saud As String

        saud = ComboBox1.SelectedIndex

        Select Case ComboBox1.Text

            Case "احمد"

                TextBox1.Text = "احمد"

                TextBox2.Text = "11223"

                TextBox3.Text = "3000"

            Case "محمد"

                TextBox1.Text = "محمد"

                TextBox2.Text = "11222"

                TextBox3.Text = "5000"

        End Select

    End Sub

End Class

للإكمال التلقائي إجعل إعدادات الكومبو بوكس بهذا الشكل