📄 frmuser.frm
字号:
VERSION 5.00
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form FrmUser
AutoRedraw = -1 'True
BorderStyle = 3 'Fixed Dialog
Caption = "系统用户设置"
ClientHeight = 2850
ClientLeft = 45
ClientTop = 330
ClientWidth = 4710
ControlBox = 0 'False
LinkTopic = "Form1"
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
ScaleHeight = 2850
ScaleWidth = 4710
ShowInTaskbar = 0 'False
Begin VB.Frame Frame1
Height = 2775
Left = 120
TabIndex = 0
Top = 0
Width = 4455
Begin TabDlg.SSTab StabUser
Height = 2415
Left = 120
TabIndex = 1
Top = 240
Width = 4215
_ExtentX = 7435
_ExtentY = 4260
_Version = 393216
Style = 1
Tab = 1
TabHeight = 520
BackColor = -2147483629
ForeColor = 16711935
MouseIcon = "FrmUser.frx":0000
TabCaption(0) = "注册用户"
TabPicture(0) = "FrmUser.frx":0452
Tab(0).ControlEnabled= 0 'False
Tab(0).Control(0)= "Frame2"
Tab(0).Control(0).Enabled= 0 'False
Tab(0).ControlCount= 1
TabCaption(1) = "删除用户"
TabPicture(1) = "FrmUser.frx":046E
Tab(1).ControlEnabled= -1 'True
Tab(1).Control(0)= "Frame3"
Tab(1).Control(0).Enabled= 0 'False
Tab(1).ControlCount= 1
TabCaption(2) = "修改密码"
TabPicture(2) = "FrmUser.frx":048A
Tab(2).ControlEnabled= 0 'False
Tab(2).Control(0)= "Frame4"
Tab(2).ControlCount= 1
Begin VB.Frame Frame4
Height = 1935
Left = -74880
TabIndex = 16
Top = 360
Width = 3975
Begin VB.TextBox txtReNewPassword
Height = 300
IMEMode = 3 'DISABLE
Left = 945
PasswordChar = "*"
TabIndex = 26
Text = "txtReNewPassword"
Top = 1440
Width = 1455
End
Begin VB.TextBox txtNewPassword
Height = 285
IMEMode = 3 'DISABLE
Left = 960
PasswordChar = "*"
TabIndex = 24
Text = "txtNewPassword"
Top = 990
Width = 1455
End
Begin VB.TextBox txtOldPassword
Height = 285
IMEMode = 3 'DISABLE
Left = 960
PasswordChar = "*"
TabIndex = 22
Text = "txtOldPassword"
Top = 570
Width = 1455
End
Begin VB.ComboBox CobUpdateUser
Height = 300
Left = 960
TabIndex = 20
Text = "CobUpdateUser"
Top = 180
Width = 1455
End
Begin VB.CommandButton CmdUpdateCancel
Caption = "返回"
Height = 495
Left = 2880
TabIndex = 18
Top = 1170
Width = 855
End
Begin VB.CommandButton CmdUpdateOk
Caption = "确认"
Default = -1 'True
Height = 495
Left = 2880
TabIndex = 17
Top = 450
Width = 855
End
Begin VB.Label Label8
Caption = "验 证:"
Height = 255
Left = 120
TabIndex = 25
Top = 1440
Width = 735
End
Begin VB.Label Label7
Caption = "新密码:"
Height = 255
Left = 120
TabIndex = 23
Top = 1035
Width = 735
End
Begin VB.Label Label6
Caption = "旧密码:"
Height = 255
Left = 120
TabIndex = 21
Top = 600
Width = 735
End
Begin VB.Label lbladdUser
Caption = "用户名:"
Height = 255
Left = 120
TabIndex = 19
Top = 240
Width = 735
End
End
Begin VB.Frame Frame3
Height = 1935
Left = 120
TabIndex = 9
Top = 360
Width = 3975
Begin VB.TextBox txtDelPassword
Height = 285
IMEMode = 3 'DISABLE
Left = 1170
PasswordChar = "*"
TabIndex = 15
Text = "txtDelPassword"
Top = 855
Width = 1455
End
Begin VB.ComboBox CobDelUser
Height = 300
Left = 1170
Style = 2 'Dropdown List
TabIndex = 12
Top = 405
Width = 1455
End
Begin VB.CommandButton CmdDelCancel
Caption = "返回"
Height = 495
Left = 2880
TabIndex = 11
Top = 1170
Width = 855
End
Begin VB.CommandButton CmdDelOk
Caption = "确认"
Height = 495
Left = 2880
TabIndex = 10
Top = 450
Width = 855
End
Begin VB.Label Label4
Caption = "密 码:"
Height = 255
Left = 315
TabIndex = 14
Top = 900
Width = 780
End
Begin VB.Label Label3
Alignment = 2 'Center
Caption = "用户名:"
Height = 375
Left = 270
TabIndex = 13
Top = 450
Width = 825
End
End
Begin VB.Frame Frame2
Height = 1935
Left = -74880
TabIndex = 2
Top = 360
Width = 3975
Begin VB.TextBox txtOkPassword
Height = 285
IMEMode = 3 'DISABLE
Left = 1170
MaxLength = 10
PasswordChar = "*"
TabIndex = 27
Text = "txtPassword"
Top = 1305
Width = 1575
End
Begin VB.CommandButton CmdAddCancel
Caption = "返回"
Height = 495
Left = 2880
TabIndex = 8
Top = 1170
Width = 855
End
Begin VB.CommandButton CmdAddOK
Appearance = 0 'Flat
Caption = "确认"
Height = 495
Left = 2880
TabIndex = 7
Top = 450
Width = 855
End
Begin VB.TextBox txtPassword
Height = 285
IMEMode = 3 'DISABLE
Left = 1170
MaxLength = 10
PasswordChar = "*"
TabIndex = 6
Text = "txtPassword"
Top = 855
Width = 1575
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -