新增文章

文章标题 分类 C# 云星空 K3 BOS K3 功能 用友 Oracle python SQL MySql PHP HTML script windows Access 影视后期 财务 服务 生活 内容 Private Sub m_BillInterface_MenuBarInitialize(ByVal oMenuBar As K3ClassEvents.MenuBar) Dim oBand As K3ClassEvents.BOSBand Dim oTool As K3ClassEvents.BOSTool Set oBand = oMenuBar.BOSBands("mnuFile"): Set oTool = oBand.BOSTools("mnuFilePageSetup") '【 mnuFile 文件 】【 mnuFilePageSetup 页面设置 】 With oTool .Visible = False '隐藏 End With Set oBand = oMenuBar.BOSBands("BandToolBar"): Set oTool = oBand.BOSTools("mnuFilePrint") '【 BandToolBar 工具栏 】【 mnuFilePrint 打印 】 With oTool .Enabled = False '锁定 End With Set oTool = Nothing Set oBand = Nothing End Sub 返回 保存