[急]vb2008一问

有冇Ching识将Access既某一栏资料导入Combo box到Access名=Students
指定栏资料=StudentNo


以下系Code
Public Class del

    Private Sub del_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim cs As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\admin\Desktop\studentSy1\sdb.mdb"
        Dim cn As OleDbConnection = New OleDbConnection(cs)
        cn.Open()
        Dim sql As String = "SELECT  * FROM Students "
        Dim cmd As OleDbCommand = New OleDbCommand(sql, cn)
        Dim dr As OleDbDataReader = cmd.ExecuteReader
        While (dr.Read)
            Me.ComboBox1.Items.Add(dr.GetString(0) & "," & dr.GetString(1))
        End While
        cn.Close()
    End Sub
End Class

问问题的ABC都唔识??
有咩error messaga 弹出来, copy 一堆code 出来想人地点??

很容易, e-mail 给我再详谈([email protected])