📄 frmejck.frm
字号:
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000FF&
Height = 495
Left = 240
TabIndex = 86
Top = 300
Width = 10275
End
Begin VB.Label Label18
BackStyle = 0 'Transparent
Caption = $"frmEjck.frx":22721
BeginProperty Font
Name = "MS Serif"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1275
Left = 780
TabIndex = 85
Top = 1560
Width = 10095
End
Begin VB.Label Label17
BackStyle = 0 'Transparent
Caption = " 谢谢您购买我们的正版软件，在您使用过程中，如果遇到问题以及有些好的建议，请与我们及时联系，最后预祝您使用快乐。"
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 675
Left = 840
TabIndex = 84
Top = 3180
Width = 10035
End
End
Begin VB.Frame Frame5
BackColor = &H00A56E3A&
Height = 1455
Left = 60
TabIndex = 79
Top = 5580
Width = 11535
Begin VB.CommandButton cmdExit_regy
Appearance = 0 'Flat
Height = 450
Left = 4740
Picture = "frmEjck.frx":227DF
Style = 1 'Graphical
TabIndex = 82
Top = 840
Width = 1455
End
Begin VB.Label Label23
BackStyle = 0 'Transparent
Caption = "业务电话：13916107163 传真：021-65550017"
Height = 315
Left = 3480
TabIndex = 81
Top = 540
Width = 4635
End
Begin VB.Label Label22
BackStyle = 0 'Transparent
Caption = "Email:JassonHan@hotmail.com"
Height = 315
Left = 4500
TabIndex = 80
Top = 240
Width = 2655
End
End
End
Begin VB.Frame fmcgkc
BackColor = &H00A56E3A&
Height = 7155
Left = 0
TabIndex = 3
Top = 540
Width = 11655
Begin VB.Frame FrameLeft
BackColor = &H00A56E3A&
Caption = "二级库存"
Height = 6915
Left = 120
TabIndex = 4
Top = 120
Width = 2595
Begin VB.TextBox txtCurUser
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Enabled = 0 'False
Height = 315
Left = 1440
TabIndex = 73
Top = 6480
Width = 915
End
Begin VB.CommandButton cmdEjkcgl
Appearance = 0 'Flat
Height = 500
Left = 600
Picture = "frmEjck.frx":22FA3
Style = 1 'Graphical
TabIndex = 41
Top = 3540
Width = 1600
End
Begin VB.CommandButton cmdEjck
Appearance = 0 'Flat
Height = 500
Left = 600
Picture = "frmEjck.frx":23C52
Style = 1 'Graphical
TabIndex = 6
Top = 2550
Width = 1600
End
Begin VB.CommandButton cmdYd_ej
Appearance = 0 'Flat
Height = 500
Left = 600
Picture = "frmEjck.frx":2482E
Style = 1 'Graphical
TabIndex = 5
Top = 1560
Width = 1600
End
Begin VB.Label Label46
BackStyle = 0 'Transparent
Caption = "当前操作员："
Height = 255
Left = 300
TabIndex = 74
Top = 6540
Width = 1095
End
Begin VB.Shape Shape44
FillColor = &H00C0FFFF&
FillStyle = 0 'Solid
Height = 315
Left = 240
Top = 6480
Width = 1155
End
End
Begin VB.Frame famKcyd
BackColor = &H00A56E3A&
Caption = "库存移动"
Height = 6915
Left = 2760
TabIndex = 24
Top = 120
Width = 8775
Begin VB.CommandButton cmdPrintzy
Appearance = 0 'Flat
Height = 450
Left = 1860
Picture = "frmEjck.frx":25522
Style = 1 'Graphical
TabIndex = 77
Top = 6240
Width = 1455
End
Begin VB.CommandButton cmdExit_ej
Appearance = 0 'Flat
Height = 450
Left = 5700
Picture = "frmEjck.frx":25CBA
Style = 1 'Graphical
TabIndex = 72
Top = 6240
Width = 1455
End
Begin VB.CommandButton cmdSave_ej
Appearance = 0 'Flat
Height = 450
Left = 3780
Picture = "frmEjck.frx":2647E
Style = 1 'Graphical
TabIndex = 27
Top = 6240
Width = 1455
End
Begin VB.Frame famkcyd_result
BackColor = &H00A56E3A&
Caption = "库存移动纪录"
Height = 4245
Left = 60
TabIndex = 25
Top = 1800
Width = 8595
Begin MSFlexGridLib.MSFlexGrid fgdkcydjl
Height = 3885
Left = 120
TabIndex = 26
Top = 240
Width = 8355
_ExtentX = 14737
_ExtentY = 6853
_Version = 393216
FixedCols = 0
BackColorSel = 16711680
AllowBigSelection= 0 'False
TextStyleFixed = 4
GridLines = 2
SelectionMode = 1
End
End
Begin VB.Frame famyd_text
BackColor = &H00A56E3A&
Height = 1545
Left = 60
TabIndex = 28
Top = 210
Width = 8595
Begin VB.ComboBox CboEjkcmc
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Height = 315
Left = 1440
TabIndex = 35
Text = "Combo1"
Top = 240
Width = 1635
End
Begin VB.ComboBox cbospbh_ej
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
Height = 315
Left = 4140
TabIndex = 30
Text = "Combo1"
Top = 240
Width = 1335
End
Begin VB.TextBox txtsl_ej
Alignment = 1 'Right Justify
Appearance = 0 'Flat
BackColor = &H00C0FFFF&
BeginProperty DataFormat
Type = 1
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 1
EndProperty
Height = 315
Left = 6570
TabIndex = 29
Text = "0"
Top = 240
Width = 1515
End
Begin MSComCtl2.DTPicker dtpYdsj
Height = 315
Left = 4140
TabIndex = 64
Top = 1050
Width = 1365
_ExtentX = 2408
_ExtentY = 556
_Version = 393216
Enabled = 0 'False
Format = 25231361
CurrentDate = 37445
End
Begin VB.Label Label3
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "移动时间"
Height = 195
Left = 3225
TabIndex = 65
Top = 1110
Width = 720
End
Begin VB.Label lblZkkc_ej
Alignment = 1 'Right Justify
BackStyle = 0 'Transparent
Caption = "0"
Height = 255
Left = 1260
TabIndex = 40
Top = 1110
Width = 1425
End
Begin VB.Label Label2
BackStyle = 0 'Transparent
Caption = "在库库存"
Height = 255
Left = 240
TabIndex = 39
Top = 1110
Width = 735
End
Begin VB.Label lblUnit_ej
BackStyle = 0 'Transparent
Caption = "商品名称"
Height = 255
Left = 4200
TabIndex = 38
Top = 720
Width = 2025
End
Begin VB.Label lblName_ej
BackStyle = 0 'Transparent
Caption = "商品名称"
Height = 255
Left = 1200
TabIndex = 37
Top = 720
Width = 1455
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "二级库存名称"
Height = 255
Left = 240
TabIndex = 36
Top = 300
Width = 1215
End
Begin VB.Label Label12
BackStyle = 0 'Transparent
Caption = "商品编号"
Height = 255
Left = 3240
TabIndex = 34
Top = 300
Width = 855
End
Begin VB.Label Label13
BackStyle = 0 'Transparent
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -