📄
字号:
VERSION 5.00
Object = "{6B7E6392-850A-101B-AFC0-4210102A8DA7}#1.3#0"; "comctl32.ocx"
Object = "{533BD223-119E-11D2-AFDF-000021730160}#1.0#0"; "UFCOFILE.OCX"
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "Comdlg32.ocx"
Object = "{5804A17C-32D4-4B68-8E40-2BC4C892E014}#4.1#0"; "U8Menu.ocx"
Begin VB.MDIForm frmMain
AutoShowChildren= 0 'False
BackColor = &H8000000C&
Caption = "资金管理系统"
ClientHeight = 3990
ClientLeft = 1260
ClientTop = 2055
ClientWidth = 8880
Icon = "主界面.frx":0000
LinkTopic = "MDIForm1"
WindowState = 2 'Maximized
Begin VB.PictureBox Picture1
Align = 1 'Align Top
Height = 855
Left = 0
ScaleHeight = 795
ScaleWidth = 8820
TabIndex = 3
Top = 0
Width = 8880
End
Begin VB.PictureBox Picture2
Align = 3 'Align Left
BorderStyle = 0 'None
Height = 2835
Left = 0
ScaleHeight = 2835
ScaleWidth = 2715
TabIndex = 1
Top = 855
Width = 2715
Begin Menu.CMenu m_oMenu
Height = 3615
Left = 120
TabIndex = 2
Top = 0
Width = 2295
_ExtentX = 4048
_ExtentY = 6376
End
End
Begin MSComDlg.CommonDialog cdLog
Left = 5880
Top = 1200
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin ComctlLib.StatusBar stbInfo
Align = 2 'Align Bottom
Height = 300
Left = 0
TabIndex = 0
Top = 3690
Width = 8880
_ExtentX = 15663
_ExtentY = 529
SimpleText = ""
_Version = 327682
BeginProperty Panels {0713E89E-850A-101B-AFC0-4210102A8DA7}
NumPanels = 5
BeginProperty Panel1 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 1
Object.Width = 8034
MinWidth = 2293
Text = "帐套:"
TextSave = "帐套:"
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel2 {0713E89F-850A-101B-AFC0-4210102A8DA7}
AutoSize = 2
Object.Width = 1773
MinWidth = 1764
Text = "操作员:"
TextSave = "操作员:"
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel3 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Alignment = 1
AutoSize = 2
Object.Width = 1773
MinWidth = 1764
Text = "业务日期:"
TextSave = "业务日期:"
Key = ""
Object.Tag = ""
EndProperty
BeginProperty Panel4 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Style = 5
Alignment = 1
Object.Width = 1129
MinWidth = 1129
TextSave = "13:52"
Key = ""
Object.Tag = ""
Object.ToolTipText = "当前时间"
EndProperty
BeginProperty Panel5 {0713E89F-850A-101B-AFC0-4210102A8DA7}
Alignment = 1
AutoSize = 2
Object.Width = 2328
MinWidth = 2328
Text = "【用友软件】"
TextSave = "【用友软件】"
Key = ""
Object.Tag = ""
EndProperty
EndProperty
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin COMFILELib.ComFile ComEx
Left = 5280
Top = 1800
_Version = 65536
_ExtentX = 1667
_ExtentY = 1508
_StockProps = 0
End
Begin VB.Menu mnuFile
Caption = "文件(&F)"
Begin VB.Menu mnuSetup
Caption = "打印设置"
End
Begin VB.Menu m1
Caption = "-"
End
Begin VB.Menu register
Caption = "重新注册(&R)..."
End
Begin VB.Menu m2
Caption = "-"
End
Begin VB.Menu exit
Caption = "退出(&X)"
End
End
Begin VB.Menu mnuSetupData
Caption = "设置(&S)"
Visible = 0 'False
Begin VB.Menu mnuIRateSet
Caption = "利率设置(&I)..."
End
Begin VB.Menu mnuCadSet2
Caption = "结息日定义(&D)..."
End
Begin VB.Menu mnuSettlePrice
Caption = "结算价格"
End
Begin VB.Menu mnuLine3
Caption = "-"
End
Begin VB.Menu mnuUnitDefine
Caption = "单位定义(&E)..."
End
Begin VB.Menu mnuAccGroupDefine
Caption = "账户类型(&T)..."
End
Begin VB.Menu mnuAccountDefine
Caption = "账户定义(&A)..."
End
Begin VB.Menu mnuAccountSubject
Caption = "账户科目(&C)..."
End
Begin VB.Menu mnuAccountMngr
Caption = "账户管理(&M)..."
End
Begin VB.Menu mnuLineS2
Caption = "-"
End
Begin VB.Menu mnuCredLine
Caption = "信用指标"
End
Begin VB.Menu mnuCredModel
Caption = "信用模型"
End
Begin VB.Menu mnuCredValue
Caption = "信用评价"
End
Begin VB.Menu mnuLineS3
Caption = "-"
End
Begin VB.Menu mnuLoan
Caption = "贷款额度"
End
Begin VB.Menu mnuLineS4
Caption = "-"
End
Begin VB.Menu mnuOption2
Caption = "选项(&O)..."
End
End
Begin VB.Menu mnuFormat
Caption = "格式(&F)"
Visible = 0 'False
Begin VB.Menu mnuCut
Caption = "剪切(&C)"
End
Begin VB.Menu mnuPaste
Caption = "粘贴(&P)"
End
Begin VB.Menu mnuFLine1
Caption = "-"
End
Begin VB.Menu mnuItemOperate
Caption = "项目操作"
Begin VB.Menu mnuItemAdd
Caption = "增加(&A)"
End
Begin VB.Menu mnuItemEdit
Caption = "修改(&E)"
End
Begin VB.Menu mnuItemDelete
Caption = "删除(&D)"
End
End
Begin VB.Menu mnuFLine2
Caption = "-"
End
Begin VB.Menu mnuRowHeight
Caption = "行高..."
End
Begin VB.Menu mnuColWidth
Caption = "列宽..."
End
Begin VB.Menu mnuSetCell
Caption = "设置单元格格式..."
End
Begin VB.Menu mnuFLine3
Caption = "-"
End
Begin VB.Menu mnuRowOperate
Caption = "行操作"
Begin VB.Menu mnuInsertRow
Caption = "增加一行"
End
Begin VB.Menu mnuDeleteRow
Caption = "删除一行"
End
End
Begin VB.Menu mnuColOperate
Caption = "列操作"
Begin VB.Menu mnuInsertCol
Caption = "增加一列"
End
Begin VB.Menu mnuDeleteCol
Caption = "删除一列"
End
End
End
Begin VB.Menu mnuVoucherN
Caption = "单据(&D)"
Visible = 0 'False
Begin VB.Menu mnuVoucherStyle
Caption = "类型定义..."
End
Begin VB.Menu mnuVoucherDefine
Caption = "格式定义..."
End
Begin VB.Menu mnuLineD1
Caption = "-"
End
Begin VB.Menu mnuVoucherInput
Caption = "录入..."
End
Begin VB.Menu mnuVoucherFind
Caption = "查询..."
End
Begin VB.Menu mnuExportLine
Caption = "-"
End
Begin VB.Menu mnuExport
Caption = "导入导出银行数据..."
End
End
Begin VB.Menu putup
Caption = "设置(&S)"
Visible = 0 'False
Begin VB.Menu mnuIntrSet
Caption = "利率设置(&I)"
End
Begin VB.Menu mnuCadSet
Caption = "结息日定义(&D)"
End
Begin VB.Menu mnuline1
Caption = "-"
End
Begin VB.Menu mnuEntDef
Caption = "单位定义(&E)"
End
Begin VB.Menu mnuAccDef
Caption = "账户定义(&A)"
End
Begin VB.Menu mnuAccCode
Caption = "账户科目(&C)"
End
Begin VB.Menu m3
Caption = "-"
End
Begin VB.Menu mnuFreq
Caption = "常用单据(&F)"
End
Begin VB.Menu mnuOption
Caption = "选项(&O)..."
End
End
Begin VB.Menu card
Caption = "录入(&B)"
Visible = 0 'False
Begin VB.Menu passbook1
Caption = "银行存款单(&A)"
End
Begin VB.Menu take1
Caption = "银行取款单(&B)"
End
Begin VB.Menu inside_deposit1
Caption = "内部存款单(&C)"
End
Begin VB.Menu intake1
Caption = "内部取款单(&D)"
End
Begin VB.Menu m8
Caption = "-"
End
Begin VB.Menu bankloan1
Caption = "银行贷款单(&E)"
End
Begin VB.Menu inloan1
Caption = "内部贷款单(&F)"
End
Begin VB.Menu inlend1
Caption = "内部拆借单(&G)"
End
Begin VB.Menu m7
Caption = "-"
End
Begin VB.Menu mnuCapital
Caption = "本金还款单(&H)"
Begin VB.Menu bankloan11
Caption = "银行贷款"
End
Begin VB.Menu inloan11
Caption = "内部贷款"
End
Begin VB.Menu intake11
Caption = "内部拆借"
End
End
Begin VB.Menu interste1
Caption = "利息还款单(&I)"
Begin VB.Menu bankloan12
Caption = "银行贷款"
End
Begin VB.Menu inloan12
Caption = "内部贷款"
End
Begin VB.Menu intake12
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -