⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmmain.frm

📁 一个用VB写的财务软件源码
💻 FRM
📖 第 1 页 / 共 5 页
字号:
         HelpContextID   =   8
      End
   End
   Begin VB.Menu mnuInit 
      Caption         =   "初始(&I)"
      HelpContextID   =   2
      Begin VB.Menu mnuInitKM 
         Caption         =   "会计科目"
         HelpContextID   =   10
      End
      Begin VB.Menu mnuInitInvalidKM 
         Caption         =   "非法对应科目(&K)"
         Enabled         =   0   'False
         HelpContextID   =   11
         Visible         =   0   'False
      End
      Begin VB.Menu mnuInitBeginBalance 
         Caption         =   "期初余额(&B)"
         HelpContextID   =   12
      End
      Begin VB.Menu mnuInitAssistant 
         Caption         =   "辅助项期初(&F)"
         Enabled         =   0   'False
         HelpContextID   =   13
         Visible         =   0   'False
      End
      Begin VB.Menu mnuInitExchangeRate 
         Caption         =   "币种汇率(&R)"
         HelpContextID   =   14
      End
      Begin VB.Menu mnuInitPZtype 
         Caption         =   "凭证类别(&T)"
         HelpContextID   =   15
      End
      Begin VB.Menu mnuInitCountMode 
         Caption         =   "结算方式(&M)"
         HelpContextID   =   16
      End
      Begin VB.Menu mnuInitBar1 
         Caption         =   "-"
         HelpContextID   =   17
      End
      Begin VB.Menu mnuInitPZabstract 
         Caption         =   "常用凭证摘要(&A)"
         HelpContextID   =   18
      End
      Begin VB.Menu mnuInitVoucherSet 
         Caption         =   "凭证设置(&F)"
         HelpContextID   =   19
      End
      Begin VB.Menu mnuInitPZtemplet 
         Caption         =   "凭证模板(&L)"
         HelpContextID   =   20
      End
      Begin VB.Menu mnuOpinionSet 
         Caption         =   "会计日历"
         HelpContextID   =   21
      End
   End
   Begin VB.Menu mnuPz 
      Caption         =   "凭证(&P)"
      HelpContextID   =   3
      Begin VB.Menu mnuPzInput 
         Caption         =   "填制凭证(&I)..."
         HelpContextID   =   23
         Shortcut        =   ^I
      End
      Begin VB.Menu mnuPzUpdate 
         Caption         =   "凭证改号与删除"
         HelpContextID   =   24
      End
      Begin VB.Menu mnuPzCheck 
         Caption         =   "凭证复核(&F)"
         HelpContextID   =   25
      End
      Begin VB.Menu mnuPzBar1 
         Caption         =   "-"
         HelpContextID   =   26
      End
      Begin VB.Menu mnuPzSearch 
         Caption         =   "查询凭证(&S)"
         HelpContextID   =   27
      End
      Begin VB.Menu mnuPzBar2 
         Caption         =   "-"
         HelpContextID   =   28
         Visible         =   0   'False
      End
      Begin VB.Menu mnuPzCollect 
         Caption         =   "凭证汇总(&C)"
         HelpContextID   =   28
         Visible         =   0   'False
      End
      Begin VB.Menu mnuPzBar3 
         Caption         =   "-"
         HelpContextID   =   29
      End
      Begin VB.Menu mnuPzChalk 
         Caption         =   "记账(&R)"
         HelpContextID   =   30
      End
      Begin VB.Menu mneCheckbh 
         Caption         =   "凭证缺号表"
         HelpContextID   =   31
      End
   End
   Begin VB.Menu mnuAccount 
      Caption         =   "账表(&A)"
      HelpContextID   =   4
      Begin VB.Menu mnuAccountGeneral 
         Caption         =   "总账(&G)..."
         HelpContextID   =   33
         Shortcut        =   ^G
      End
      Begin VB.Menu mnuAccountBalance 
         Caption         =   "科目余额表(&B)..."
         HelpContextID   =   34
         Shortcut        =   ^B
      End
      Begin VB.Menu mnuAccountIndex 
         Caption         =   "科目索引表(&I)..."
         Shortcut        =   ^N
      End
      Begin VB.Menu mnuAccountBar1 
         Caption         =   "-"
         HelpContextID   =   35
      End
      Begin VB.Menu mnuAccountDetail 
         Caption         =   "明细账(&D)..."
         HelpContextID   =   36
         Shortcut        =   ^D
      End
      Begin VB.Menu mnuAccountMultiCol 
         Caption         =   "多栏账(&M)..."
         HelpContextID   =   37
         Shortcut        =   ^M
      End
      Begin VB.Menu mnuAccountBar2 
         Caption         =   "-"
         HelpContextID   =   38
      End
      Begin VB.Menu mnuAccountBook 
         Caption         =   "日记账(&K)..."
         HelpContextID   =   39
         Shortcut        =   ^K
      End
      Begin VB.Menu mnuAccountDaily 
         Caption         =   "日报表(&L)..."
         HelpContextID   =   40
         Shortcut        =   ^L
      End
      Begin VB.Menu mnuAccountBar3 
         Caption         =   "-"
         HelpContextID   =   41
      End
      Begin VB.Menu mnuAccountAffiliation 
         Caption         =   "关联交易统计表"
         Visible         =   0   'False
      End
      Begin VB.Menu mnuAccountBar4 
         Caption         =   "-"
         Visible         =   0   'False
      End
      Begin VB.Menu mnuAccountPrint 
         Caption         =   "账表打印(&P)"
         HelpContextID   =   42
         Begin VB.Menu mnuAccountPrintGeneral 
            Caption         =   "总账(&G)"
            HelpContextID   =   43
         End
         Begin VB.Menu mnuAccountPrintDetail 
            Caption         =   "明细账(&D)"
            HelpContextID   =   44
         End
         Begin VB.Menu mnuAccountPrintBook 
            Caption         =   "日记账(&K)"
            HelpContextID   =   45
         End
      End
   End
   Begin VB.Menu mnuBank 
      Caption         =   "银行对账(&B)"
      HelpContextID   =   5
      Begin VB.Menu mnuBankChequeManager 
         Caption         =   "支票管理"
         HelpContextID   =   47
         Visible         =   0   'False
      End
      Begin VB.Menu mnuBankBillcode 
         Caption         =   "银行单据号维护"
      End
      Begin VB.Menu LineBank1 
         Caption         =   "-"
         HelpContextID   =   48
      End
      Begin VB.Menu mnuBankCollateBegin 
         Caption         =   "银行对账期初(&R)"
         HelpContextID   =   49
      End
      Begin VB.Menu LineBank2 
         Caption         =   "-"
         HelpContextID   =   50
      End
      Begin VB.Menu mnuBankCollateBill 
         Caption         =   "银行对账单(&H)"
         HelpContextID   =   51
      End
      Begin VB.Menu mnuBankCollate 
         Caption         =   "银行对账(&D)"
         HelpContextID   =   52
      End
      Begin VB.Menu mnuBankBalanceAdjustTable 
         Caption         =   "余额调节表(&T)"
         HelpContextID   =   53
      End
      Begin VB.Menu LineBank3 
         Caption         =   "-"
         HelpContextID   =   54
      End
      Begin VB.Menu mnuBankCollateQuery 
         Caption         =   "查询银行对账情况(&C)"
         HelpContextID   =   55
      End
      Begin VB.Menu mnuBankDeleteAlreadyCollateBill 
         Caption         =   "核销已达账(&S)"
         HelpContextID   =   56
      End
      Begin VB.Menu mnuBankCheckBill 
         Caption         =   "长期未达账审计"
         HelpContextID   =   57
      End
   End
   Begin VB.Menu mnuFinal 
      Caption         =   "期末(&M)"
      HelpContextID   =   6
      Begin VB.Menu mnuZzpzSet 
         Caption         =   "自定义转账凭证"
         HelpContextID   =   59
         Begin VB.Menu mnuZzDefine 
            Caption         =   "转账凭证定义"
            HelpContextID   =   60
         End
         Begin VB.Menu mnuZzsc 
            Caption         =   "转账凭证生成"
            HelpContextID   =   61
         End
      End
      Begin VB.Menu mnuLine3 
         Caption         =   "-"
         HelpContextID   =   62
      End
      Begin VB.Menu mnuThpzDefine 
         Caption         =   "调汇凭证"
         HelpContextID   =   63
         Begin VB.Menu mnuthDefine 
            Caption         =   "调汇凭证定义"
            HelpContextID   =   64
         End
         Begin VB.Menu mnuthsc 
            Caption         =   "调汇凭证生成"
            HelpContextID   =   65
         End
      End
      Begin VB.Menu line4 
         Caption         =   "-"
         HelpContextID   =   66
      End
      Begin VB.Menu mnuSyPz 
         Caption         =   "期间损益凭证"
         HelpContextID   =   67
         Begin VB.Menu mnusyDefine 
            Caption         =   "损益凭证定义"
            HelpContextID   =   68
         End
         Begin VB.Menu mnusySc 
            Caption         =   "期间损益凭证生成"
            HelpContextID   =   69
         End
      End
      Begin VB.Menu line5 
         Caption         =   "-"
         HelpContextID   =   70
      End
      Begin VB.Menu mnuFinalClose 
         Caption         =   "结账"
         HelpContextID   =   71
      End
      Begin VB.Menu mnuCarryForwordData 
         Caption         =   "结转上年数据"
         HelpContextID   =   72
      End
   End
   Begin VB.Menu mnuView 
      Caption         =   "查看(&V)"
      HelpContextID   =   73
      Begin VB.Menu mnuViewToolBar 
         Caption         =   "工具栏"
         Checked         =   -1  'True
         HelpContextID   =   74
      End
      Begin VB.Menu mnuViewStatusBar 
         Caption         =   "状态条(&S)"
         Checked         =   -1  'True
         HelpContextID   =   75
      End
   End
   Begin VB.Menu mnuTool 
      Caption         =   "工具(&T)"
      HelpContextID   =   81
      Begin VB.Menu mnuToolCalculator 
         Caption         =   "计算器(&C)"
         HelpContextID   =   82
      End
      Begin VB.Menu mnuToolInformation 
         Caption         =   "账套及本子系统信息(&Z)..."
         HelpContextID   =   83
      End
      Begin VB.Menu mnuToolBar1 
         Caption         =   "-"
         HelpContextID   =   84
      End
      Begin VB.Menu mnuImportData 
         Caption         =   "数据导入(&I)"
         HelpContextID   =   89
      End
      Begin VB.Menu mnuExportData 
         Caption         =   "数据导出(&E)"
         HelpContextID   =   90
      End
   End
   Begin VB.Menu mnuViewBar1 
      Caption         =   "窗口(&W)"
      HelpContextID   =   76
      WindowList      =   -1  'True
      Begin VB.Menu mnuWindowCascade 
         Caption         =   "层叠(&C)"
         HelpContextID   =   77
      End
      Begin VB.Menu mnuWindowTileHorizontal 
         Caption         =   "平铺(&H)"
         HelpContextID   =   78
      End
      Begin VB.Menu mnuWindowTileVertical 
         Caption         =   "竖排(&V)"
         HelpContextID   =   79
      End
      Begin VB.Menu mnuWindowArrangeIcons 
         Caption         =   "排列图标(&A)"
         HelpContextID   =   80
      End
   End
   Begin VB.Menu mnuHelp 
      Caption         =   "帮助(&H)"
      HelpContextID   =   91
      Begin VB.Menu mnuHelpContent 

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -