📄 管理员信息.frm
字号:
VERSION 5.00
Object = "{831FDD16-0C5C-11D2-A9FC-0000F8754DA1}#2.0#0"; "mscomctl.ocx"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form 管理员信息
Caption = "管理员信息"
ClientHeight = 7365
ClientLeft = 165
ClientTop = 855
ClientWidth = 10980
LinkTopic = "Form3"
ScaleHeight = 7365
ScaleWidth = 10980
StartUpPosition = 3 '窗口缺省
Begin TabDlg.SSTab SSTab1
Height = 7215
Left = 120
TabIndex = 0
Top = 120
Width = 10815
_ExtentX = 19076
_ExtentY = 12726
_Version = 393216
TabHeight = 520
ForeColor = 16711680
TabCaption(0) = "管理员加入信息"
TabPicture(0) = "管理员信息.frx":0000
Tab(0).ControlEnabled= -1 'True
Tab(0).Control(0)= "Frame7"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).Control(1)= "Frame8"
Tab(0).Control(1).Enabled= 0 'False
Tab(0).ControlCount= 2
TabCaption(1) = "管理员查询信息"
TabPicture(1) = "管理员信息.frx":001C
Tab(1).ControlEnabled= 0 'False
Tab(1).Control(0)= "Command12"
Tab(1).Control(1)= "Command13"
Tab(1).Control(2)= "Frame10"
Tab(1).Control(3)= "Frame9"
Tab(1).ControlCount= 4
TabCaption(2) = "修改管理员信息"
TabPicture(2) = "管理员信息.frx":0038
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Command1"
Tab(2).Control(1)= "Command14"
Tab(2).Control(2)= "Command15"
Tab(2).Control(3)= "Command16"
Tab(2).Control(4)= "Frame12"
Tab(2).Control(5)= "Frame11"
Tab(2).ControlCount= 6
Begin VB.CommandButton Command1
Caption = ">>删除该管理员<<"
Enabled = 0 'False
Height = 615
Left = -68880
TabIndex = 57
Top = 6360
Width = 1815
End
Begin VB.CommandButton Command14
Caption = ">>搜索<<"
Height = 615
Left = -74760
TabIndex = 56
Top = 6360
Width = 1815
End
Begin VB.CommandButton Command15
Caption = ">>修改<<"
Enabled = 0 'False
Height = 615
Left = -66240
TabIndex = 55
Top = 6360
Width = 1815
End
Begin VB.CommandButton Command16
Caption = ">>重写<<"
Height = 615
Left = -71880
TabIndex = 54
Top = 6360
Width = 1815
End
Begin VB.Frame Frame12
Caption = "管理员加入信息"
Height = 5175
Left = -72000
TabIndex = 39
Top = 960
Width = 7575
Begin VB.TextBox txtAdmin_password1
Height = 615
Left = 720
TabIndex = 61
Top = 3840
Width = 2895
End
Begin VB.ComboBox txtAdmin_type1
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 420
ItemData = "管理员信息.frx":0054
Left = 4560
List = "管理员信息.frx":005E
TabIndex = 58
Top = 840
Width = 2775
End
Begin VB.TextBox txtAdmin_addr1
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 4560
TabIndex = 45
Top = 1800
Width = 2775
End
Begin VB.TextBox txtAdmin_tel1
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 4560
TabIndex = 44
Top = 2760
Width = 2775
End
Begin VB.TextBox txtAdmin_mail1
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 4560
TabIndex = 43
Top = 3720
Width = 2775
End
Begin VB.TextBox txtAdmin_ID3
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 720
TabIndex = 42
Top = 2760
Width = 2775
End
Begin VB.TextBox txtAdmin_name3
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 720
TabIndex = 41
Top = 1800
Width = 2775
End
Begin VB.TextBox txtAdmin_Card3
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 720
TabIndex = 40
Top = 840
Width = 2775
End
Begin VB.Label Label47
AutoSize = -1 'True
Caption = "管理员编号"
Height = 195
Left = 480
TabIndex = 53
Top = 480
Width = 900
End
Begin VB.Label Label48
AutoSize = -1 'True
Caption = "姓名"
Height = 195
Left = 480
TabIndex = 52
Top = 1440
Width = 360
End
Begin VB.Label Label49
AutoSize = -1 'True
Caption = "证件号"
Height = 195
Left = 480
TabIndex = 51
Top = 2400
Width = 540
End
Begin VB.Label Label50
AutoSize = -1 'True
Caption = "密码"
Height = 195
Left = 480
TabIndex = 50
Top = 3360
Width = 360
End
Begin VB.Label Label51
AutoSize = -1 'True
Caption = "管理员类型"
Height = 195
Left = 4080
TabIndex = 49
Top = 600
Width = 900
End
Begin VB.Label Label52
AutoSize = -1 'True
Caption = "联系地址"
Height = 195
Left = 4080
TabIndex = 48
Top = 1440
Width = 720
End
Begin VB.Label Label53
Caption = "电话"
Height = 255
Left = 4080
TabIndex = 47
Top = 2400
Width = 735
End
Begin VB.Label Label54
AutoSize = -1 'True
Caption = "邮件"
Height = 195
Left = 4080
TabIndex = 46
Top = 3360
Width = 360
End
End
Begin VB.Frame Frame11
Caption = "查询条件"
Height = 5115
Left = -74760
TabIndex = 31
Top = 960
Width = 2535
Begin VB.TextBox txtAdmin_card2
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 360
TabIndex = 34
Top = 720
Width = 1815
End
Begin VB.TextBox txtAdmin_name2
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 360
TabIndex = 33
Top = 2640
Width = 1815
End
Begin VB.TextBox txtAdmin_ID2
BeginProperty Font
Name = "MS Sans Serif"
Size = 12
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 495
Left = 360
TabIndex = 32
Top = 1680
Width = 1815
End
Begin VB.Label Label40
Caption = $"管理员信息.frx":007A
ForeColor = &H00FF0000&
Height = 1455
Left = 360
TabIndex = 38
Top = 3480
Width = 1815
End
Begin VB.Label Label44
AutoSize = -1 'True
Caption = "管理员员编号"
ForeColor = &H00000000&
Height = 195
Left = 240
TabIndex = 37
Top = 360
Width = 1080
End
Begin VB.Label Label45
AutoSize = -1 'True
Caption = "姓名"
ForeColor = &H00FF00FF&
Height = 195
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -