哪儿出问题了?

kelind · 发表于 2005-7-20 00:12:00

表中有字段: id, 机号,起数,止数.(上班止数=本班起数)

查"机号"=me.机号时,ID号最大的记录中的止数,填充起数.

Dim jh As String

Dim qs As Single

Dim IID As Integer

jh = Me.机号

IID = DMax("[id]", "tabl加油站流水表", "机号='" & jh & "'")

Dim jh As String

Dim qs As Single

Dim IID As Integer

jh = Me.机号

IID = DMax("[id]", "tabl加油站流水表", "机号='" & jh & "'")

qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' And id =IID")

Me.起数.Value = qs

改: qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' And id = ' IID ' ")

又: qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' " And " id =' IID ' ")

还是"类型不匹配",痛苦!!!

请指教!

kelind · 发表于 2005-7-20 00:14:00

哪儿出问题了?

表中有字段: id, 机号,起数,止数.(上班止数=本班起数)查"机号"=me.机号时,ID号最大的记录中的止数,填充起数.Dim jh As String

Dim qs As Single

Dim IID As Integer

jh = Me.机号

IID = DMax("[id]", "tabl加油站流水表", "机号='" & jh & "'")

qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' And id =IID")

Me.起数.Value = qs

改: qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' And id = ' IID ' ")又: qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' " And " id =' IID ' ")还是"类型不匹配",痛苦!!!请指教!

海狸先生 · 发表于 2005-7-20 01:26:00

qs = DLookup("[止数]", "tabl加油站流水表", " 机号='" & jh & "' And id =" & IID & "")

[此贴子已经被作者于2005-7-19 17:26:28编辑过]

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[其它] 哪儿出问题了?

群介绍
主题无相 (随机显示版	同地区群块其他地区)