
Adodc1.RecordSource = "select * form 实验 where 货物编号='" & Text2.Text & "'"这句改为:Adodc1.RecordSource = "select * from 实验 where 货物编号='" & Text2.Text & "'"如果“货物编号”字段是数字型的话,改为:Adodc1.RecordSource = "select * from 实验 where 货物编号=" & val(Text2.Text)

Adodc1.RecordSource = "select * form 实验 where 货物编号='" & Text2.Text & "'"这句改为:Adodc1.RecordSource = "select * from 实验 where 货物编号='" & Text2.Text & "'"如果“货物编号”字段是数字型的话,改为:Adodc1.RecordSource = "select * from 实验 where 货物编号=" & val(Text2.Text)