VB.NET SQL จะเอาข้อมูลจากฐานข้อมูล มาแสดงใน Combobox แต่ทว่า เกิด Error รบกวนช่วยดูทีนะครับ

 Private Sub Import_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim reader As SqlDataReader
            Try
                cn.Open()
                Dim query As String
                query = ("Select * from Import")
                cmd = New SqlCommand(query, cn)
                reader = cmd.ExecuteReader
                While reader.Read
                    Dim country = reader.GetString("Country")
                    ComboBox1.Items.Add(country)

                End While

            Catch ex As Exception
                MessageBox.Show(ex.Message)
            End Try
End Sub