?? frmuser.vb
字號(hào):
Public Class frmUser
Inherits System.Windows.Forms.Form
#Region " Windows 窗體設(shè)計(jì)器生成的代碼 "
Public Sub New()
MyBase.New()
'該調(diào)用是 Windows 窗體設(shè)計(jì)器所必需的。
InitializeComponent()
'在 InitializeComponent() 調(diào)用之后添加任何初始化
End Sub
'窗體重寫 dispose 以清理組件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Windows 窗體設(shè)計(jì)器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下過程是 Windows 窗體設(shè)計(jì)器所必需的
'可以使用 Windows 窗體設(shè)計(jì)器修改此過程。
'不要使用代碼編輯器修改它。
Friend WithEvents btnExt As System.Windows.Forms.Button
Friend WithEvents btnSav As System.Windows.Forms.Button
Friend WithEvents btnEdt As System.Windows.Forms.Button
Friend WithEvents btnDel As System.Windows.Forms.Button
Friend WithEvents btnAdd As System.Windows.Forms.Button
Friend WithEvents dgdUser As System.Windows.Forms.DataGrid
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents grbUser As System.Windows.Forms.GroupBox
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents cmbRole As System.Windows.Forms.ComboBox
Friend WithEvents txtPwd As System.Windows.Forms.TextBox
Friend WithEvents txtID As System.Windows.Forms.TextBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmUser))
Me.btnExt = New System.Windows.Forms.Button
Me.btnSav = New System.Windows.Forms.Button
Me.btnEdt = New System.Windows.Forms.Button
Me.btnDel = New System.Windows.Forms.Button
Me.btnAdd = New System.Windows.Forms.Button
Me.dgdUser = New System.Windows.Forms.DataGrid
Me.cmbRole = New System.Windows.Forms.ComboBox
Me.Label5 = New System.Windows.Forms.Label
Me.Label2 = New System.Windows.Forms.Label
Me.grbUser = New System.Windows.Forms.GroupBox
Me.txtPwd = New System.Windows.Forms.TextBox
Me.Label1 = New System.Windows.Forms.Label
Me.txtID = New System.Windows.Forms.TextBox
CType(Me.dgdUser, System.ComponentModel.ISupportInitialize).BeginInit()
Me.grbUser.SuspendLayout()
Me.SuspendLayout()
'
'btnExt
'
Me.btnExt.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.btnExt.Font = New System.Drawing.Font("宋體", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.btnExt.ForeColor = System.Drawing.Color.Teal
Me.btnExt.Location = New System.Drawing.Point(532, 436)
Me.btnExt.Name = "btnExt"
Me.btnExt.Size = New System.Drawing.Size(88, 40)
Me.btnExt.TabIndex = 11
Me.btnExt.Text = "退 出"
'
'btnSav
'
Me.btnSav.Enabled = False
Me.btnSav.Font = New System.Drawing.Font("宋體", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.btnSav.ForeColor = System.Drawing.Color.Teal
Me.btnSav.Location = New System.Drawing.Point(364, 436)
Me.btnSav.Name = "btnSav"
Me.btnSav.Size = New System.Drawing.Size(88, 40)
Me.btnSav.TabIndex = 10
Me.btnSav.Text = "保 存"
'
'btnEdt
'
Me.btnEdt.Font = New System.Drawing.Font("宋體", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.btnEdt.ForeColor = System.Drawing.Color.Teal
Me.btnEdt.Location = New System.Drawing.Point(252, 436)
Me.btnEdt.Name = "btnEdt"
Me.btnEdt.Size = New System.Drawing.Size(88, 40)
Me.btnEdt.TabIndex = 9
Me.btnEdt.Text = "編 輯"
'
'btnDel
'
Me.btnDel.Font = New System.Drawing.Font("宋體", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.btnDel.ForeColor = System.Drawing.Color.Teal
Me.btnDel.Location = New System.Drawing.Point(156, 436)
Me.btnDel.Name = "btnDel"
Me.btnDel.Size = New System.Drawing.Size(88, 40)
Me.btnDel.TabIndex = 8
Me.btnDel.Text = "刪 除"
'
'btnAdd
'
Me.btnAdd.Font = New System.Drawing.Font("宋體", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.btnAdd.ForeColor = System.Drawing.Color.Teal
Me.btnAdd.Location = New System.Drawing.Point(44, 436)
Me.btnAdd.Name = "btnAdd"
Me.btnAdd.Size = New System.Drawing.Size(88, 40)
Me.btnAdd.TabIndex = 5
Me.btnAdd.Text = "增 加"
'
'dgdUser
'
Me.dgdUser.AlternatingBackColor = System.Drawing.Color.GhostWhite
Me.dgdUser.BackColor = System.Drawing.Color.GhostWhite
Me.dgdUser.BackgroundColor = System.Drawing.Color.Lavender
Me.dgdUser.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.dgdUser.CaptionBackColor = System.Drawing.Color.RoyalBlue
Me.dgdUser.CaptionFont = New System.Drawing.Font("Tahoma", 8.0!, System.Drawing.FontStyle.Bold)
Me.dgdUser.CaptionForeColor = System.Drawing.Color.White
Me.dgdUser.CaptionVisible = False
Me.dgdUser.CausesValidation = False
Me.dgdUser.DataMember = ""
Me.dgdUser.FlatMode = True
Me.dgdUser.Font = New System.Drawing.Font("Tahoma", 11.0!)
Me.dgdUser.ForeColor = System.Drawing.Color.MidnightBlue
Me.dgdUser.GridLineColor = System.Drawing.Color.RoyalBlue
Me.dgdUser.HeaderBackColor = System.Drawing.Color.FromArgb(CType(128, Byte), CType(128, Byte), CType(255, Byte))
Me.dgdUser.HeaderFont = New System.Drawing.Font("新宋體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.dgdUser.HeaderForeColor = System.Drawing.Color.Lavender
Me.dgdUser.LinkColor = System.Drawing.Color.Teal
Me.dgdUser.Location = New System.Drawing.Point(40, 8)
Me.dgdUser.Name = "dgdUser"
Me.dgdUser.ParentRowsBackColor = System.Drawing.Color.Lavender
Me.dgdUser.ParentRowsForeColor = System.Drawing.Color.MidnightBlue
Me.dgdUser.ReadOnly = True
Me.dgdUser.SelectionBackColor = System.Drawing.Color.Teal
Me.dgdUser.SelectionForeColor = System.Drawing.Color.PaleGreen
Me.dgdUser.Size = New System.Drawing.Size(504, 144)
Me.dgdUser.TabIndex = 12
'
'cmbRole
'
Me.cmbRole.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cmbRole.Font = New System.Drawing.Font("宋體", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.cmbRole.ItemHeight = 16
Me.cmbRole.Items.AddRange(New Object() {"標(biāo)準(zhǔn)用戶", "管理人員"})
Me.cmbRole.Location = New System.Drawing.Point(119, 110)
Me.cmbRole.Name = "cmbRole"
Me.cmbRole.Size = New System.Drawing.Size(177, 24)
Me.cmbRole.TabIndex = 4
'
'Label5
'
Me.Label5.Font = New System.Drawing.Font("宋體", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label5.ForeColor = System.Drawing.Color.Blue
Me.Label5.Location = New System.Drawing.Point(23, 110)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(88, 24)
Me.Label5.TabIndex = 8
Me.Label5.Text = "權(quán) 限:"
'
'Label2
'
Me.Label2.Font = New System.Drawing.Font("宋體", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label2.ForeColor = System.Drawing.Color.Blue
Me.Label2.Location = New System.Drawing.Point(23, 32)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(88, 24)
Me.Label2.TabIndex = 2
Me.Label2.Text = "帳 號(hào):"
'
'grbUser
'
Me.grbUser.Controls.Add(Me.txtPwd)
Me.grbUser.Controls.Add(Me.Label1)
Me.grbUser.Controls.Add(Me.cmbRole)
Me.grbUser.Controls.Add(Me.Label5)
Me.grbUser.Controls.Add(Me.txtID)
Me.grbUser.Controls.Add(Me.Label2)
Me.grbUser.Font = New System.Drawing.Font("宋體", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.grbUser.ForeColor = System.Drawing.Color.Blue
Me.grbUser.Location = New System.Drawing.Point(28, 164)
Me.grbUser.Name = "grbUser"
Me.grbUser.Size = New System.Drawing.Size(632, 272)
Me.grbUser.TabIndex = 7
Me.grbUser.TabStop = False
Me.grbUser.Text = "用戶詳細(xì)信息:"
'
'txtPwd
'
Me.txtPwd.Location = New System.Drawing.Point(119, 64)
Me.txtPwd.Name = "txtPwd"
Me.txtPwd.Size = New System.Drawing.Size(177, 26)
Me.txtPwd.TabIndex = 1
Me.txtPwd.Text = ""
'
'Label1
'
Me.Label1.Font = New System.Drawing.Font("宋體", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
Me.Label1.ForeColor = System.Drawing.Color.Blue
Me.Label1.Location = New System.Drawing.Point(23, 72)
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -