请教VBA代码，string 或者 long 的实例问题

彭先生　发表于：2020-06-21 15:05:05 　

以下代码有个问题：Forms!frm_入库单.DDID里必须输入纯数字，这些代码才能用，，如果DDID里输入英文子母+数字，就会提示：至少一个参数没有被指定值，这是咋回事？研究好几天了都没搞出来，请各位帮邦忙

把这句：Dim instockID As long改成Dim instockID As String 也不行。

Private Sub productlist_DblClick(Cancel As Integer)

Dim selectID As String
Dim instockID As long
selectID = productlist.Column(0)
instockID = Forms!frm_入库单.DDID
CurrentProject.Connection.Execute "insert into tbl_instockDetail(DDID,productID) values(" & instockID & ",'" & selectID & "')"
Forms!frm_入库单.frmchild.Requery

End Sub

Top

leoyoung 发表于：2020-06-21 21:54:45

尝试：字段设置为文本

Dim instockID As long 修改为Dim instockID As String

当然后面的Sql语句中引用的变量instockID前后需要增加单引号。

Top

芊芊发表于：2020-06-24 09:58:33

尝试：字段设置为文本

Dim instockID As long 修改为Dim instockID As String

当然后面的Sql语句中引用的变量instockID前后需要增加单引号。

CurrentProject.Connection.Execute "insert into tbl_instockDetail(DDID,productID) values('" & instockID & "','" & selectID & "')"

CurrentProject.Connection.Execute "insert into tbl_instockDetail(DDID,productID) values(" & instockID & ",'" & selectID & "')"
Forms!frm_入库单.frmchild.Requery

End Sub

Top

总记录：2篇页次：1/1 9 1 :

Access交流中心

请教VBA代码，string 或者 long 的实例问题