📄 frmsettype.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "MSCOMCTL.OCX"
Begin VB.Form frmSetType
BorderStyle = 1 'Fixed Single
Caption = "设置图书类别"
ClientHeight = 4485
ClientLeft = 390
ClientTop = 825
ClientWidth = 4710
Icon = "frmSetType.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 4485
ScaleWidth = 4710
StartUpPosition = 2 '屏幕中心
Begin VB.Frame Frame2
Caption = "添加状态"
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004080&
Height = 3855
Left = 240
TabIndex = 5
Top = 360
Width = 3015
Begin VB.TextBox txtNum
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 240
TabIndex = 12
Text = "Text1"
Top = 1800
Width = 2535
End
Begin VB.CommandButton cmdCan
Caption = "取 消(&C)"
Height = 495
Left = 1560
Style = 1 'Graphical
TabIndex = 10
Top = 2880
Width = 1095
End
Begin VB.CommandButton cmdEnter
Caption = "确 定(&E)"
Height = 495
Left = 240
Style = 1 'Graphical
TabIndex = 9
Top = 2880
Width = 1095
End
Begin VB.Frame Frame3
Height = 135
Left = 240
TabIndex = 8
Top = 2520
Width = 2535
End
Begin VB.TextBox txtType
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 240
TabIndex = 7
Text = "Text1"
Top = 840
Width = 2535
End
Begin VB.Label Label6
BackColor = &H00808080&
Caption = "Label6"
Height = 495
Left = 1620
TabIndex = 16
Top = 2940
Width = 1095
End
Begin VB.Label Label5
BackColor = &H00808080&
Caption = "Label5"
Height = 495
Left = 300
TabIndex = 15
Top = 2940
Width = 1095
End
Begin VB.Label Label4
BackColor = &H00808080&
Caption = "Label4"
Height = 375
Left = 300
TabIndex = 14
Top = 1860
Width = 2535
End
Begin VB.Label Label3
BackColor = &H00808080&
Caption = "Label3"
Height = 375
Left = 300
TabIndex = 13
Top = 900
Width = 2535
End
Begin VB.Label Label2
Caption = "类别编号:"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF8080&
Height = 255
Left = 240
TabIndex = 11
Top = 1440
Width = 1095
End
Begin VB.Label Label1
AutoSize = -1 'True
Caption = "类别名称:"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF8080&
Height = 240
Left = 240
TabIndex = 6
Top = 480
Width = 1080
End
End
Begin VB.CommandButton cmdBack
Caption = "返回(&B)"
Height = 735
Left = 3480
Picture = "frmSetType.frx":0442
Style = 1 'Graphical
TabIndex = 4
Top = 3360
Width = 975
End
Begin VB.CommandButton cmdUpd
Caption = "修改(&U)"
Height = 735
Left = 3480
Picture = "frmSetType.frx":0884
Style = 1 'Graphical
TabIndex = 3
Top = 2400
Width = 975
End
Begin VB.CommandButton cmdDel
Caption = "删除(&D)"
Height = 735
Left = 3480
Picture = "frmSetType.frx":114E
Style = 1 'Graphical
TabIndex = 2
Top = 1440
Width = 975
End
Begin VB.CommandButton cmdAdd
Caption = "添加(&A)"
Height = 735
Left = 3480
Picture = "frmSetType.frx":1A18
Style = 1 'Graphical
TabIndex = 1
Top = 480
Width = 975
End
Begin MSComctlLib.ListView lvST
Height = 3855
Left = 240
TabIndex = 0
Top = 360
Width = 3015
_ExtentX = 5318
_ExtentY = 6800
View = 3
LabelWrap = -1 'True
HideSelection = -1 'True
GridLines = -1 'True
_Version = 393217
ForeColor = -2147483640
BackColor = 15724527
BorderStyle = 1
Appearance = 1
NumItems = 0
End
Begin VB.Label Label10
BackColor = &H00808080&
Caption = "Label10"
Height = 735
Left = 3540
TabIndex = 20
Top = 3420
Width = 975
End
Begin VB.Label Label9
BackColor = &H00808080&
Caption = "Label9"
Height = 735
Left = 3540
TabIndex = 19
Top = 2460
Width = 975
End
Begin VB.Label Label8
BackColor = &H00808080&
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -