📄 tzdj.frm
字号:
VERSION 5.00
Begin VB.Form FrmTzdj
BackColor = &H00FFFFFF&
Caption = "宁纺集团固定资产登记"
ClientHeight = 8205
ClientLeft = 4740
ClientTop = 8925
ClientWidth = 11595
DrawMode = 10 'Mask Pen
ForeColor = &H00808080&
Icon = "Tzdj.frx":0000
LinkTopic = "Form1"
Moveable = 0 'False
ScaleHeight = 8205
ScaleMode = 0 'User
ScaleWidth = 11773.53
StartUpPosition = 2 '屏幕中心
Begin VB.CommandButton ComTj_sydw
Caption = "添加"
Height = 345
Left = 4335
TabIndex = 149
Top = 1170
Width = 555
End
Begin VB.Data Data_SyDw
Connect = "Access"
DatabaseName = "ZcTz97.mdb"
DefaultCursorType= 0 '缺省游标
DefaultType = 2 '使用 ODBC
Exclusive = 0 'False
Height = 345
Left = 8835
Options = 0
ReadOnly = 0 'False
RecordsetType = 1 'Dynaset
RecordSource = "使用单位"
Top = 735
Visible = 0 'False
Width = 1140
End
Begin VB.ComboBox Combo1
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 330
IMEMode = 1 'ON
IntegralHeight = 0 'False
ItemData = "Tzdj.frx":0442
Left = 1305
List = "Tzdj.frx":0444
Sorted = -1 'True
TabIndex = 148
TabStop = 0 'False
Top = 1185
Width = 3030
End
Begin VB.TextBox Text38
Alignment = 2 'Center
Appearance = 0 'Flat
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 270
Left = 7170
Locked = -1 'True
TabIndex = 146
Top = 795
Width = 1500
End
Begin VB.TextBox Text117
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000014&
DataField = "保管员"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 405
Left = 5160
TabIndex = 145
Text = "117"
Top = 2760
Width = 2490
End
Begin VB.TextBox Text13
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000014&
DataField = "保管员"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 420
Left = 5160
TabIndex = 144
Text = "13"
Top = 2370
Width = 2490
End
Begin VB.TextBox Text114
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 142
Text = "114"
Top = 6180
Width = 735
End
Begin VB.TextBox Text113
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 141
Text = "113"
Top = 6945
Width = 735
End
Begin VB.TextBox Text112
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "仓库名"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 405
Left = 7530
TabIndex = 140
Text = "112"
Top = 6555
Width = 735
End
Begin VB.TextBox Text111
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "仓库名"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 139
Text = "111"
Top = 3915
Width = 735
End
Begin VB.TextBox Text110
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 138
Text = "110"
Top = 4290
Width = 735
End
Begin VB.TextBox Text109
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 405
Left = 7530
TabIndex = 137
Text = "109"
Top = 5040
Width = 735
End
Begin VB.TextBox Text108
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "仓库名"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 136
Text = "108"
Top = 4665
Width = 735
End
Begin VB.TextBox Text107
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 135
Text = "107"
Top = 5805
Width = 735
End
Begin VB.TextBox Text106
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "仓库名"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 7530
TabIndex = 134
Text = "106"
Top = 5430
Width = 735
End
Begin VB.TextBox Text103
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 6720
TabIndex = 133
Text = "103"
Top = 6180
Width = 825
End
Begin VB.TextBox Text102
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "通知单号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 390
Left = 6720
TabIndex = 132
Text = "102"
Top = 6945
Width = 825
End
Begin VB.TextBox Text101
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "仓库名"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 405
Left = 6720
TabIndex = 131
Text = "101"
Top = 6555
Width = 825
End
Begin VB.TextBox Text100
Alignment = 2 'Center
Appearance = 0 'Flat
BackColor = &H80000004&
DataField = "仓库名"
BeginProperty Font
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -