?? frmmodifya.frm
字號(hào):
VERSION 5.00
Object = "{67397AA1-7FB1-11D0-B148-00A0C922E820}#6.0#0"; "MSADODC.OCX"
Object = "{F0D2F211-CCB0-11D0-A316-00AA00688B10}#1.0#0"; "MSDATLST.OCX"
Object = "{FE0065C0-1B7B-11CF-9D53-00AA003C9CB6}#1.1#0"; "COMCT232.OCX"
Begin VB.Form frmModifyA
Caption = "修改案卷內(nèi)容"
ClientHeight = 6888
ClientLeft = 852
ClientTop = 732
ClientWidth = 11868
BeginProperty Font
Name = "宋體"
Size = 10.8
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 6888
ScaleWidth = 11868
StartUpPosition = 2 '屏幕中心
Begin VB.CommandButton cmdDelete
Caption = "刪除(&D)"
Height = 372
Left = 6000
TabIndex = 50
Top = 6360
Width = 972
End
Begin VB.CommandButton cmdRevert
Caption = "還原(&R)"
Enabled = 0 'False
Height = 372
Left = 8400
TabIndex = 52
Top = 6360
Width = 972
End
Begin VB.CommandButton cmdUpdate
Caption = "更新(&U)"
Enabled = 0 'False
Height = 372
Left = 7200
TabIndex = 51
Top = 6360
Width = 972
End
Begin VB.CommandButton cmdModify
Caption = "修改(&M)"
Height = 372
Left = 4800
TabIndex = 49
Top = 6360
Width = 972
End
Begin VB.ComboBox Combo1
Height = 312
ItemData = "frmModifyA.frx":0000
Left = 9000
List = "frmModifyA.frx":000D
TabIndex = 24
ToolTipText = "保管期限"
Top = 1560
Width = 1092
End
Begin VB.ComboBox Combo2
Height = 312
ItemData = "frmModifyA.frx":0023
Left = 9000
List = "frmModifyA.frx":0030
TabIndex = 26
ToolTipText = "歸文密級(jí)"
Top = 2040
Width = 1092
End
Begin VB.ComboBox Combo3
Height = 312
ItemData = "frmModifyA.frx":0046
Left = 9000
List = "frmModifyA.frx":0053
TabIndex = 28
ToolTipText = "存檔情況"
Top = 2520
Width = 1092
End
Begin VB.TextBox Text7
Height = 324
Left = 3720
MaxLength = 10
TabIndex = 20
Top = 2520
Width = 1176
End
Begin VB.TextBox Text8
Height = 324
Left = 6360
MaxLength = 10
TabIndex = 22
Top = 2520
Width = 1212
End
Begin VB.TextBox Text6
Height = 324
Left = 9600
MaxLength = 18
TabIndex = 14
Top = 840
Width = 2052
End
Begin VB.TextBox Text5
Height = 324
Left = 7320
MaxLength = 8
TabIndex = 12
Top = 840
Width = 972
End
Begin VB.TextBox Text3
Height = 324
Left = 10680
MaxLength = 8
TabIndex = 8
Top = 360
Width = 972
End
Begin VB.CommandButton cmdReturn
Caption = "返回(&R)"
Height = 372
Left = 9840
TabIndex = 54
ToolTipText = "返回主菜單"
Top = 6360
Width = 972
End
Begin VB.CommandButton cmdRefilt
Caption = "重新過(guò)濾(&F)"
Height = 372
Left = 3120
TabIndex = 53
Top = 6360
Width = 1452
End
Begin VB.ListBox ListDA
DataSource = "adoDG"
BeginProperty Font
Name = "宋體"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 5808
ItemData = "frmModifyA.frx":006F
Left = 240
List = "frmModifyA.frx":0071
TabIndex = 0
ToolTipText = "請(qǐng)選擇檔號(hào)"
Top = 360
Width = 2292
End
Begin VB.TextBox Text12
Height = 732
Left = 3480
MaxLength = 200
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 36
ToolTipText = "正題名"
Top = 3240
Width = 8172
End
Begin VB.TextBox Text13
Height = 732
Left = 3480
MaxLength = 200
MultiLine = -1 'True
ScrollBars = 2 'Vertical
TabIndex = 44
ToolTipText = "摘要"
Top = 5400
Width = 8172
End
Begin VB.TextBox Text9
Height = 324
Left = 10800
MaxLength = 8
TabIndex = 30
Text = " 16開(kāi)"
ToolTipText = "規(guī)格"
Top = 1560
Width = 852
End
Begin VB.TextBox Text11
Alignment = 1 'Right Justify
BeginProperty DataFormat
Type = 1
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 1
EndProperty
Height = 324
Left = 10800
MaxLength = 4
TabIndex = 34
ToolTipText = "頁(yè)數(shù)"
Top = 2520
Width = 564
End
Begin VB.TextBox Text10
Alignment = 1 'Right Justify
BeginProperty DataFormat
Type = 1
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 1
EndProperty
Height = 324
Left = 10800
MaxLength = 4
TabIndex = 32
ToolTipText = "份數(shù)"
Top = 2040
Width = 576
End
Begin VB.TextBox Text0
Height = 324
Left = 3480
MaxLength = 10
TabIndex = 2
Top = 360
Width = 1212
End
Begin VB.TextBox Text1
Height = 324
Left = 6120
MaxLength = 8
TabIndex = 4
Top = 360
Width = 972
End
Begin VB.TextBox Text2
BeginProperty DataFormat
Type = 1
Format = "0"
HaveTrueFalseNull= 0
FirstDayOfWeek = 0
FirstWeekOfYear = 0
LCID = 2052
SubFormatType = 1
EndProperty
Height = 324
Left = 8400
MaxLength = 4
TabIndex = 6
Top = 360
Width = 888
End
Begin VB.TextBox Text4
Height = 324
Left = 3480
MaxLength = 20
TabIndex = 10
Top = 840
Width = 2568
End
Begin MSAdodcLib.Adodc adoZTC
Height = 312
Left = 10440
Top = 4680
Visible = 0 'False
Width = 960
_ExtentX = 1693
_ExtentY = 550
ConnectMode = 3
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 2
CursorOptions = 0
CacheSize = 50
MaxRecords = 5
BOFAction = 0
EOFAction = 0
ConnectStringType= 3
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = "DSN=PmData"
OLEDBString = ""
OLEDBFile = ""
DataSourceName = "PmData"
OtherAttributes = ""
UserName = "Admin"
Password = ""
RecordSource = "Ztc"
Caption = ""
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin MSAdodcLib.Adodc adoZR
Height = 312
Left = 9480
Top = 4680
Visible = 0 'False
Width = 960
_ExtentX = 1693
_ExtentY = 550
ConnectMode = 3
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 3
LockType = 3
CommandType = 2
CursorOptions = 0
CacheSize = 50
MaxRecords = 5
BOFAction = 0
EOFAction = 0
ConnectStringType= 3
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = "DSN=PmData"
OLEDBString = ""
OLEDBFile = ""
DataSourceName = "PmData"
OtherAttributes = ""
UserName = "Admin"
Password = ""
RecordSource = "Zr"
Caption = ""
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
_Version = 393216
End
Begin MSAdodcLib.Adodc adoDA
Height = 312
Left = 480
Top = 6360
Visible = 0 'False
Width = 1800
_ExtentX = 3175
_ExtentY = 550
ConnectMode = 3
CursorLocation = 3
IsolationLevel = -1
ConnectionTimeout= 15
CommandTimeout = 30
CursorType = 2
LockType = 3
CommandType = 2
CursorOptions = 0
CacheSize = 50
MaxRecords = 5
BOFAction = 0
EOFAction = 0
ConnectStringType= 3
Appearance = 1
BackColor = -2147483643
ForeColor = -2147483640
Orientation = 0
Enabled = -1
Connect = "DSN=PmData"
OLEDBString = ""
OLEDBFile = ""
DataSourceName = "PmData"
OtherAttributes = ""
UserName = "Admin"
Password = ""
RecordSource = "DataA"
Caption = "案卷檔案"
BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851}
Name = "宋體"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -