string mySelectQuery = "SELECT user_id, user_name, user_pwd, dept_id, user_order FROM dbo.[user]"
    SqlConnection myConnection = new SqlConnection(myConnString);
    SqlCommand myCommand = new SqlCommand(mySelectQuery,myConnection);
    myConnection.Open();
    SqlDataReader myReader;
    myReader = myCommand.ExecuteReader();
    string aa;
    while (myReader.Read()) 
{
 aa = rs("user_name")
 listBox1.Items.Add("aa")
}
myConnection.Close();

解决方案 »

  1.   

    Dim rs As System.Data.OleDb.OleDataReader
    Dim conn As New System.Data.OleDb.OleDbConnection("Provider=SQLOLEDB;driver={SQL Server};server=shanle;uid=sa;pwd=sa;database=jnjl")
    Dim cmd As New System.Data.OleDb.OleDbCommand()
    'Dim sql As String
    conn.Open()
    cmd.Connection = conn
    'sql = "SELECT user_id, user_name, user_pwd, dept_id, user_order FROM dbo.[user]"
    cmd.CommandText = "SELECT user_id, user_name, user_pwd, dept_id, user_order FROM dbo.[user]"rs = cmd.ExecuteReader()
    While rs.Read()
       Dim aa
       aa = rs("user_name")
       ListBox1.Items.Add("aa")
       'ListBox1.Items.Add(rs("user_name")) 
    End While
      

  2.   

    to  timmy3310(Tim)
    还是错误,错误出现在
    rs = cmd.ExecuteReader()
    While rs.Read()
    提示是不能转化成一维数组,怎么回事?
      

  3.   

    Dim rs As System.Data.OleDb.OleDataReader
    不是
    Dim rs As System.Data.OleDb.OleDataReader()