设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

[其它] 求助如何用EXCEL做登陆框

[复制链接]
跳转到指定楼层
1#
发表于 2008-1-4 09:29:59 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
RT了,高手们帮帮忙啦,万分感谢啦
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-1-4 09:35:54 | 只看该作者
请问登陆框长得什么样?

点击这里给我发消息

3#
发表于 2008-1-4 10:11:30 | 只看该作者
E一般不需要登录框的,如果确实要做那就是用代码写个MSGBOX了。
4#
 楼主| 发表于 2008-1-4 10:20:09 | 只看该作者
原帖由 pureshadow 于 2008-1-4 10:11 发表
E一般不需要登录框的,如果确实要做那就是用代码写个MSGBOX了。

能帮写个代码吗
大致框架是这样的,代码不会写

本帖子中包含更多资源

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

x
5#
发表于 2008-1-4 12:16:05 | 只看该作者
1.先作个窗体,窗体上,建几个Label 。  Label.caption的属性上,写好,用户名,密码之类,再创建2个CommandButton命令按钮,取名为登陆和取消。
2.在Private Sub Workbook_Open()写入代码。
Application.Visible = False
userform1.show
end sub
3.还要注意这个登陆的窗体的X功能失效 可以用下面代码
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode <> 1 Then Cancel = True
End Sub
4.当密码和用户名不对时,就不能进入后面的程序
5.记得关闭程序时,别忘记带上一句
Application.Visible = true
我就提这一点,网上列子很多,自己多学学,不然就算你会登陆的界面了,后面的程序还是不会写的,---小爪
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-6-8 23:49 , Processed in 0.109489 second(s), 30 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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