做个小结: 1. 定义打开链接: Dim cnn as SqlConnection = New SqlConnection(CONNECTIONSTRING) cnn.open 2. 定义读取适配器 Dim da as New SqlDataAdapter() da.SelectCommand = new SqlCommand("SELECT * FROM TAB", cnn) '如果有参数 da.SelectCommand.Parameters.Add(..) 3. 定义DateSet接收数据 Dim ds as DataSet da.Fill(ds,"TABLENAME") Dim dt as DataTable dt = ds.Tables(0) 如果要访问某条记录上的某列: dt.Rows(0).Item(0)