只需一步,快速开始
使用道具 举报
以下是引用andrewzeng在2006-5-23 19: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 上面的语句出来什么问题呢,请问各位高人,怎样修改才行呢
本版积分规则 发表回复 回帖后跳转到最后一页
|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )
GMT+8, 2024-11-15 18:56 , Processed in 0.085455 second(s), 26 queries .
Powered by Discuz! X3.3
© 2001-2017 Comsenz Inc.