📄 budgetcard.frm
字号:
VERSION 5.00
Object = "{9C4B12C2-D5CE-11D1-9ABC-444553540000}#1.0#0"; "GACEDIT.DLL"
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Object = "{81110CCB-022B-11D3-A348-0080C89152FF}#1.3#0"; "ORAGLIST.OCX"
Begin VB.Form frmBudgetCard
BorderStyle = 1 'Fixed Single
Caption = "Form1"
ClientHeight = 6420
ClientLeft = 45
ClientTop = 330
ClientWidth = 7980
KeyPreview = -1 'True
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 6420
ScaleWidth = 7980
StartUpPosition = 2 '屏幕中心
Begin VB.TextBox txtBudget
Enabled = 0 'False
Height = 300
Index = 0
Left = 1110
TabIndex = 1
Text = "1998"
Top = 60
Width = 2010
End
Begin VB.CommandButton cmdBudget
Height = 350
Index = 0
Left = 6570
Style = 1 'Graphical
TabIndex = 35
Tag = "1001"
Top = 90
UseMaskColor = -1 'True
Width = 1215
End
Begin VB.CommandButton cmdBudget
Height = 350
Index = 1
Left = 6570
Style = 1 'Graphical
TabIndex = 36
Tag = "1002"
Top = 540
UseMaskColor = -1 'True
Width = 1215
End
Begin VB.CommandButton cmdBudget
Height = 350
Index = 2
Left = 6570
Style = 1 'Graphical
TabIndex = 37
Tag = "1009"
Top = 1020
UseMaskColor = -1 'True
Width = 1215
End
Begin VB.CommandButton cmdBudget
Caption = "固定数额"
Enabled = 0 'False
Height = 350
Index = 3
Left = 6570
TabIndex = 38
Top = 2460
Width = 1215
End
Begin VB.CommandButton cmdBudget
Caption = "平均分摊"
Enabled = 0 'False
Height = 350
Index = 4
Left = 6570
TabIndex = 39
Top = 2910
Width = 1215
End
Begin VB.CommandButton cmdBudget
Caption = "填充"
Enabled = 0 'False
Height = 350
Index = 5
Left = 6570
TabIndex = 40
Top = 3360
Width = 1215
End
Begin VB.CommandButton cmdBudget
Height = 540
Index = 6
Left = 3000
Style = 1 'Graphical
TabIndex = 29
Tag = "1027"
Top = 3960
UseMaskColor = -1 'True
Width = 510
End
Begin VB.ComboBox cboYear
Height = 300
Left = 3930
Style = 2 'Dropdown List
TabIndex = 31
Top = 2130
Width = 810
End
Begin VB.Frame Frame1
Caption = "Frame1"
Height = 30
Left = -690
TabIndex = 42
Top = 2070
Width = 8895
End
Begin GATLCTRLLibCtl.CalEdit calBudget
Height = 255
Left = 6450
OleObjectBlob = "BudgetCard.frx":0000
TabIndex = 41
Top = 4620
Visible = 0 'False
Width = 735
End
Begin ListRefer.ListText lstBudget
Height = 300
Index = 0
Left = 1110
TabIndex = 3
Top = 375
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
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 MSFlexGridLib.MSFlexGrid msgBudget
Height = 3900
Index = 1
Left = 3570
TabIndex = 34
TabStop = 0 'False
Top = 2460
Width = 2850
_ExtentX = 5027
_ExtentY = 6879
_Version = 393216
Cols = 4
RowHeightMin = 250
BackColorBkg = -2147483643
GridColor = -2147483632
GridColorFixed = -2147483632
FocusRect = 0
HighLight = 0
ScrollBars = 1
AllowUserResizing= 1
End
Begin MSFlexGridLib.MSFlexGrid msgBudget
Height = 3900
Index = 0
Left = 90
TabIndex = 28
Top = 2460
Width = 2850
_ExtentX = 5027
_ExtentY = 6879
_Version = 393216
Cols = 4
RowHeightMin = 250
BackColorBkg = -2147483643
GridColor = -2147483632
GridColorFixed = -2147483645
HighLight = 2
ScrollBars = 1
AllowUserResizing= 1
End
Begin ListRefer.ListText lstBudget
Height = 300
Index = 1
Left = 1110
TabIndex = 7
Top = 1050
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋体"
Size = 9.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
End
Begin ListRefer.ListText lstBudget
Height = 300
Index = 2
Left = 1110
TabIndex = 5
Top = 705
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
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 ListRefer.ListText lstBudget
Height = 300
Index = 3
Left = 4320
TabIndex = 17
Top = 390
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
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 ListRefer.ListText lstBudget
Height = 300
Index = 4
Left = 4320
TabIndex = 19
Top = 720
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
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 ListRefer.ListText lstBudget
Height = 300
Index = 5
Left = 4320
TabIndex = 25
Top = 1710
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
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 ListRefer.ListText lstBudget
Height = 300
Index = 6
Left = 4320
TabIndex = 21
Top = 1050
Width = 2010
_ExtentX = 3545
_ExtentY = 529
CodeSort = -1 'True
BackColor = -2147483643
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 ListRefer.ListText lstBudget
Height = 300
Index = 7
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -