[求助]cg1过来看看？

yumen · 发表于 2004-8-31 08:51

大家看看我的代码为什么不能编译啊

a= DLookup("[名称]", "pass", "[名称]＝'" & Me.mc& "'")

[此贴子已经被作者于2004-8-31 8:53:56编辑过]

yumen · 发表于 2004-8-31 12:46

Private Sub button1_Click() Dim a As String Dim b As String Dim c As String If IsNull(Me.mc) = True Thenb = DLookup("[名称]", "pass", "[名称]='" & Me.mc.Column(1) & "'")

End If

End Sub

我想用vlookup做密码判断，但是不行我的上面是有个&不小心掉了。而且me.mc.column(1)也没有column这个用法啊，急！

yumen · 发表于 2004-8-31 12:49

运行了后提示说：方法和数据成员未找到？在此先谢谢loadhigh斑竹

cg1 · 发表于 2004-9-1 08:43

a= nz(DLookup("[名称]", "pass", "[名称]='" & nz(Me.mc,"") & "'"),"")

loadhigh · 发表于 2004-8-31 12:08

yumen:你好!

从语法上看少了个&

应该是:b=DLookup("[名称]","pass","[名称]='"&Me.mc.Column(1)&"'")

		自动登录	找回密码
密码			免费注册