_ 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() Me.月清單_dgv = New System.Windows.Forms.DataGridView() Me.R_bt = New System.Windows.Forms.Button() Me.Label17 = New System.Windows.Forms.Label() Me.年份_cb = New System.Windows.Forms.ComboBox() Me.月份_cb = New System.Windows.Forms.ComboBox() Me.Label16 = New System.Windows.Forms.Label() Me.彈性工時_cb = New System.Windows.Forms.CheckBox() Me.正常工時_ch = New System.Windows.Forms.CheckBox() Me.合計_dgv = New System.Windows.Forms.DataGridView() Me.列印_bt = New System.Windows.Forms.Button() CType(Me.月清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.合計_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '月清單_dgv ' 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(5, 30) Me.月清單_dgv.Name = "月清單_dgv" Me.月清單_dgv.RowHeadersWidth = 5 Me.月清單_dgv.RowTemplate.Height = 24 Me.月清單_dgv.Size = New System.Drawing.Size(1484, 603) Me.月清單_dgv.TabIndex = 688 ' 'R_bt ' Me.R_bt.Location = New System.Drawing.Point(1465, 4) Me.R_bt.Name = "R_bt" Me.R_bt.Size = New System.Drawing.Size(23, 23) Me.R_bt.TabIndex = 837 Me.R_bt.Text = "R" Me.R_bt.UseVisualStyleBackColor = True ' 'Label17 ' Me.Label17.AutoSize = True Me.Label17.Location = New System.Drawing.Point(6, 7) Me.Label17.Name = "Label17" Me.Label17.Size = New System.Drawing.Size(31, 16) Me.Label17.TabIndex = 838 Me.Label17.Text = "年份" ' '年份_cb ' Me.年份_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.年份_cb.FormattingEnabled = True Me.年份_cb.Items.AddRange(New Object() {"2019", "2020", "2021", "2022", "2023", "2024", "2025", "2026", "2027", "2028", "2029", "2030"}) Me.年份_cb.Location = New System.Drawing.Point(38, 3) Me.年份_cb.Name = "年份_cb" Me.年份_cb.Size = New System.Drawing.Size(61, 24) Me.年份_cb.TabIndex = 840 ' '月份_cb ' Me.月份_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.月份_cb.FormattingEnabled = True Me.月份_cb.Items.AddRange(New Object() {"01", "02", "03", "04", "05", "06", "07", "08", "09", "10", "11", "12"}) Me.月份_cb.Location = New System.Drawing.Point(127, 3) Me.月份_cb.Name = "月份_cb" Me.月份_cb.Size = New System.Drawing.Size(46, 24) Me.月份_cb.TabIndex = 841 ' 'Label16 ' Me.Label16.AutoSize = True Me.Label16.Location = New System.Drawing.Point(97, 7) Me.Label16.Name = "Label16" Me.Label16.Size = New System.Drawing.Size(31, 16) Me.Label16.TabIndex = 839 Me.Label16.Text = "月份" ' '彈性工時_cb ' Me.彈性工時_cb.AutoSize = True Me.彈性工時_cb.Checked = True Me.彈性工時_cb.CheckState = System.Windows.Forms.CheckState.Checked Me.彈性工時_cb.Location = New System.Drawing.Point(179, 5) Me.彈性工時_cb.Name = "彈性工時_cb" Me.彈性工時_cb.Size = New System.Drawing.Size(110, 20) Me.彈性工時_cb.TabIndex = 842 Me.彈性工時_cb.Text = "已彈性工時計算" Me.彈性工時_cb.UseVisualStyleBackColor = True ' '正常工時_ch ' Me.正常工時_ch.AutoSize = True Me.正常工時_ch.Location = New System.Drawing.Point(295, 5) Me.正常工時_ch.Name = "正常工時_ch" Me.正常工時_ch.Size = New System.Drawing.Size(110, 20) Me.正常工時_ch.TabIndex = 843 Me.正常工時_ch.Text = "已正常工時計算" Me.正常工時_ch.UseVisualStyleBackColor = True ' '合計_dgv ' Me.合計_dgv.Anchor = CType(((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(5, 632) Me.合計_dgv.Name = "合計_dgv" Me.合計_dgv.RowHeadersWidth = 5 Me.合計_dgv.RowTemplate.Height = 24 Me.合計_dgv.Size = New System.Drawing.Size(1484, 26) Me.合計_dgv.TabIndex = 844 ' '列印_bt ' Me.列印_bt.Location = New System.Drawing.Point(410, 2) Me.列印_bt.Name = "列印_bt" Me.列印_bt.Size = New System.Drawing.Size(114, 26) Me.列印_bt.TabIndex = 845 Me.列印_bt.Text = "列印 EXCEL" Me.列印_bt.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(1492, 661) Me.Controls.Add(Me.列印_bt) Me.Controls.Add(Me.合計_dgv) Me.Controls.Add(Me.正常工時_ch) Me.Controls.Add(Me.彈性工時_cb) Me.Controls.Add(Me.Label17) Me.Controls.Add(Me.年份_cb) Me.Controls.Add(Me.月份_cb) Me.Controls.Add(Me.Label16) Me.Controls.Add(Me.R_bt) Me.Controls.Add(Me.月清單_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(4) Me.Name = "薪資表" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "薪資表" CType(Me.月清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.合計_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 月清單_dgv As DataGridView Friend WithEvents R_bt As Button Friend WithEvents Label17 As Label Friend WithEvents 年份_cb As ComboBox Friend WithEvents 月份_cb As ComboBox Friend WithEvents Label16 As Label Friend WithEvents 彈性工時_cb As CheckBox Friend WithEvents 正常工時_ch As CheckBox Friend WithEvents 合計_dgv As DataGridView Friend WithEvents 列印_bt As Button End Class