[ZEEN4ZEEN]

السلام عليكم
لمدا هدا الكود لا يشتغل
 Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

       Try

           fillCombo("SELECT * FROM msarahin", ComboBox1)
           ComboBox1.DisplayMember = "msarahin"
           ComboBox1.ValueMember = "MSARH_NAM"
       

           TextBox16.Text = ComboBox1.SelectedText.ToString()




       Catch ex As Exception
           MsgBox(ex.Message)

       End Try

   End Sub



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

        Try

            TextBox16.Text = ComboBox1.SelectedText.ToString()

        Catch ex As Exception

        End Try




    End Sub