?? 新增報損單.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 = 5265
ClientLeft = 2760
ClientTop = 3750
ClientWidth = 7065
HelpContextID = 226
Icon = "新增報損單.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 5265
ScaleWidth = 7065
ShowInTaskbar = 0 'False
StartUpPosition = 1 '所有者中心
Begin VB.TextBox Text1
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 4560
TabIndex = 33
Top = 3960
Width = 2115
End
Begin MSComDlg.CommonDialog CommonDialog1
Left = 5880
Top = 4620
_ExtentX = 847
_ExtentY = 847
_Version = 393216
End
Begin VB.TextBox 日
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
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 = 226
Left = 5820
MaxLength = 2
TabIndex = 2
Top = 780
Width = 255
End
Begin VB.TextBox 單位
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
ForeColor = &H80000007&
Height = 300
HelpContextID = 226
Left = 6000
Locked = -1 'True
TabIndex = 28
Top = 1740
Width = 795
End
Begin VB.TextBox 貨物編號
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 1200
TabIndex = 4
Top = 1260
Width = 1035
End
Begin VB.TextBox 金額
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 1200
TabIndex = 24
Text = "0.0"
Top = 2220
Width = 2115
End
Begin VB.CommandButton 打印
BackColor = &H00FEEBE7&
Caption = "打印"
Height = 435
HelpContextID = 226
Left = 4260
Style = 1 'Graphical
TabIndex = 11
Top = 4680
Visible = 0 'False
Width = 1335
End
Begin VB.CommandButton 保存
BackColor = &H00FEEBE7&
Caption = "保存"
Height = 435
HelpContextID = 226
Left = 1380
Style = 1 'Graphical
TabIndex = 10
Top = 4680
Width = 1335
End
Begin VB.TextBox 經辦人
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 1200
TabIndex = 9
Top = 3960
Width = 2355
End
Begin VB.TextBox 備注
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 600
HelpContextID = 226
Left = 1200
MultiLine = -1 'True
TabIndex = 8
Top = 3180
Width = 5595
End
Begin VB.TextBox 其它金額
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 4980
TabIndex = 21
Text = "0.0"
Top = 2220
Width = 1815
End
Begin VB.TextBox 數量
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 3540
TabIndex = 6
Top = 1740
Width = 1215
End
Begin VB.TextBox 單價
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 1200
TabIndex = 5
Top = 1740
Width = 1035
End
Begin VB.TextBox 貨名規格
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 3540
Locked = -1 'True
TabIndex = 20
Top = 1260
Width = 3255
End
Begin VB.TextBox 存放倉庫
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
Left = 1200
TabIndex = 7
Top = 2700
Width = 5595
End
Begin VB.TextBox 年
Appearance = 0 'Flat
BackColor = &H00FEEBE7&
BorderStyle = 0 'None
Height = 300
HelpContextID = 226
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 = 226
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 = 32
Top = 4680
Visible = 0 'False
Width = 1335
End
Begin VB.Label Label8
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "部門:"
Height = 255
Left = 3960
TabIndex = 34
Top = 3960
Width = 675
End
Begin VB.Label Label17
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "日"
Height = 255
Left = 6720
TabIndex = 31
Top = 780
Width = 195
End
Begin VB.Label Label16
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "月"
Height = 255
Left = 6120
TabIndex = 30
Top = 780
Width = 195
End
Begin VB.Label Label15
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "年"
Height = 255
Left = 5520
TabIndex = 29
Top = 780
Width = 255
End
Begin VB.Line Line15
X1 = 4860
X2 = 4860
Y1 = 2100
Y2 = 2580
End
Begin VB.Line Line12
X1 = 4860
X2 = 4860
Y1 = 1620
Y2 = 2100
End
Begin VB.Label Label14
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "計量單位"
Height = 255
Left = 4980
TabIndex = 27
Top = 1740
Width = 795
End
Begin VB.Line Line11
X1 = 5880
X2 = 5880
Y1 = 1620
Y2 = 2100
End
Begin VB.Line Line17
X1 = 180
X2 = 6900
Y1 = 3060
Y2 = 3060
End
Begin VB.Line Line13
X1 = 3420
X2 = 3420
Y1 = 1140
Y2 = 2580
End
Begin VB.Line Line10
X1 = 2340
X2 = 2340
Y1 = 1140
Y2 = 2100
End
Begin VB.Line Line9
X1 = 1080
X2 = 1080
Y1 = 1140
Y2 = 3840
End
Begin VB.Label label13
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "貨物編號"
Height = 255
Left = 240
TabIndex = 26
Top = 1260
Width = 735
End
Begin VB.Line Line14
X1 = 180
X2 = 6900
Y1 = 2580
Y2 = 2580
End
Begin VB.Label Label12
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "報損金額"
Height = 255
Left = 240
TabIndex = 25
Top = 2220
Width = 795
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 = 3840
End
Begin VB.Line Line5
BorderWidth = 2
X1 = 180
X2 = 180
Y1 = 1140
Y2 = 3840
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 = 4380
Y2 = 4380
End
Begin VB.Label Label11
BackColor = &H00FFFF80&
BackStyle = 0 'Transparent
Caption = "經辦人:"
Height = 255
Left = 240
TabIndex = 23
Top = 3960
Width = 675
End
Begin VB.Line Line2
BorderWidth = 2
X1 = 180
X2 = 6900
Y1 = 3840
Y2 = 3840
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
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -