Call ConnecTion
Set RS = CreateObject("ADODB.RecordSet")
RS.Open "select *from 车价查询 where 价格 >" & Text3.Text, conn, 1, 1
Text1.Text = RS("品牌")
Text2.Text = RS("价格")
RS.Close
2016-10-20 10:47
2017-10-24 18:57
[此贴子已经被作者于2017-10-24 19:06编辑过]
2017-10-24 19:04