[سعود الشامان]

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

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






رابط المثال :

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

---

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