_ 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.DataGridView1 = New System.Windows.Forms.DataGridView() Me.Button4 = New System.Windows.Forms.Button() Me.Button3 = New System.Windows.Forms.Button() Me.Button2 = New System.Windows.Forms.Button() Me.TextBox3 = New System.Windows.Forms.TextBox() Me.Label3 = New System.Windows.Forms.Label() Me.Button1 = New System.Windows.Forms.Button() Me.Label2 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.Button5 = New System.Windows.Forms.Button() Me.ComboBox3 = New System.Windows.Forms.ComboBox() Me.ComboBox1 = New System.Windows.Forms.ComboBox() Me.ComboBox2 = New System.Windows.Forms.ComboBox() Me.Label4 = New System.Windows.Forms.Label() Me.Label5 = New System.Windows.Forms.Label() Me.Label6 = New System.Windows.Forms.Label() Me.Label7 = New System.Windows.Forms.Label() Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker() Me.CheckBox1 = New System.Windows.Forms.CheckBox() CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'DataGridView1 ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.DataGridView1.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.DataGridView1.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DataGridView1.Location = New System.Drawing.Point(12, 12) Me.DataGridView1.Name = "DataGridView1" Me.DataGridView1.RowHeadersWidth = 5 Me.DataGridView1.RowTemplate.Height = 24 Me.DataGridView1.Size = New System.Drawing.Size(655, 598) Me.DataGridView1.TabIndex = 22 ' 'Button4 ' Me.Button4.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button4.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Button4.Location = New System.Drawing.Point(676, 360) Me.Button4.Name = "Button4" Me.Button4.Size = New System.Drawing.Size(211, 58) Me.Button4.TabIndex = 41 Me.Button4.Text = "新增人員" Me.Button4.UseVisualStyleBackColor = True ' 'Button3 ' Me.Button3.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button3.ForeColor = System.Drawing.Color.Red Me.Button3.Location = New System.Drawing.Point(676, 552) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(211, 58) Me.Button3.TabIndex = 40 Me.Button3.Text = "刪除" Me.Button3.UseVisualStyleBackColor = True ' 'Button2 ' Me.Button2.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button2.ForeColor = System.Drawing.Color.Green Me.Button2.Location = New System.Drawing.Point(676, 488) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(211, 58) Me.Button2.TabIndex = 39 Me.Button2.Text = "修改" Me.Button2.UseVisualStyleBackColor = True ' 'TextBox3 ' Me.TextBox3.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.TextBox3.Location = New System.Drawing.Point(730, 74) Me.TextBox3.Name = "TextBox3" Me.TextBox3.Size = New System.Drawing.Size(157, 25) Me.TextBox3.TabIndex = 38 ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label3.Location = New System.Drawing.Point(690, 46) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(34, 17) Me.Label3.TabIndex = 37 Me.Label3.Text = "序號" ' 'Button1 ' Me.Button1.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Button1.Location = New System.Drawing.Point(676, 424) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(211, 58) Me.Button1.TabIndex = 36 Me.Button1.Text = "確認新增" Me.Button1.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label2.Location = New System.Drawing.Point(690, 77) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(34, 17) Me.Label2.TabIndex = 35 Me.Label2.Text = "姓名" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label1.Location = New System.Drawing.Point(673, 15) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(51, 17) Me.Label1.TabIndex = 34 Me.Label1.Text = "DataID" ' 'TextBox2 ' Me.TextBox2.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.TextBox2.Location = New System.Drawing.Point(730, 43) Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(157, 25) Me.TextBox2.TabIndex = 33 ' 'TextBox1 ' Me.TextBox1.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.TextBox1.Location = New System.Drawing.Point(730, 12) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(157, 25) Me.TextBox1.TabIndex = 32 ' 'Button5 ' Me.Button5.Font = New System.Drawing.Font("微軟正黑體", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button5.ForeColor = System.Drawing.Color.Black Me.Button5.Location = New System.Drawing.Point(676, 255) Me.Button5.Name = "Button5" Me.Button5.Size = New System.Drawing.Size(211, 99) Me.Button5.TabIndex = 42 Me.Button5.Text = "查詢" Me.Button5.UseVisualStyleBackColor = True ' 'ComboBox3 ' Me.ComboBox3.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.ComboBox3.FormattingEnabled = True Me.ComboBox3.Items.AddRange(New Object() {"", "直接人工A", "直接人工B", "間接人工A", "間接人工B", "管理人員A", "管理人員B"}) Me.ComboBox3.Location = New System.Drawing.Point(730, 105) Me.ComboBox3.Name = "ComboBox3" Me.ComboBox3.Size = New System.Drawing.Size(157, 24) Me.ComboBox3.TabIndex = 544 ' 'ComboBox1 ' Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.ComboBox1.FormattingEnabled = True Me.ComboBox1.Items.AddRange(New Object() {"", "厂务室", "仓库", "办公室", "业务", "生管部", "后处理", "后勤", "成A", "成A(中)", "成A(后)", "成A(前)", "成B(中)", "成B(后)", "成C", "成C(后)", "成C(前)", "成一线", "成二线", "成三线", "成品仓", "江西品管", "江西面部", "江西鼎晋", "行政部", "技转", "财务室", "财务部", "针A", "针B", "针C", "针D", "品管", "品管(1)", "品管课", "测试房", "原料仓", "样品室", "配料仓", "裁断", "裁断(1)", "裁断(2)"}) Me.ComboBox1.Location = New System.Drawing.Point(730, 135) Me.ComboBox1.Name = "ComboBox1" Me.ComboBox1.Size = New System.Drawing.Size(157, 24) Me.ComboBox1.TabIndex = 545 ' 'ComboBox2 ' Me.ComboBox2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.ComboBox2.FormattingEnabled = True Me.ComboBox2.Items.AddRange(New Object() {"", "养老", "工伤", "养老外厂"}) Me.ComboBox2.Location = New System.Drawing.Point(730, 165) Me.ComboBox2.Name = "ComboBox2" Me.ComboBox2.Size = New System.Drawing.Size(157, 24) Me.ComboBox2.TabIndex = 546 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label4.Location = New System.Drawing.Point(690, 107) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(34, 17) Me.Label4.TabIndex = 547 Me.Label4.Text = "類別" ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label5.Location = New System.Drawing.Point(690, 137) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(34, 17) Me.Label5.TabIndex = 548 Me.Label5.Text = "部門" ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label6.Location = New System.Drawing.Point(690, 167) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(34, 17) Me.Label6.TabIndex = 549 Me.Label6.Text = "險種" ' 'Label7 ' Me.Label7.AutoSize = True Me.Label7.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label7.Location = New System.Drawing.Point(690, 199) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(34, 17) Me.Label7.TabIndex = 550 Me.Label7.Text = "日期" ' 'DateTimePicker1 ' Me.DateTimePicker1.Location = New System.Drawing.Point(730, 195) Me.DateTimePicker1.Name = "DateTimePicker1" Me.DateTimePicker1.Size = New System.Drawing.Size(157, 23) Me.DateTimePicker1.TabIndex = 551 ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.CheckBox1.Location = New System.Drawing.Point(693, 229) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(51, 20) Me.CheckBox1.TabIndex = 552 Me.CheckBox1.Text = "未買" Me.CheckBox1.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(901, 622) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.DateTimePicker1) Me.Controls.Add(Me.Label7) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.Label5) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.ComboBox2) Me.Controls.Add(Me.ComboBox1) Me.Controls.Add(Me.ComboBox3) Me.Controls.Add(Me.Button5) Me.Controls.Add(Me.Button4) Me.Controls.Add(Me.Button3) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.TextBox3) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.TextBox2) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.DataGridView1) 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.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "人員名單入錄" CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents DataGridView1 As DataGridView Friend WithEvents Button4 As Button Friend WithEvents Button3 As Button Friend WithEvents Button2 As Button Friend WithEvents TextBox3 As TextBox Friend WithEvents Label3 As Label Friend WithEvents Button1 As Button Friend WithEvents Label2 As Label Friend WithEvents Label1 As Label Friend WithEvents TextBox2 As TextBox Friend WithEvents TextBox1 As TextBox Friend WithEvents Button5 As Button Friend WithEvents ComboBox3 As ComboBox Friend WithEvents ComboBox1 As ComboBox Friend WithEvents ComboBox2 As ComboBox Friend WithEvents Label4 As Label Friend WithEvents Label5 As Label Friend WithEvents Label6 As Label Friend WithEvents Label7 As Label Friend WithEvents DateTimePicker1 As DateTimePicker Friend WithEvents CheckBox1 As CheckBox End Class