[vb2010]

كتبت التالى و لا يحدث شىء 

PHP كود :

Private Sub Cmbpurchasebillheader_supplier_id_TabIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Cmbpurchasebillheader_supplier_id.TabIndexChanged
        Dim dt_Supplier_phone As New DataTable
        Dim da_Supplier_phone As New SqlDataAdapter
        If Cmbpurchasebillheader_supplier_id.Text <> Nothing Then 'اذا التكستبوكس لم يكن فاضى
            'الحصول على تفاصيل المورد
            Try
                dt_Supplier_phone.Clear()
                da_Supplier_phone = New SqlDataAdapter("select * from supplier where supplier_name=N'" & Cmbpurchasebillheader_supplier_id.Text & "'", Con)
                da_Supplier_phone.Fill(dt_Supplier_phone)
                LbltChoseSupplier_phone.DataBindings.Clear()
                LbltChoseSupplier_phone.DataBindings.Add("text", dt_Supplier_phone, "supplier_phone")
                Cmbpurchasebillheader_supplier_id.Select()
            Catch ex As Exception

            End Try
        Else
            dt_Supplier_phone.Clear()
            Dgv_purchasebillheaderfooter.DataSource = Nothing
        End If
    End Sub 


و اضفت حرف n فى جمله select لنه sql server