_ 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() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(加班申請)) Me.月清單_DGV = New System.Windows.Forms.DataGridView() Me.申請_bt = New System.Windows.Forms.Button() Me.事由_tb = New System.Windows.Forms.TextBox() Me.Label7 = 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.Label4 = New System.Windows.Forms.Label() Me.申請人_tb = New System.Windows.Forms.TextBox() Me.Label3 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.請假類別_cb = New System.Windows.Forms.ComboBox() Me.月份_cb = New System.Windows.Forms.ComboBox() Me.年份_cb = New System.Windows.Forms.ComboBox() Me.Label16 = New System.Windows.Forms.Label() Me.Label17 = New System.Windows.Forms.Label() Me.人員_dgv = New System.Windows.Forms.DataGridView() 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.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.月清單_DGV.Location = New System.Drawing.Point(201, 116) Me.月清單_DGV.Name = "月清單_DGV" Me.月清單_DGV.RowHeadersWidth = 5 Me.月清單_DGV.RowTemplate.Height = 24 Me.月清單_DGV.Size = New System.Drawing.Size(1074, 439) Me.月清單_DGV.TabIndex = 835 ' '申請_bt ' Me.申請_bt.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.申請_bt.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.申請_bt.Location = New System.Drawing.Point(201, 561) Me.申請_bt.Name = "申請_bt" Me.申請_bt.Size = New System.Drawing.Size(1074, 29) Me.申請_bt.TabIndex = 834 Me.申請_bt.Text = "加班申請" Me.申請_bt.UseVisualStyleBackColor = True ' '事由_tb ' Me.事由_tb.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.事由_tb.Location = New System.Drawing.Point(250, 66) Me.事由_tb.Multiline = True Me.事由_tb.Name = "事由_tb" Me.事由_tb.Size = New System.Drawing.Size(1025, 44) Me.事由_tb.TabIndex = 833 ' 'Label7 ' Me.Label7.AutoSize = True Me.Label7.Location = New System.Drawing.Point(212, 69) Me.Label7.Name = "Label7" Me.Label7.Size = New System.Drawing.Size(32, 16) Me.Label7.TabIndex = 832 Me.Label7.Text = "事由" ' '特假日期_tb ' Me.特假日期_tb.Enabled = False Me.特假日期_tb.Location = New System.Drawing.Point(504, 10) Me.特假日期_tb.Name = "特假日期_tb" Me.特假日期_tb.Size = New System.Drawing.Size(113, 23) Me.特假日期_tb.TabIndex = 831 ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.Location = New System.Drawing.Point(442, 14) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(56, 16) Me.Label6.TabIndex = 830 Me.Label6.Text = "加班日期" ' '員工編號_tb ' Me.員工編號_tb.Enabled = False Me.員工編號_tb.Location = New System.Drawing.Point(504, 39) Me.員工編號_tb.Name = "員工編號_tb" Me.員工編號_tb.Size = New System.Drawing.Size(113, 23) Me.員工編號_tb.TabIndex = 829 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(442, 42) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(56, 16) Me.Label4.TabIndex = 828 Me.Label4.Text = "員工編號" ' '申請人_tb ' Me.申請人_tb.Enabled = False Me.申請人_tb.Location = New System.Drawing.Point(250, 39) Me.申請人_tb.Name = "申請人_tb" Me.申請人_tb.Size = New System.Drawing.Size(186, 23) Me.申請人_tb.TabIndex = 827 ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Location = New System.Drawing.Point(200, 42) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(44, 16) Me.Label3.TabIndex = 826 Me.Label3.Text = "申請人" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(623, 42) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(32, 16) Me.Label1.TabIndex = 825 Me.Label1.Text = "類別" ' '請假類別_cb ' Me.請假類別_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.請假類別_cb.FormattingEnabled = True Me.請假類別_cb.Items.AddRange(New Object() {"加班(未超關門)", "加班(已超關門)", "出差", "洽公"}) Me.請假類別_cb.Location = New System.Drawing.Point(658, 38) Me.請假類別_cb.Name = "請假類別_cb" Me.請假類別_cb.Size = New System.Drawing.Size(186, 24) Me.請假類別_cb.TabIndex = 824 ' '月份_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(365, 11) Me.月份_cb.Name = "月份_cb" Me.月份_cb.Size = New System.Drawing.Size(71, 24) Me.月份_cb.TabIndex = 823 ' '年份_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(250, 11) Me.年份_cb.Name = "年份_cb" Me.年份_cb.Size = New System.Drawing.Size(71, 24) Me.年份_cb.TabIndex = 822 ' 'Label16 ' Me.Label16.AutoSize = True Me.Label16.Location = New System.Drawing.Point(327, 14) Me.Label16.Name = "Label16" Me.Label16.Size = New System.Drawing.Size(32, 16) Me.Label16.TabIndex = 821 Me.Label16.Text = "月份" ' 'Label17 ' Me.Label17.AutoSize = True Me.Label17.Location = New System.Drawing.Point(212, 14) Me.Label17.Name = "Label17" Me.Label17.Size = New System.Drawing.Size(32, 16) Me.Label17.TabIndex = 820 Me.Label17.Text = "年份" ' '人員_dgv ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, 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), System.Windows.Forms.AnchorStyles) Me.人員_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.人員_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.人員_dgv.Location = New System.Drawing.Point(9, 14) Me.人員_dgv.Name = "人員_dgv" Me.人員_dgv.RowHeadersWidth = 5 Me.人員_dgv.RowTemplate.Height = 24 Me.人員_dgv.Size = New System.Drawing.Size(186, 576) Me.人員_dgv.TabIndex = 819 ' '加班申請 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1285, 600) Me.Controls.Add(Me.月清單_DGV) Me.Controls.Add(Me.申請_bt) Me.Controls.Add(Me.事由_tb) Me.Controls.Add(Me.Label7) Me.Controls.Add(Me.特假日期_tb) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.員工編號_tb) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.申請人_tb) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.請假類別_cb) Me.Controls.Add(Me.月份_cb) Me.Controls.Add(Me.年份_cb) Me.Controls.Add(Me.Label16) Me.Controls.Add(Me.Label17) 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.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 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 申請_bt As Button Friend WithEvents 事由_tb As TextBox Friend WithEvents Label7 As Label Friend WithEvents 特假日期_tb As TextBox Friend WithEvents Label6 As Label Friend WithEvents 員工編號_tb As TextBox Friend WithEvents Label4 As Label Friend WithEvents 申請人_tb As TextBox Friend WithEvents Label3 As Label Friend WithEvents Label1 As Label Friend WithEvents 請假類別_cb As ComboBox Friend WithEvents 月份_cb As ComboBox Friend WithEvents 年份_cb As ComboBox Friend WithEvents Label16 As Label Friend WithEvents Label17 As Label Friend WithEvents 人員_dgv As DataGridView End Class