?? 新增調拔單.frm
字號:
VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "comdlg32.ocx"
Begin VB.Form 新增調拔單
BackColor = &H00FEEBE7&
BorderStyle = 3 'Fixed Dialog
Caption = "新增調拔單"
ClientHeight = 4830
ClientLeft = 2760
ClientTop = 3750
ClientWidth = 7065
HelpContextID = 225
Icon = "新增調拔單.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4830
ScaleWidth = 7065
ShowInTaskbar = 0 'False
StartUpPosition = 1 '所有者中心
Begin MSComDlg.CommonDialog CommonDialog1
Left = 5880
Top = 4140
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.TextBox 日
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 6420
MaxLength = 2
TabIndex = 3
Top = 780
Width = 255
End
Begin VB.TextBox 月
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 5820
MaxLength = 2
TabIndex = 2
Top = 780
Width = 255
End
Begin VB.TextBox 單位
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 3420
Locked = -1 'True
TabIndex = 26
Top = 1740
Width = 1095
End
Begin VB.TextBox 貨物編號
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 1320
TabIndex = 4
Top = 1260
Width = 915
End
Begin VB.CommandButton 打印
BackColor = &H00FEEBE7&
Caption = "打印"
Height = 435
HelpContextID = 225
Left = 4260
Style = 1 'Graphical
TabIndex = 11
Top = 4140
Visible = 0 'False
Width = 1335
End
Begin VB.CommandButton 保存
BackColor = &H00FEEBE7&
Caption = "保存"
Height = 435
HelpContextID = 225
Left = 1380
Style = 1 'Graphical
TabIndex = 10
Top = 4140
Width = 1335
End
Begin VB.TextBox 經辦人
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 1320
TabIndex = 9
Top = 3480
Width = 5475
End
Begin VB.TextBox 備注
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 600
HelpContextID = 225
Left = 1320
MultiLine = -1 'True
TabIndex = 8
Top = 2700
Width = 5475
End
Begin VB.TextBox 其它金額
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 5700
TabIndex = 21
Text = "0.0"
Top = 1740
Width = 1035
End
Begin VB.TextBox 原存放倉庫
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 1320
TabIndex = 6
Top = 2220
Width = 1875
End
Begin VB.TextBox 數量
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 1320
TabIndex = 5
Top = 1740
Width = 915
End
Begin VB.TextBox 貨名規格
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 3420
Locked = -1 'True
TabIndex = 20
Top = 1260
Width = 3375
End
Begin VB.TextBox 目標存放倉庫
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 4740
TabIndex = 7
Top = 2220
Width = 2055
End
Begin VB.TextBox 年
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 4860
MaxLength = 4
TabIndex = 1
Top = 780
Width = 615
End
Begin VB.TextBox 編號
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 225
Left = 1200
Locked = -1 'True
TabIndex = 0
Top = 780
Width = 1155
End
Begin VB.CommandButton 更改背景
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
Caption = "更改背景"
Height = 435
Left = 1380
Style = 1 'Graphical
TabIndex = 30
Top = 4140
Visible = 0 'False
Width = 1335
End
Begin VB.Label Label17
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "日"
Height = 255
Left = 6720
TabIndex = 29
Top = 780
Width = 195
End
Begin VB.Label Label16
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "月"
Height = 255
Left = 6120
TabIndex = 28
Top = 780
Width = 195
End
Begin VB.Label Label15
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "年"
Height = 255
Left = 5520
TabIndex = 27
Top = 780
Width = 255
End
Begin VB.Line Line15
X1 = 4620
X2 = 4620
Y1 = 2100
Y2 = 2580
End
Begin VB.Line Line12
X1 = 4620
X2 = 4620
Y1 = 1620
Y2 = 2100
End
Begin VB.Label Label14
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "計量單位"
Height = 255
Left = 2460
TabIndex = 25
Top = 1740
Width = 735
End
Begin VB.Line Line11
X1 = 5580
X2 = 5580
Y1 = 1620
Y2 = 2100
End
Begin VB.Line Line17
X1 = 180
X2 = 6900
Y1 = 2580
Y2 = 2580
End
Begin VB.Line Line13
X1 = 3300
X2 = 3300
Y1 = 1140
Y2 = 2580
End
Begin VB.Line Line10
X1 = 2340
X2 = 2340
Y1 = 1140
Y2 = 2100
End
Begin VB.Line Line9
X1 = 1200
X2 = 1200
Y1 = 1140
Y2 = 3360
End
Begin VB.Label label13
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "貨物編號"
Height = 255
Left = 240
TabIndex = 24
Top = 1260
Width = 735
End
Begin VB.Line Line8
X1 = 180
X2 = 6900
Y1 = 2100
Y2 = 2100
End
Begin VB.Line Line7
X1 = 180
X2 = 6900
Y1 = 1620
Y2 = 1620
End
Begin VB.Line Line6
BorderWidth = 2
X1 = 6900
X2 = 6900
Y1 = 1140
Y2 = 3360
End
Begin VB.Line Line5
BorderWidth = 2
X1 = 180
X2 = 180
Y1 = 1140
Y2 = 3360
End
Begin VB.Line Line4
X1 = 2460
X2 = 4500
Y1 = 600
Y2 = 600
End
Begin VB.Line Line3
BorderWidth = 2
X1 = 180
X2 = 6900
Y1 = 3900
Y2 = 3900
End
Begin VB.Label Label11
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "經辦人:"
Height = 255
Left = 240
TabIndex = 23
Top = 3480
Width = 675
End
Begin VB.Line Line2
BorderWidth = 2
X1 = 180
X2 = 6900
Y1 = 3360
Y2 = 3360
End
Begin VB.Line Line1
BorderWidth = 2
X1 = 180
X2 = 6900
Y1 = 1140
Y2 = 1140
End
Begin VB.Label Label10
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "備注"
Height = 255
Left = 240
TabIndex = 22
Top = 2700
Width = 735
End
Begin VB.Label Label9
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "其它金額"
Height = 255
Left = 4740
TabIndex = 19
Top = 1740
Width = 795
End
Begin VB.Label Label8
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "原存放倉庫"
Height = 255
Left = 240
TabIndex = 18
Top = 2220
Width = 915
End
Begin VB.Label Label7
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "數量"
Height = 255
Left = 240
TabIndex = 17
Top = 1740
Width = 435
End
Begin VB.Label Label5
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "貨名規格"
Height = 255
Left = 2460
TabIndex = 16
Top = 1260
Width = 735
End
Begin VB.Label Label4
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "目標存放倉庫"
Height = 255
Left = 3420
TabIndex = 15
Top = 2220
Width = 1095
End
Begin VB.Label Label3
Appearance = 0 'Flat
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "日期:"
ForeColor = &H80000008&
Height = 255
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -