关于vb的语法错误问题，怎么改正呢

andrewzeng · 发表于 2006-5-24 03:42:00

Private Sub img6_Click()
   Dim stID As String
   stID = "[Table]![密码表]![用户ID]"
If stID <> 1 Then
      Msg ("您没有权限打开此窗口")

ElseIf stID = 1 Then

DoCmd.OpenForm "窗体5", , , , , acWindowNormal

End If
End Sub

上面的语句出来什么问题呢，请问各位高人，怎样修改才行呢

andymark · 发表于 2006-5-24 04:24:00

把"[Table]![密码表]![用户ID]" 的" " 去掉试试

andrewzeng · 发表于 2006-5-24 04:33:00

去掉尝试过一次，但还是不行。还有没有其他办法呢，谢谢andymark的帮忙

tz-chf · 发表于 2006-5-24 04:37:00

看不懂，伪代码是什么？

fan0217 · 发表于 2006-5-24 04:38:00

stID = "[Table]![密码表]![用户ID]"这句使用dlookup函数试试。

andymark · 发表于 2006-5-24 04:40:00

把例子传上来看看

okmijn · 发表于 2006-5-24 05:34:00

"[Table]![密码表]![用户ID

引用不对

andrewzeng · 发表于 2006-5-24 05:40:00

麻烦帮我看一下了

fan0217 · 发表于 2006-5-24 06:00:00

stID = DLookup("用户ID", "密码表", "职务='administrator '")

andrewzeng · 发表于 2006-5-24 06:54:00

不好意思，可能是我刚才传东东误导了大家的想法。我本意是想比如说以1的身份进入的话就可以按"进入"按钮进入到另一个窗体，如果以2或3 的身份就不能进入到另一个窗体。刚才fan0217 的方法是可以打开另一个窗体，但没能达到以上所述的效果。我现在把更完整些的数据库上传，麻烦大家再帮我想一下，我今晚是忙了一晚都没有结果，有点郁闷。在此非常感谢大家的热情帮助

密码    账号

1             a

2             b

3             c

[此贴子已经被作者于2006-5-23 22:55:53编辑过]

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

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

主题相关群

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

[其它] 关于vb的语法错误问题，怎么改正呢

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

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