_ Partial Class 人員資料表 Inherits System.Windows.Forms.Form 'Form 覆寫 Dispose 以清除元件清單。 Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub '為 Windows Form 設計工具的必要項 Private components As System.ComponentModel.IContainer '注意: 以下為 Windows Form 設計工具所需的程序 '可以使用 Windows Form 設計工具進行修改。 '請勿使用程式碼編輯器進行修改。 Private Sub InitializeComponent() Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.人員清單_dgv = New System.Windows.Forms.DataGridView() Me.重讀_bt = New System.Windows.Forms.Button() Me.離職_ch = New System.Windows.Forms.CheckBox() Me.UID_tb = New System.Windows.Forms.TextBox() Me.DIN_tb = New System.Windows.Forms.TextBox() Me.PIN_tb = New System.Windows.Forms.TextBox() Me.UserName_tb = New System.Windows.Forms.TextBox() Me.Sex_tb = New System.Windows.Forms.TextBox() Me.Password_tb = New System.Windows.Forms.TextBox() Me.PasswordQuestion_tb = New System.Windows.Forms.TextBox() Me.PasswordAnswer_tb = New System.Windows.Forms.TextBox() Me.已核准_ch = New System.Windows.Forms.CheckBox() Me.CreateDate_tb = New System.Windows.Forms.TextBox() Me.LastLoginDate_tb = New System.Windows.Forms.TextBox() Me.DeptId_tb = New System.Windows.Forms.TextBox() Me.AttId_tb = New System.Windows.Forms.TextBox() Me.RuleId_tb = New System.Windows.Forms.TextBox() Me.WeekendId_tb = New System.Windows.Forms.TextBox() Me.LastUpdatedUID_tb = New System.Windows.Forms.TextBox() Me.LastUpdatedDate_tb = New System.Windows.Forms.TextBox() Me.Comment_tb = New System.Windows.Forms.TextBox() Me.新增_tb = New System.Windows.Forms.Button() Me.修改_bt = New System.Windows.Forms.Button() Me.在職_ch = New System.Windows.Forms.CheckBox() Me.離職1_ch = New System.Windows.Forms.CheckBox() Me.全部_ch = New System.Windows.Forms.CheckBox() CType(Me.人員清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '人員清單_dgv ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(192, Byte), Integer)) Me.人員清單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.人員清單_dgv.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.人員清單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.人員清單_dgv.BackgroundColor = System.Drawing.Color.White Me.人員清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.人員清單_dgv.Location = New System.Drawing.Point(2, 41) Me.人員清單_dgv.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.人員清單_dgv.Name = "人員清單_dgv" Me.人員清單_dgv.RowHeadersWidth = 5 Me.人員清單_dgv.RowTemplate.Height = 24 Me.人員清單_dgv.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[True] Me.人員清單_dgv.Size = New System.Drawing.Size(1890, 927) Me.人員清單_dgv.TabIndex = 128 ' '重讀_bt ' Me.重讀_bt.Location = New System.Drawing.Point(3, 3) Me.重讀_bt.Name = "重讀_bt" Me.重讀_bt.Size = New System.Drawing.Size(75, 35) Me.重讀_bt.TabIndex = 129 Me.重讀_bt.Text = "重新讀取" Me.重讀_bt.UseVisualStyleBackColor = True ' '離職_ch ' Me.離職_ch.AutoSize = True Me.離職_ch.Location = New System.Drawing.Point(956, 11) Me.離職_ch.Name = "離職_ch" Me.離職_ch.Size = New System.Drawing.Size(50, 20) Me.離職_ch.TabIndex = 130 Me.離職_ch.Text = "離職" Me.離職_ch.UseVisualStyleBackColor = True ' 'UID_tb ' Me.UID_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.UID_tb.Location = New System.Drawing.Point(339, 9) Me.UID_tb.Name = "UID_tb" Me.UID_tb.Size = New System.Drawing.Size(59, 23) Me.UID_tb.TabIndex = 131 ' 'DIN_tb ' Me.DIN_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.DIN_tb.Location = New System.Drawing.Point(397, 9) Me.DIN_tb.Name = "DIN_tb" Me.DIN_tb.Size = New System.Drawing.Size(59, 23) Me.DIN_tb.TabIndex = 132 ' 'PIN_tb ' Me.PIN_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.PIN_tb.Location = New System.Drawing.Point(455, 9) Me.PIN_tb.Name = "PIN_tb" Me.PIN_tb.Size = New System.Drawing.Size(59, 23) Me.PIN_tb.TabIndex = 133 ' 'UserName_tb ' Me.UserName_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.UserName_tb.Location = New System.Drawing.Point(513, 9) Me.UserName_tb.Name = "UserName_tb" Me.UserName_tb.Size = New System.Drawing.Size(91, 23) Me.UserName_tb.TabIndex = 134 ' 'Sex_tb ' Me.Sex_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Sex_tb.Location = New System.Drawing.Point(603, 9) Me.Sex_tb.Name = "Sex_tb" Me.Sex_tb.Size = New System.Drawing.Size(43, 23) Me.Sex_tb.TabIndex = 135 ' 'Password_tb ' Me.Password_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Password_tb.Location = New System.Drawing.Point(645, 9) Me.Password_tb.Name = "Password_tb" Me.Password_tb.Size = New System.Drawing.Size(59, 23) Me.Password_tb.TabIndex = 136 ' 'PasswordQuestion_tb ' Me.PasswordQuestion_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.PasswordQuestion_tb.Location = New System.Drawing.Point(703, 9) Me.PasswordQuestion_tb.Name = "PasswordQuestion_tb" Me.PasswordQuestion_tb.Size = New System.Drawing.Size(91, 23) Me.PasswordQuestion_tb.TabIndex = 137 ' 'PasswordAnswer_tb ' Me.PasswordAnswer_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.PasswordAnswer_tb.Location = New System.Drawing.Point(793, 9) Me.PasswordAnswer_tb.Name = "PasswordAnswer_tb" Me.PasswordAnswer_tb.Size = New System.Drawing.Size(91, 23) Me.PasswordAnswer_tb.TabIndex = 138 ' '已核准_ch ' Me.已核准_ch.AutoSize = True Me.已核准_ch.Location = New System.Drawing.Point(890, 11) Me.已核准_ch.Name = "已核准_ch" Me.已核准_ch.Size = New System.Drawing.Size(62, 20) Me.已核准_ch.TabIndex = 139 Me.已核准_ch.Text = "已核准" Me.已核准_ch.UseVisualStyleBackColor = True ' 'CreateDate_tb ' Me.CreateDate_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.CreateDate_tb.Location = New System.Drawing.Point(1012, 9) Me.CreateDate_tb.Name = "CreateDate_tb" Me.CreateDate_tb.Size = New System.Drawing.Size(163, 23) Me.CreateDate_tb.TabIndex = 140 ' 'LastLoginDate_tb ' Me.LastLoginDate_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.LastLoginDate_tb.Location = New System.Drawing.Point(1174, 9) Me.LastLoginDate_tb.Name = "LastLoginDate_tb" Me.LastLoginDate_tb.Size = New System.Drawing.Size(163, 23) Me.LastLoginDate_tb.TabIndex = 141 ' 'DeptId_tb ' Me.DeptId_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.DeptId_tb.Location = New System.Drawing.Point(1336, 9) Me.DeptId_tb.Name = "DeptId_tb" Me.DeptId_tb.Size = New System.Drawing.Size(59, 23) Me.DeptId_tb.TabIndex = 142 ' 'AttId_tb ' Me.AttId_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.AttId_tb.Location = New System.Drawing.Point(1394, 9) Me.AttId_tb.Name = "AttId_tb" Me.AttId_tb.Size = New System.Drawing.Size(59, 23) Me.AttId_tb.TabIndex = 143 ' 'RuleId_tb ' Me.RuleId_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.RuleId_tb.Location = New System.Drawing.Point(1452, 9) Me.RuleId_tb.Name = "RuleId_tb" Me.RuleId_tb.Size = New System.Drawing.Size(59, 23) Me.RuleId_tb.TabIndex = 144 ' 'WeekendId_tb ' Me.WeekendId_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.WeekendId_tb.Location = New System.Drawing.Point(1510, 9) Me.WeekendId_tb.Name = "WeekendId_tb" Me.WeekendId_tb.Size = New System.Drawing.Size(59, 23) Me.WeekendId_tb.TabIndex = 145 ' 'LastUpdatedUID_tb ' Me.LastUpdatedUID_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.LastUpdatedUID_tb.Location = New System.Drawing.Point(1568, 9) Me.LastUpdatedUID_tb.Name = "LastUpdatedUID_tb" Me.LastUpdatedUID_tb.Size = New System.Drawing.Size(59, 23) Me.LastUpdatedUID_tb.TabIndex = 146 ' 'LastUpdatedDate_tb ' Me.LastUpdatedDate_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.LastUpdatedDate_tb.Location = New System.Drawing.Point(1626, 9) Me.LastUpdatedDate_tb.Name = "LastUpdatedDate_tb" Me.LastUpdatedDate_tb.Size = New System.Drawing.Size(163, 23) Me.LastUpdatedDate_tb.TabIndex = 147 ' 'Comment_tb ' Me.Comment_tb.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Comment_tb.Location = New System.Drawing.Point(1788, 9) Me.Comment_tb.Name = "Comment_tb" Me.Comment_tb.Size = New System.Drawing.Size(59, 23) Me.Comment_tb.TabIndex = 148 ' '新增_tb ' Me.新增_tb.Location = New System.Drawing.Point(231, 3) Me.新增_tb.Name = "新增_tb" Me.新增_tb.Size = New System.Drawing.Size(53, 35) Me.新增_tb.TabIndex = 149 Me.新增_tb.Text = "新增" Me.新增_tb.UseVisualStyleBackColor = True ' '修改_bt ' Me.修改_bt.Location = New System.Drawing.Point(284, 3) Me.修改_bt.Name = "修改_bt" Me.修改_bt.Size = New System.Drawing.Size(53, 35) Me.修改_bt.TabIndex = 150 Me.修改_bt.Text = "修改" Me.修改_bt.UseVisualStyleBackColor = True ' '在職_ch ' Me.在職_ch.AutoSize = True Me.在職_ch.Checked = True Me.在職_ch.CheckState = System.Windows.Forms.CheckState.Checked Me.在職_ch.Location = New System.Drawing.Point(131, 11) Me.在職_ch.Name = "在職_ch" Me.在職_ch.Size = New System.Drawing.Size(50, 20) Me.在職_ch.TabIndex = 151 Me.在職_ch.Text = "在職" Me.在職_ch.UseVisualStyleBackColor = True ' '離職1_ch ' Me.離職1_ch.AutoSize = True Me.離職1_ch.Location = New System.Drawing.Point(183, 11) Me.離職1_ch.Name = "離職1_ch" Me.離職1_ch.Size = New System.Drawing.Size(50, 20) Me.離職1_ch.TabIndex = 152 Me.離職1_ch.Text = "離職" Me.離職1_ch.UseVisualStyleBackColor = True ' '全部_ch ' Me.全部_ch.AutoSize = True Me.全部_ch.Location = New System.Drawing.Point(79, 12) Me.全部_ch.Name = "全部_ch" Me.全部_ch.Size = New System.Drawing.Size(50, 20) Me.全部_ch.TabIndex = 153 Me.全部_ch.Text = "全部" Me.全部_ch.UseVisualStyleBackColor = True ' '人員資料表 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1894, 971) Me.Controls.Add(Me.修改_bt) Me.Controls.Add(Me.新增_tb) Me.Controls.Add(Me.Comment_tb) Me.Controls.Add(Me.LastUpdatedDate_tb) Me.Controls.Add(Me.LastUpdatedUID_tb) Me.Controls.Add(Me.WeekendId_tb) Me.Controls.Add(Me.RuleId_tb) Me.Controls.Add(Me.AttId_tb) Me.Controls.Add(Me.DeptId_tb) Me.Controls.Add(Me.LastLoginDate_tb) Me.Controls.Add(Me.CreateDate_tb) Me.Controls.Add(Me.已核准_ch) Me.Controls.Add(Me.PasswordAnswer_tb) Me.Controls.Add(Me.PasswordQuestion_tb) Me.Controls.Add(Me.Password_tb) Me.Controls.Add(Me.Sex_tb) Me.Controls.Add(Me.UserName_tb) Me.Controls.Add(Me.PIN_tb) Me.Controls.Add(Me.DIN_tb) Me.Controls.Add(Me.UID_tb) Me.Controls.Add(Me.離職_ch) Me.Controls.Add(Me.重讀_bt) Me.Controls.Add(Me.人員清單_dgv) Me.Controls.Add(Me.離職1_ch) Me.Controls.Add(Me.在職_ch) Me.Controls.Add(Me.全部_ch) Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.Name = "人員資料表" Me.Text = "人員資料表" CType(Me.人員清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 人員清單_dgv As DataGridView Friend WithEvents 重讀_bt As Button Friend WithEvents 離職_ch As CheckBox Friend WithEvents UID_tb As TextBox Friend WithEvents DIN_tb As TextBox Friend WithEvents PIN_tb As TextBox Friend WithEvents UserName_tb As TextBox Friend WithEvents Sex_tb As TextBox Friend WithEvents Password_tb As TextBox Friend WithEvents PasswordQuestion_tb As TextBox Friend WithEvents PasswordAnswer_tb As TextBox Friend WithEvents 已核准_ch As CheckBox Friend WithEvents CreateDate_tb As TextBox Friend WithEvents LastLoginDate_tb As TextBox Friend WithEvents DeptId_tb As TextBox Friend WithEvents AttId_tb As TextBox Friend WithEvents RuleId_tb As TextBox Friend WithEvents WeekendId_tb As TextBox Friend WithEvents LastUpdatedUID_tb As TextBox Friend WithEvents LastUpdatedDate_tb As TextBox Friend WithEvents Comment_tb As TextBox Friend WithEvents 新增_tb As Button Friend WithEvents 修改_bt As Button Friend WithEvents 在職_ch As CheckBox Friend WithEvents 離職1_ch As CheckBox Friend WithEvents 全部_ch As CheckBox End Class