新增文章
文章标题
分类
C#
云星空
K3 BOS
K3 功能
用友
Oracle
python
SQL
MySql
PHP
HTML
script
windows
Access
影视后期
财务
服务
生活
内容
使用Access的DoCmd对象来控制用户界面 DoCmd.SelectObject acForm, "230 价格库", True '在【导航窗格】中 选中名为【230 价格库】的【窗体】 DoCmd.ShowToolbar "Ribbon", acToolbarYes ' 显示工具栏,不用修改 DoCmd.ShowToolbar "Ribbon", acToolbarNo ' 隐藏工具栏 DoCmd.RunCommand acCmdWindowHide ' 隐藏侧边栏 If Me.Command8.Caption = "查看系统" And Me.Text9.Value = "xxxx" Then DoCmd.SelectObject acForm, , True Me.Command8.Caption = "隐藏系统" DoCmd.RunCommand acCmdDatabaseWindow DoCmd.SelectObject acTable, , True DoCmd.RunCommand acCmdDesignView Exit Sub Else MsgBox ("密码错误") End If If Me.Command8.Caption = "隐藏系统" Then DoCmd.SelectObject acForm, , True DoCmd.RunCommand acCmdWindowHide Me.Command8.Caption = "查看系统" Exit Sub End If 隐藏 状态栏 打开Access数据库并进入设计视图。 点击“选项”按钮,在弹出的菜单中选择“当前数据库”。 在“当前数据库”选项卡下,找到“导航选项”部分。 在“导航选项”部分中,取消选中“显示状态栏”复选框。 点击“确定”按钮保存更改并关闭选项对话框。 返回主视图,你将发现状态栏已经被隐藏了。
返回
保存