关于在数据集内添加一条记录的小问题！！只是格式不懂，来拿分吧！！！

Question

报什么错误？这种方式没有试过，试一下这个：
CustName=InputBox("请输入您要增加的用户名：")
CustLTpe=InputBox("请输入您要增加用户的联系方式：")cust.AddNew
cust! 客户名 = CustName
cust! 联系方式 = CustLTpe
cust.UpdateBatch

Answer 1

dim a,b
a=InputBox("请输入您要增加的用户名：")
b=InputBox("请输入您要增加用户的联系方式：")
cm.commandtext="insert into 客户资料表(客户名,联系方式 ) values ('" & a & "','" & b & "')"
cm.execute