培训vba代码中传递id的全局变量selectstr,g_CurrentSelectStrID 是文本型,但有些表中的id是数字型,这样在传递过程中,因数据类型不匹配会导致错误或无法新增删除记录。
因此我用了以下方法转换文本和数字型
selectstr = Str(Me.ID)
Call AccHelp_DeleteFldstrRow("tblaaaa", "id", Val(selectstr))
Me.RecordSource = "Select * FROM tblaaaa Where Id =" & Val(selectstr)
这几个地方对数据类型匹配要求很严。
但我把数字型id 赋值给g_CurrentSelectStrID,执行
Acchelp_FindstrRecord (g_CurrentSelectStrID)
倒没发生多大错误,估计这个Acchelp_FindstrRecord() 对数据类型不大计较。