_ Partial Class 匯入EXCEL 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 DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.匯入進度_Label = New System.Windows.Forms.Label() Me.匯入Excel_PBar = New System.Windows.Forms.ProgressBar() Me.紀錄選擇月份_LBox = New System.Windows.Forms.ListBox() Me.紀錄Sheet年月_LBox = New System.Windows.Forms.ListBox() Me.取消全選_bt = New System.Windows.Forms.Button() Me.全選_bt = New System.Windows.Forms.Button() Me.Label11 = New System.Windows.Forms.Label() Me.薪資帳號_tb = New System.Windows.Forms.TextBox() Me.Label6 = New System.Windows.Forms.Label() Me.身分證_tb = New System.Windows.Forms.TextBox() Me.人事流水號_tb = New System.Windows.Forms.TextBox() Me.流水號_tb = New System.Windows.Forms.TextBox() Me.選擇_TreeView = New System.Windows.Forms.TreeView() Me.匯入EXCEL_bt = New System.Windows.Forms.Button() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.Label5 = New System.Windows.Forms.Label() Me.薪資匯入EXCEL_dgv = New System.Windows.Forms.DataGridView() CType(Me.薪資匯入EXCEL_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '匯入進度_Label ' Me.匯入進度_Label.AutoSize = True Me.匯入進度_Label.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.匯入進度_Label.ForeColor = System.Drawing.SystemColors.HotTrack Me.匯入進度_Label.Location = New System.Drawing.Point(15, 674) Me.匯入進度_Label.Name = "匯入進度_Label" Me.匯入進度_Label.Size = New System.Drawing.Size(108, 17) Me.匯入進度_Label.TabIndex = 1447 Me.匯入進度_Label.Text = "EXCEL 匯入進度 :" ' '匯入Excel_PBar ' Me.匯入Excel_PBar.Location = New System.Drawing.Point(133, 671) Me.匯入Excel_PBar.Name = "匯入Excel_PBar" Me.匯入Excel_PBar.Size = New System.Drawing.Size(1229, 23) Me.匯入Excel_PBar.Step = 1 Me.匯入Excel_PBar.TabIndex = 1446 ' '紀錄選擇月份_LBox ' Me.紀錄選擇月份_LBox.FormattingEnabled = True Me.紀錄選擇月份_LBox.ItemHeight = 16 Me.紀錄選擇月份_LBox.Location = New System.Drawing.Point(247, 613) Me.紀錄選擇月份_LBox.Name = "紀錄選擇月份_LBox" Me.紀錄選擇月份_LBox.Size = New System.Drawing.Size(100, 52) Me.紀錄選擇月份_LBox.TabIndex = 1436 Me.紀錄選擇月份_LBox.Visible = False ' '紀錄Sheet年月_LBox ' Me.紀錄Sheet年月_LBox.FormattingEnabled = True Me.紀錄Sheet年月_LBox.ItemHeight = 16 Me.紀錄Sheet年月_LBox.Location = New System.Drawing.Point(141, 613) Me.紀錄Sheet年月_LBox.Name = "紀錄Sheet年月_LBox" Me.紀錄Sheet年月_LBox.Size = New System.Drawing.Size(100, 52) Me.紀錄Sheet年月_LBox.TabIndex = 1435 Me.紀錄Sheet年月_LBox.Visible = False ' '取消全選_bt ' Me.取消全選_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.取消全選_bt.Location = New System.Drawing.Point(14, 439) Me.取消全選_bt.Margin = New System.Windows.Forms.Padding(2) Me.取消全選_bt.Name = "取消全選_bt" Me.取消全選_bt.Size = New System.Drawing.Size(110, 43) Me.取消全選_bt.TabIndex = 1445 Me.取消全選_bt.Text = "取消全選" Me.取消全選_bt.UseVisualStyleBackColor = True ' '全選_bt ' Me.全選_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.全選_bt.Location = New System.Drawing.Point(14, 392) Me.全選_bt.Margin = New System.Windows.Forms.Padding(2) Me.全選_bt.Name = "全選_bt" Me.全選_bt.Size = New System.Drawing.Size(110, 43) Me.全選_bt.TabIndex = 1444 Me.全選_bt.Text = "全選" Me.全選_bt.UseVisualStyleBackColor = True ' 'Label11 ' Me.Label11.AutoSize = True Me.Label11.Location = New System.Drawing.Point(359, 587) Me.Label11.Name = "Label11" Me.Label11.Size = New System.Drawing.Size(68, 16) Me.Label11.TabIndex = 1443 Me.Label11.Text = "人事流水號" Me.Label11.Visible = False ' '薪資帳號_tb ' Me.薪資帳號_tb.Location = New System.Drawing.Point(426, 609) Me.薪資帳號_tb.Name = "薪資帳號_tb" Me.薪資帳號_tb.ReadOnly = True Me.薪資帳號_tb.Size = New System.Drawing.Size(100, 23) Me.薪資帳號_tb.TabIndex = 1442 Me.薪資帳號_tb.Visible = False ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.Location = New System.Drawing.Point(395, 613) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(32, 16) Me.Label6.TabIndex = 1441 Me.Label6.Text = "帳號" Me.Label6.Visible = False ' '身分證_tb ' Me.身分證_tb.Location = New System.Drawing.Point(426, 637) Me.身分證_tb.Name = "身分證_tb" Me.身分證_tb.ReadOnly = True Me.身分證_tb.Size = New System.Drawing.Size(100, 23) Me.身分證_tb.TabIndex = 1440 Me.身分證_tb.Visible = False ' '人事流水號_tb ' Me.人事流水號_tb.Location = New System.Drawing.Point(426, 581) Me.人事流水號_tb.Name = "人事流水號_tb" Me.人事流水號_tb.ReadOnly = True Me.人事流水號_tb.Size = New System.Drawing.Size(100, 23) Me.人事流水號_tb.TabIndex = 1438 Me.人事流水號_tb.Visible = False ' '流水號_tb ' Me.流水號_tb.Location = New System.Drawing.Point(141, 584) Me.流水號_tb.Name = "流水號_tb" Me.流水號_tb.Size = New System.Drawing.Size(100, 23) Me.流水號_tb.TabIndex = 1437 Me.流水號_tb.Visible = False ' '選擇_TreeView ' Me.選擇_TreeView.CheckBoxes = True Me.選擇_TreeView.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.選擇_TreeView.Indent = 22 Me.選擇_TreeView.ItemHeight = 18 Me.選擇_TreeView.Location = New System.Drawing.Point(15, 10) Me.選擇_TreeView.Name = "選擇_TreeView" Me.選擇_TreeView.Size = New System.Drawing.Size(110, 377) Me.選擇_TreeView.TabIndex = 1434 ' '匯入EXCEL_bt ' Me.匯入EXCEL_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.匯入EXCEL_bt.Location = New System.Drawing.Point(14, 486) Me.匯入EXCEL_bt.Margin = New System.Windows.Forms.Padding(2) Me.匯入EXCEL_bt.Name = "匯入EXCEL_bt" Me.匯入EXCEL_bt.Size = New System.Drawing.Size(110, 180) Me.匯入EXCEL_bt.TabIndex = 1432 Me.匯入EXCEL_bt.Text = "匯入EXCEL" Me.匯入EXCEL_bt.UseVisualStyleBackColor = True ' 'OpenFileDialog1 ' Me.OpenFileDialog1.FileName = "OpenFileDialog1" ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Location = New System.Drawing.Point(367, 641) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(56, 16) Me.Label5.TabIndex = 1439 Me.Label5.Text = "身分證號" Me.Label5.Visible = False ' '薪資匯入EXCEL_dgv ' DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) DataGridViewCellStyle3.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.薪資匯入EXCEL_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3 Me.薪資匯入EXCEL_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.薪資匯入EXCEL_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.薪資匯入EXCEL_dgv.Location = New System.Drawing.Point(133, 10) Me.薪資匯入EXCEL_dgv.Margin = New System.Windows.Forms.Padding(2) Me.薪資匯入EXCEL_dgv.Name = "薪資匯入EXCEL_dgv" Me.薪資匯入EXCEL_dgv.ReadOnly = True Me.薪資匯入EXCEL_dgv.RowHeadersWidth = 5 DataGridViewCellStyle4.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.薪資匯入EXCEL_dgv.RowsDefaultCellStyle = DataGridViewCellStyle4 Me.薪資匯入EXCEL_dgv.RowTemplate.Height = 27 Me.薪資匯入EXCEL_dgv.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.薪資匯入EXCEL_dgv.Size = New System.Drawing.Size(1229, 656) Me.薪資匯入EXCEL_dgv.TabIndex = 1433 ' '匯入EXCEL ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1377, 704) Me.Controls.Add(Me.匯入進度_Label) Me.Controls.Add(Me.匯入Excel_PBar) Me.Controls.Add(Me.紀錄選擇月份_LBox) Me.Controls.Add(Me.紀錄Sheet年月_LBox) Me.Controls.Add(Me.取消全選_bt) Me.Controls.Add(Me.全選_bt) Me.Controls.Add(Me.Label11) Me.Controls.Add(Me.薪資帳號_tb) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.身分證_tb) Me.Controls.Add(Me.人事流水號_tb) Me.Controls.Add(Me.流水號_tb) Me.Controls.Add(Me.選擇_TreeView) Me.Controls.Add(Me.匯入EXCEL_bt) Me.Controls.Add(Me.Label5) Me.Controls.Add(Me.薪資匯入EXCEL_dgv) 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 = "匯入EXCEL" Me.Text = "匯入EXCEL" CType(Me.薪資匯入EXCEL_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 匯入進度_Label As Label Friend WithEvents 匯入Excel_PBar As ProgressBar Friend WithEvents 紀錄選擇月份_LBox As ListBox Friend WithEvents 紀錄Sheet年月_LBox As ListBox Friend WithEvents 取消全選_bt As Button Friend WithEvents 全選_bt As Button Friend WithEvents Label11 As Label Friend WithEvents 薪資帳號_tb As TextBox Friend WithEvents Label6 As Label Friend WithEvents 身分證_tb As TextBox Friend WithEvents 人事流水號_tb As TextBox Friend WithEvents 流水號_tb As TextBox Friend WithEvents 選擇_TreeView As TreeView Friend WithEvents 匯入EXCEL_bt As Button Friend WithEvents OpenFileDialog1 As OpenFileDialog Friend WithEvents Label5 As Label Friend WithEvents 薪資匯入EXCEL_dgv As DataGridView End Class