设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1825|回复: 6
打印 上一主题 下一主题

[Access本身] 新手提问,如何修改会自动运行的MDB啊

[复制链接]
跳转到指定楼层
1#
发表于 2011-5-25 23:35:43 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
才学access,网上下载了一个MDB.直接点击打开就会运行它设计好的界面.可我想学习他里面的内容,如表怎样,窗体怎么设计,代码怎么写等...但是没有了一般的那个access管理窗口,不知道怎么打开了,请教各位.
是一个进销存管理系统,见附件.

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2011-5-26 13:43:09 | 只看该作者
1、按下Shift键再双击打开(还好,这个附件没有禁用)。
2、如果想下次不需要按下shift键,请点击工具\启动改为“无”:

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
3#
发表于 2011-5-26 15:09:03 | 只看该作者
Shift键的启动以及屏蔽代码,软件封装的时候加进去
示例,新建一个窗体,增加两个按钮,名称分别为Command0,Command1

为Command0增加点击代码为:

Private Sub Command0_Click()
If MsgBox("你确认要启用Shift键吗?", vbYesNo + vbQuestion + vbDefaultButton2, "提示") = vbYes Then
       OpenBypassKey
    End If
End Sub

为Command1增加点击代码为:

Private Sub Command1_Click()
If MsgBox("你确认要禁用Shift键吗?", vbYesNo + vbQuestion +

vbDefaultButton2, "提示") = vbYes Then
       CloseBypassKey
    End If
End Sub
4#
发表于 2011-5-26 15:10:24 | 只看该作者
用select case  联入只有你才能进去的窗体,这个可以说是后门吧,以后的开发改进都的从这个地方进入了
5#
 楼主| 发表于 2011-5-26 18:31:22 | 只看该作者
本帖最后由 dejoy 于 2011-5-26 18:49 编辑

谢谢楼上的回答,但我是小白菜,我这就试试
2楼的方法真的可以,但3楼的方法我不太明白是什么意思?能请解释下么,谢谢了
6#
发表于 2011-5-26 20:57:35 | 只看该作者
其实就是屏蔽SHIFT与否,你可以专门做个,窗体,只允许你进入,控制shift键,因为它可以不经密码,直接进入你的后台
7#
发表于 2011-5-26 20:58:18 | 只看该作者
我用的是2007,估计你的是2003,
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-10-2 12:14 , Processed in 0.090767 second(s), 32 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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