我需要一个能够显示某些人的价格并隐藏其他人的表单,但这是一个列表框。 我该怎么办? 我找到的唯一解决方案是改变cols宽度,但实际上并不是......
答案 0 :(得分:2)
如果您已内置安全性,则可以根据Windows登录或Access登录设置列表框或组合框rowsource / recordsource详细信息。
与Login API结合使用的某种If语句,您可以通过Google搜索找到它。一个例子就像下面一样(在on load事件上这可能吗?) -
Dim UserName As String
UserName = GetUserName_TSB'这是从LoginAPI函数中提取的Windows登录
如果UserName =" XXXX"或者UserName =" XXXXX"或者UserName =" XXXXX"或者UserName =" XXXX"然后
Me.combobox.rowsource ='为您的表/数据创建SELECT SQL查询。
否则
Me.combobox.rowsource ='为您的表/数据为其他用户创建SELECT SQL查询
结束如果