📄 frmgrantbybank.frm
字号:
Begin VB.CommandButton cmdEdit
Caption = "插入"
Height = 350
Index = 2
Left = -69000
TabIndex = 27
Top = 480
Width = 1215
End
Begin VB.CommandButton cmdChangList
Height = 360
Index = 2
Left = -69030
Style = 1 'Graphical
TabIndex = 29
Tag = "1019"
Top = 2460
UseMaskColor = -1 'True
Width = 270
End
Begin VB.CommandButton cmdChangList
Height = 360
Index = 3
Left = -69030
Style = 1 'Graphical
TabIndex = 30
Tag = "1020"
Top = 2850
UseMaskColor = -1 'True
Width = 270
End
Begin VB.CommandButton cmdEdit
Caption = "删除"
Height = 350
Index = 1
Left = -69000
TabIndex = 21
Top = 840
Width = 1215
End
Begin VB.CommandButton cmdEdit
Caption = "插入"
Height = 350
Index = 0
Left = -69000
TabIndex = 20
Top = 480
Width = 1215
End
Begin VB.CommandButton cmdChangList
Height = 360
Index = 0
Left = -69000
Style = 1 'Graphical
TabIndex = 22
Tag = "1019"
Top = 2460
UseMaskColor = -1 'True
Width = 270
End
Begin VB.CommandButton cmdChangList
Height = 360
Index = 1
Left = -69000
Style = 1 'Graphical
TabIndex = 23
Tag = "1020"
Top = 2850
UseMaskColor = -1 'True
Width = 270
End
Begin MSFlexGridLib.MSFlexGrid grdData
Height = 2745
Index = 0
Left = -74880
TabIndex = 19
Top = 480
Width = 5805
_ExtentX = 10239
_ExtentY = 4842
_Version = 393216
Cols = 11
BackColorSel = -2147483643
ForeColorSel = -2147483640
AllowUserResizing= 1
End
Begin MSFlexGridLib.MSFlexGrid grdSalaryList
Bindings = "frmGrantByBank.frx":00A8
Height = 2415
Left = -74910
TabIndex = 18
Top = 810
Width = 7155
_ExtentX = 12621
_ExtentY = 4260
_Version = 393216
Rows = 20
Cols = 20
SelectionMode = 1
End
Begin VB.Frame Frame1
Caption = "说明"
Height = 1155
Index = 0
Left = 1260
TabIndex = 8
Top = 1890
Width = 4485
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "3、设置生成银行代发文件的文件名。"
Height = 180
Index = 2
Left = 510
TabIndex = 11
Top = 840
Width = 2970
End
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "2、设置代发银行分配给本单位的单位编号。"
Height = 180
Index = 1
Left = 510
TabIndex = 10
Top = 540
Width = 3510
End
Begin VB.Label Label2
AutoSize = -1 'True
Caption = "1、请选择代发工资的银行。"
Height = 180
Index = 0
Left = 510
TabIndex = 9
Top = 240
Width = 2250
End
End
Begin VB.TextBox txtFile
Height = 300
Left = 2460
TabIndex = 6
Top = 1440
Width = 3015
End
Begin VB.TextBox txtCusNO
Height = 300
Left = 2460
TabIndex = 4
Top = 990
Width = 3015
End
Begin ListRefer.ListText ltxtBank
Height = 300
Left = 2460
TabIndex = 2
Top = 570
Width = 3015
_ExtentX = 5318
_ExtentY = 529
AutoPop = 0 'False
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 ltxtEdit
Height = 285
Index = 2
Left = -69000
TabIndex = 38
Top = 1380
Visible = 0 'False
Width = 1215
_ExtentX = 2143
_ExtentY = 503
AutoPop = 0 'False
BackColor = -2147483643
Appearance = 0
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 ltxtEdit
Height = 285
Index = 1
Left = -69000
TabIndex = 31
Top = 1380
Visible = 0 'False
Width = 1215
_ExtentX = 2143
_ExtentY = 503
AutoPop = 0 'False
BackColor = -2147483643
Appearance = 0
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 grdData
Height = 2745
Index = 1
Left = -74910
TabIndex = 26
Top = 480
Width = 5805
_ExtentX = 10239
_ExtentY = 4842
_Version = 393216
Cols = 10
BackColorSel = -2147483643
ForeColorSel = -2147483640
AllowUserResizing= 1
End
Begin MSFlexGridLib.MSFlexGrid grdData
Height = 2745
Index = 2
Left = -74910
TabIndex = 33
Top = 480
Width = 5805
_ExtentX = 10239
_ExtentY = 4842
_Version = 393216
Cols = 10
BackColorSel = -2147483643
ForeColorSel = -2147483640
AllowUserResizing= 1
End
Begin GACALENDARLibCtl.Calendar cldDate
Height = 300
Index = 0
Left = -71400
OleObjectBlob = "frmGrantByBank.frx":00BC
TabIndex = 15
Top = 420
Width = 1545
End
Begin GACALENDARLibCtl.Calendar cldDate
Height = 300
Index = 1
Left = -69330
OleObjectBlob = "frmGrantByBank.frx":0145
TabIndex = 17
Top = 420
Width = 1545
End
Begin VB.Label Label3
AutoSize = -1 'True
Caption = "到(&T)"
Height = 180
Index = 2
Left = -69810
TabIndex = 16
Top = 480
Width = 450
End
Begin VB.Label Label3
AutoSize = -1 'True
Caption = "从(&G)"
Height = 180
Index = 1
Left = -71880
TabIndex = 14
Top = 480
Width = 450
End
Begin VB.Label Label3
AutoSize = -1 'True
Caption = "建表日期(&D)"
Height = 180
Index = 0
Left = -74820
TabIndex = 12
Top = 480
Width = 990
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "代发文件(&F)"
Height = 180
Index = 2
Left = 1410
TabIndex = 5
Top = 1470
Width = 990
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "单位编号(&N)"
Height = 180
Index = 1
Left = 1410
TabIndex = 3
Top = 1050
Width = 990
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "代发银行(&A)"
Height = 180
Index = 0
Left = 1410
TabIndex = 1
Top = 630
Width = 990
End
End
Begin MSRDC.MSRDC Data1
Height = 330
Left = 90
Top = 3630
Visible = 0 'False
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -