📄 admin.vb
字号:
Me.Label32.Size = New System.Drawing.Size(72, 20)
Me.Label32.TabIndex = 10
Me.Label32.Text = "Last Name"
Me.Label32.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtFirstName
'
Me.txtFirstName.Location = New System.Drawing.Point(82, 70)
Me.txtFirstName.Name = "txtFirstName"
Me.txtFirstName.TabIndex = 9
Me.txtFirstName.Text = ""
'
'Label31
'
Me.Label31.Location = New System.Drawing.Point(8, 70)
Me.Label31.Name = "Label31"
Me.Label31.Size = New System.Drawing.Size(72, 20)
Me.Label31.TabIndex = 8
Me.Label31.Text = "First Name"
Me.Label31.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtPassword
'
Me.txtPassword.Location = New System.Drawing.Point(322, 44)
Me.txtPassword.Name = "txtPassword"
Me.txtPassword.PasswordChar = Microsoft.VisualBasic.ChrW(42)
Me.txtPassword.TabIndex = 7
Me.txtPassword.Text = ""
'
'Label30
'
Me.Label30.Location = New System.Drawing.Point(248, 44)
Me.Label30.Name = "Label30"
Me.Label30.Size = New System.Drawing.Size(72, 20)
Me.Label30.TabIndex = 6
Me.Label30.Text = "Password"
Me.Label30.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtLogin
'
Me.txtLogin.Location = New System.Drawing.Point(82, 44)
Me.txtLogin.Name = "txtLogin"
Me.txtLogin.TabIndex = 5
Me.txtLogin.Text = ""
'
'Label29
'
Me.Label29.Location = New System.Drawing.Point(8, 44)
Me.Label29.Name = "Label29"
Me.Label29.Size = New System.Drawing.Size(72, 20)
Me.Label29.TabIndex = 4
Me.Label29.Text = "Login"
Me.Label29.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'optStatusSuspended
'
Me.optStatusSuspended.Location = New System.Drawing.Point(448, 18)
Me.optStatusSuspended.Name = "optStatusSuspended"
Me.optStatusSuspended.Size = New System.Drawing.Size(80, 20)
Me.optStatusSuspended.TabIndex = 3
Me.optStatusSuspended.Text = "Suspended"
'
'optStatusActive
'
Me.optStatusActive.Checked = True
Me.optStatusActive.Location = New System.Drawing.Point(392, 18)
Me.optStatusActive.Name = "optStatusActive"
Me.optStatusActive.Size = New System.Drawing.Size(56, 20)
Me.optStatusActive.TabIndex = 2
Me.optStatusActive.TabStop = True
Me.optStatusActive.Text = "Active"
'
'txtUserID
'
Me.txtUserID.Location = New System.Drawing.Point(82, 18)
Me.txtUserID.Name = "txtUserID"
Me.txtUserID.ReadOnly = True
Me.txtUserID.Size = New System.Drawing.Size(246, 20)
Me.txtUserID.TabIndex = 1
Me.txtUserID.Text = ""
'
'Label28
'
Me.Label28.Location = New System.Drawing.Point(8, 18)
Me.Label28.Name = "Label28"
Me.Label28.Size = New System.Drawing.Size(72, 20)
Me.Label28.TabIndex = 0
Me.Label28.Text = "ID"
Me.Label28.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lvwUsers
'
Me.lvwUsers.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.lvwUsers.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader12, Me.ColumnHeader13, Me.ColumnHeader14, Me.ColumnHeader15, Me.ColumnHeader16})
Me.lvwUsers.FullRowSelect = True
Me.lvwUsers.Location = New System.Drawing.Point(2, 28)
Me.lvwUsers.Name = "lvwUsers"
Me.lvwUsers.Size = New System.Drawing.Size(571, 209)
Me.lvwUsers.TabIndex = 1
Me.lvwUsers.View = System.Windows.Forms.View.Details
'
'ColumnHeader12
'
Me.ColumnHeader12.Text = "Login "
Me.ColumnHeader12.Width = 75
'
'ColumnHeader13
'
Me.ColumnHeader13.Text = "Name"
Me.ColumnHeader13.Width = 150
'
'ColumnHeader14
'
Me.ColumnHeader14.Text = "Email "
Me.ColumnHeader14.Width = 125
'
'ColumnHeader15
'
Me.ColumnHeader15.Text = "Phone "
Me.ColumnHeader15.Width = 100
'
'ColumnHeader16
'
Me.ColumnHeader16.Text = "Status "
Me.ColumnHeader16.Width = 100
'
'Label27
'
Me.Label27.BackColor = System.Drawing.SystemColors.ControlDark
Me.Label27.Dock = System.Windows.Forms.DockStyle.Top
Me.Label27.Font = New System.Drawing.Font("Arial", 12.0!, System.Drawing.FontStyle.Bold)
Me.Label27.ForeColor = System.Drawing.Color.White
Me.Label27.Location = New System.Drawing.Point(0, 0)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(574, 23)
Me.Label27.TabIndex = 0
Me.Label27.Text = "Users"
Me.Label27.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
'
'pnlRoles
'
Me.pnlRoles.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnlRoles.Controls.Add(Me.GroupBox4)
Me.pnlRoles.Controls.Add(Me.lvwRoles)
Me.pnlRoles.Controls.Add(Me.Label21)
Me.pnlRoles.Location = New System.Drawing.Point(5000, 5000)
Me.pnlRoles.Name = "pnlRoles"
Me.pnlRoles.Size = New System.Drawing.Size(576, 427)
Me.pnlRoles.TabIndex = 3
'
'GroupBox4
'
Me.GroupBox4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.GroupBox4.Controls.Add(Me.txtRoleUpdateDate)
Me.GroupBox4.Controls.Add(Me.Label26)
Me.GroupBox4.Controls.Add(Me.txtRanking)
Me.GroupBox4.Controls.Add(Me.Label25)
Me.GroupBox4.Controls.Add(Me.txtRoleDescription)
Me.GroupBox4.Controls.Add(Me.Label24)
Me.GroupBox4.Controls.Add(Me.txtRoleName)
Me.GroupBox4.Controls.Add(Me.Label23)
Me.GroupBox4.Controls.Add(Me.txtRoleID)
Me.GroupBox4.Controls.Add(Me.Label22)
Me.GroupBox4.Location = New System.Drawing.Point(2, 273)
Me.GroupBox4.Name = "GroupBox4"
Me.GroupBox4.Size = New System.Drawing.Size(571, 151)
Me.GroupBox4.TabIndex = 2
Me.GroupBox4.TabStop = False
Me.GroupBox4.Text = "Role Details"
'
'txtRoleUpdateDate
'
Me.txtRoleUpdateDate.Location = New System.Drawing.Point(82, 122)
Me.txtRoleUpdateDate.Name = "txtRoleUpdateDate"
Me.txtRoleUpdateDate.ReadOnly = True
Me.txtRoleUpdateDate.Size = New System.Drawing.Size(134, 20)
Me.txtRoleUpdateDate.TabIndex = 9
Me.txtRoleUpdateDate.Text = ""
'
'Label26
'
Me.Label26.Location = New System.Drawing.Point(8, 122)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(72, 20)
Me.Label26.TabIndex = 8
Me.Label26.Text = "Update Date"
Me.Label26.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtRanking
'
Me.txtRanking.Location = New System.Drawing.Point(82, 96)
Me.txtRanking.Name = "txtRanking"
Me.txtRanking.Size = New System.Drawing.Size(32, 20)
Me.txtRanking.TabIndex = 7
Me.txtRanking.Text = ""
'
'Label25
'
Me.Label25.Location = New System.Drawing.Point(8, 96)
Me.Label25.Name = "Label25"
Me.Label25.Size = New System.Drawing.Size(72, 20)
Me.Label25.TabIndex = 6
Me.Label25.Text = "Ranking"
Me.Label25.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtRoleDescription
'
Me.txtRoleDescription.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.txtRoleDescription.Location = New System.Drawing.Point(82, 70)
Me.txtRoleDescription.Name = "txtRoleDescription"
Me.txtRoleDescription.Size = New System.Drawing.Size(480, 20)
Me.txtRoleDescription.TabIndex = 5
Me.txtRoleDescription.Text = ""
'
'Label24
'
Me.Label24.Location = New System.Drawing.Point(8, 70)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(72, 20)
Me.Label24.TabIndex = 4
Me.Label24.Text = "Description"
Me.Label24.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtRoleName
'
Me.txtRoleName.Location = New System.Drawing.Point(82, 44)
Me.txtRoleName.Name = "txtRoleName"
Me.txtRoleName.Size = New System.Drawing.Size(176, 20)
Me.txtRoleName.TabIndex = 3
Me.txtRoleName.Text = ""
'
'Label23
'
Me.Label23.Location = New System.Drawing.Point(8, 44)
Me.Label23.Name = "Label23"
Me.Label23.Size = New System.Drawing.Size(72, 20)
Me.Label23.TabIndex = 2
Me.Label23.Text = "Name"
Me.Label23.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'txtRoleID
'
Me.txtRoleID.Location = New System.Drawing.Point(82, 18)
Me.txtRoleID.Name = "txtRoleID"
Me.txtRoleID.ReadOnly = True
Me.txtRoleID.Size = New System.Drawing.Size(246, 20)
Me.txtRoleID.TabIndex = 1
Me.txtRoleID.Text = ""
'
'Label22
'
Me.Label22.Location = New System.Drawing.Point(8, 18)
Me.Label22.Name = "Label22"
Me.Label22.Size = New System.Drawing.Size(72, 20)
Me.Label22.TabIndex = 0
Me.Label22.Text = "ID"
Me.Label22.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'lvwRoles
'
Me.lvwRoles.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.lvwRoles.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader8, Me.ColumnHeader9, Me.ColumnHeader10, Me.ColumnHeader11})
Me.lvwRoles.FullRowSelect = True
Me.lvwRoles.Location = New System.Drawing.Point(2, 28)
Me.lvwRoles.Name = "lvwRoles"
Me.lvwRoles.Size = New System.Drawing.Size(571, 237)
Me.lvwRoles.TabIndex = 1
Me.lvwRoles.View = System.Windows.Forms.View.Details
'
'ColumnHeader8
'
Me.ColumnHeader8.Text = "Name "
Me.ColumnHeader8.Width = 150
'
'ColumnHeader9
'
Me.ColumnHeader9.Text = "Description"
Me.ColumnHeader9.Width = 200
'
'ColumnHeader10
'
Me.ColumnHeader10.Text = "Ranking"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -