一、微信课堂群Access学友问题描述:
爱好者:石家庄--鹿先生39397767 14:20:32
我用咱们Access软件网张志老师编写的微信课堂教材
《Access快速开发基础教程》,在Access快速开发平台基础上开发了一个自己用的《财务经济管理系统》有一个小问题,我做了打开窗口“
银行”就自动下拉选择数据的功能,但是“
财务”角色的帐号登录在付款的时候实际上用不到选银行之类的,这个在“
财务”帐号登录的时候怎么可以不下拉呢?
其他角色帐号登录,除“
财务”角色之外的帐号登录,还是需要默认自动下拉选择数据的功能,如下图:
二、解决方法:
If GetParameter("Current User Username") = "财务帐号用户名" Then
Me.银行.SetFocus
Else
'让银行打开后自动获取焦点
Me.银行.SetFocus
'自动展开下拉框
Me.银行.Dropdown
End If
顺便附上用Access快速开发平台2.4.1.412版本开发的这个完整的《财务经济管理系统》源码供大家学习参考。
附 件:
点击下载此软件(32位)源码
点击下载此软件(64位)源码
按住
shift键不放,再打开
Main.mdb数据库文件可以进入设计视图,查看源代码设计。
测试帐号如下:
管理员的帐号:
admin 密码:
admin
财务员的帐号:
caiwu 密码:
123456
普通用户帐号:
lcw 密码:
123456
图 示: