📄 帐号.frm
字号:
VERSION 5.00
Begin VB.Form zhanghao
Caption = "帐号管理"
ClientHeight = 2760
ClientLeft = 60
ClientTop = 450
ClientWidth = 4380
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 2760
ScaleWidth = 4380
StartUpPosition = 3 '窗口缺省
Begin VB.PictureBox picModify
BackColor = &H00C0E0FF&
BorderStyle = 0 'None
Height = 2415
Left = 0
ScaleHeight = 2415
ScaleWidth = 4500
TabIndex = 12
Top = 360
Width = 4500
Begin VB.CommandButton cmdModify
Caption = "修改"
Height = 375
Left = 2400
TabIndex = 20
Top = 1980
Width = 855
End
Begin VB.CommandButton cmdMofidyCancel
Caption = "取消"
Height = 375
Left = 1080
TabIndex = 19
Top = 1980
Width = 855
End
Begin VB.TextBox txtSearchModify
Height = 270
Left = 1680
TabIndex = 18
Top = 135
Width = 1215
End
Begin VB.CommandButton cmdSearchModify
Caption = "查找"
Height = 315
Left = 3000
TabIndex = 17
Top = 120
Width = 735
End
Begin VB.TextBox txtModifyUser
Height = 270
Left = 1800
TabIndex = 16
Top = 540
Width = 1335
End
Begin VB.TextBox txtModifyPass
Height = 270
Left = 1800
TabIndex = 15
Top = 900
Width = 1335
End
Begin VB.ComboBox ModifyLevel
Height = 300
Left = 1800
Style = 2 'Dropdown List
TabIndex = 14
Top = 1260
Width = 1335
End
Begin VB.CheckBox chkNoLogin
Caption = "暂时禁止该用户登录"
Height = 255
Left = 1320
TabIndex = 13
Top = 1620
Width = 1935
End
Begin VB.Label lblSearchModify
Caption = "查询并修改："
Height = 255
Left = 600
TabIndex = 24
Top = 180
Width = 1095
End
Begin VB.Label lblModifyUser
Caption = "帐号："
Height = 255
Left = 1200
TabIndex = 23
Top = 540
Width = 615
End
Begin VB.Label lblModifyPass
Caption = "密码："
Height = 255
Left = 1200
TabIndex = 22
Top = 900
Width = 615
End
Begin VB.Label lblModifyLevel
Caption = "权限："
Height = 255
Left = 1200
TabIndex = 21
Top = 1260
Width = 615
End
End
Begin VB.PictureBox picAdd
BackColor = &H00FFC0C0&
BorderStyle = 0 'None
Height = 2415
Left = 0
ScaleHeight = 2415
ScaleWidth = 4500
TabIndex = 0
Top = 360
Width = 4500
Begin VB.CommandButton cmdAdd
Caption = "填加"
Height = 375
Left = 2400
TabIndex = 6
Top = 1785
Width = 735
End
Begin VB.CommandButton cmdAddCancel
Caption = "取消"
Height = 375
Left = 1200
TabIndex = 5
Top = 1785
Width = 735
End
Begin VB.TextBox txtUserName
Height = 270
Left = 1920
TabIndex = 4
Top = 225
Width = 1455
End
Begin VB.TextBox txtPassword
Height = 270
Left = 1920
TabIndex = 3
Top = 585
Width = 1455
End
Begin VB.TextBox txtPasswordAgain
Height = 270
Left = 1920
TabIndex = 2
Top = 945
Width = 1455
End
Begin VB.ComboBox TheLevel
Height = 300
Left = 1920
Style = 2 'Dropdown List
TabIndex = 1
Top = 1305
Width = 1455
End
Begin VB.Label lblUserName
Caption = "新 帐 号："
Height = 255
Left = 960
TabIndex = 10
Top = 240
Width = 975
End
Begin VB.Label lblPassword
Caption = "登录密码："
Height = 255
Left = 960
TabIndex = 9
Top = 600
Width = 975
End
Begin VB.Label lblPasswordAgain
Caption = "确认密码："
Height = 255
Left = 960
TabIndex = 8
Top = 960
Width = 975
End
Begin VB.Label lblTheLevel
Caption = "管理权限："
Height = 255
Left = 960
TabIndex = 7
Top = 1320
Width = 975
End
End
Begin VB.PictureBox picDel
BackColor = &H00FFC0FF&
BorderStyle = 0 'None
Height = 2415
Left = 0
ScaleHeight = 2415
ScaleWidth = 4500
TabIndex = 25
Top = 360
Width = 4500
Begin VB.CommandButton cmdDel
Caption = "删除"
Height = 375
Left = 2400
TabIndex = 31
Top = 1860
Width = 855
End
Begin VB.CommandButton cmdDelCancel
Caption = "取消"
Height = 375
Left = 1080
TabIndex = 30
Top = 1860
Width = 855
End
Begin VB.TextBox txtSearchDel
Height = 270
Left = 1680
TabIndex = 29
Top = 255
Width = 1215
End
Begin VB.CommandButton cmdSearchDel
Caption = "查找"
Height = 315
Left = 3000
TabIndex = 28
Top = 240
Width = 735
End
Begin VB.TextBox txtDelUser
Height = 270
Left = 1920
TabIndex = 27
Top = 765
Width = 1335
End
Begin VB.TextBox txtDelPass
Height = 270
Left = 1920
TabIndex = 26
Top = 1215
Width = 1335
End
Begin VB.Label lblSearchDel
Caption = "查询并删除："
Height = 255
Left = 600
TabIndex = 34
Top = 300
Width = 1095
End
Begin VB.Label lblDelUser
Caption = "登录帐号："
Height = 255
Left = 960
TabIndex = 33
Top = 780
Width = 975
End
Begin VB.Label lblDelPass
Caption = "登录密码："
Height = 255
Left = 960
TabIndex = 32
Top = 1260
Width = 975
End
End
Begin VB.Label lblTitle3
Alignment = 2 'Center
BackColor = &H00FFC0FF&
Caption = "删除帐号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 3000
TabIndex = 36
Top = 0
Width = 1500
End
Begin VB.Label lblTitle2
Alignment = 2 'Center
BackColor = &H00C0E0FF&
Caption = "修改帐号"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -