Dim dt As DataTable Dim cmd As New SQLCommand cmd.C cmd.CommandText = "Se lect 借方金额,贷方金额,科目名称,账面科目,账面项目 From {明细账} Where 账面科目 = e.form.Controls("ComboBox1").text And 账面项目 = e.form.Controls("ComboBox2").text " '注意要包括主键列 dt = cmd.ExecuteReader(True) '注意可选参数设置为True