设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
楼主: andymark
打印 上一主题 下一主题

[测试]Acc Skin 通用界面

[复制链接]
151#
发表于 2012-5-8 17:11:41 | 只看该作者
   If CStr(Me![密码]) = STemp Then
                UserID = Me![用户编号]
                DoCmd.Close , , acSaveNo
            Else
                MsgBox "您输入的密码不正确!", vbCritical, "密码错误"
                Me.Requery
                Me![密码].SetFocus
            End If
        End If
    End If
Exit_用户登录_Click:
    Exit Sub
Err_用户登录_Click:
    MsgBox Err.Description
    Resume Exit_用户登录_Click
End Sub
152#
发表于 2012-8-21 21:41:43 | 只看该作者
顶一个。。。
153#
发表于 2012-9-5 22:38:57 | 只看该作者
坚决回帖,决不含糊。
154#
发表于 2012-9-5 23:55:19 | 只看该作者
155#
发表于 2012-9-17 01:28:05 | 只看该作者
通用查询实例
156#
发表于 2012-9-21 10:15:26 | 只看该作者
好东西
支持一下

点击这里给我发消息

157#
发表于 2012-11-11 14:20:18 | 只看该作者
学习先..
158#
发表于 2012-12-1 22:13:32 | 只看该作者
强烈支持!!!
159#
发表于 2013-3-5 20:44:25 | 只看该作者
顶顶顶顶顶顶顶

点击这里给我发消息

160#
发表于 2013-3-5 23:51:41 | 只看该作者
好东西
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-27 06:32 , Processed in 0.128212 second(s), 33 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表