利用VBA从Access数据库中查找数据？

你可以用sql语句

insert

into

表名(字段1,字段2)

values（'字段1内容','字段2内容'）

可以用vba和access链接后

用update功能

rst.addnew

...'添加的内容

rst.update

Strwhere = Strwhere &"(BasicInformationofParts.Part_No) like " &Me.P1.Value

改为 Strwhere = Strwhere &"(BasicInformationofParts.Part_No) like '" &Me.P1.Value &"'"

PND=dlookup("pname","part_name_discription")

---