_ 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.components = New System.ComponentModel.Container() Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Button2 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.明細_dgv = New System.Windows.Forms.DataGridView() Me.RadioButton2 = New System.Windows.Forms.RadioButton() Me.RadioButton1 = New System.Windows.Forms.RadioButton() Me.DataGridView2 = New System.Windows.Forms.DataGridView() Me.TextBox5 = New System.Windows.Forms.TextBox() Me.Label8 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.TextBox3 = New System.Windows.Forms.TextBox() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.重新讀取ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator() Me.審核通過ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.單據作廢ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.Label2 = New System.Windows.Forms.Label() Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker() Me.TextBox6 = New System.Windows.Forms.TextBox() Me.Label9 = New System.Windows.Forms.Label() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.Label6 = New System.Windows.Forms.Label() Me.TextBox8 = New System.Windows.Forms.TextBox() Me.Label11 = New System.Windows.Forms.Label() Me.TextBox7 = New System.Windows.Forms.TextBox() Me.Label10 = New System.Windows.Forms.Label() Me.TextBox14 = New System.Windows.Forms.TextBox() Me.TextBox13 = New System.Windows.Forms.TextBox() Me.Label20 = New System.Windows.Forms.Label() Me.Label19 = New System.Windows.Forms.Label() Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.DataGridView3 = New System.Windows.Forms.DataGridView() CType(Me.明細_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).BeginInit() Me.ContextMenuStrip1.SuspendLayout() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DataGridView3, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Button2 ' Me.Button2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button2.ForeColor = System.Drawing.Color.Red Me.Button2.Location = New System.Drawing.Point(1178, 3) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(65, 49) Me.Button2.TabIndex = 825 Me.Button2.Text = "單據作廢" Me.Button2.UseVisualStyleBackColor = True ' 'Button1 ' Me.Button1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, 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(1110, 3) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(65, 49) Me.Button1.TabIndex = 824 Me.Button1.Text = "審核通過" Me.Button1.UseVisualStyleBackColor = True ' '明細_dgv ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(192, 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.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.明細_dgv.Location = New System.Drawing.Point(327, 55) Me.明細_dgv.Name = "明細_dgv" Me.明細_dgv.RowHeadersWidth = 5 DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.明細_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2 Me.明細_dgv.RowTemplate.Height = 24 Me.明細_dgv.Size = New System.Drawing.Size(916, 549) Me.明細_dgv.TabIndex = 823 ' 'RadioButton2 ' Me.RadioButton2.AutoSize = True Me.RadioButton2.Location = New System.Drawing.Point(170, 3) Me.RadioButton2.Name = "RadioButton2" Me.RadioButton2.Size = New System.Drawing.Size(146, 20) Me.RadioButton2.TabIndex = 816 Me.RadioButton2.TabStop = True Me.RadioButton2.Text = "作廢的營運成本收支單" Me.RadioButton2.UseVisualStyleBackColor = True ' 'RadioButton1 ' Me.RadioButton1.AutoSize = True Me.RadioButton1.Location = New System.Drawing.Point(6, 3) Me.RadioButton1.Name = "RadioButton1" Me.RadioButton1.Size = New System.Drawing.Size(158, 20) Me.RadioButton1.TabIndex = 815 Me.RadioButton1.TabStop = True Me.RadioButton1.Text = "未核准的營運成本收支單" Me.RadioButton1.UseVisualStyleBackColor = True ' 'DataGridView2 ' DataGridViewCellStyle3.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.DataGridView2.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle3 Me.DataGridView2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.DataGridView2.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.DataGridView2.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DataGridView2.Location = New System.Drawing.Point(6, 27) Me.DataGridView2.Name = "DataGridView2" Me.DataGridView2.RowHeadersWidth = 5 Me.DataGridView2.RowTemplate.Height = 24 Me.DataGridView2.Size = New System.Drawing.Size(315, 499) Me.DataGridView2.TabIndex = 811 ' 'TextBox5 ' Me.TextBox5.Location = New System.Drawing.Point(671, 29) Me.TextBox5.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox5.Name = "TextBox5" Me.TextBox5.Size = New System.Drawing.Size(113, 23) Me.TextBox5.TabIndex = 850 Me.TextBox5.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label8 ' Me.Label8.AutoSize = True Me.Label8.Location = New System.Drawing.Point(637, 32) Me.Label8.Name = "Label8" Me.Label8.Size = New System.Drawing.Size(32, 16) Me.Label8.TabIndex = 849 Me.Label8.Text = "現金" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Location = New System.Drawing.Point(552, 6) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(44, 16) Me.Label3.TabIndex = 848 Me.Label3.Text = "申請人" ' 'TextBox3 ' Me.TextBox3.Location = New System.Drawing.Point(597, 3) Me.TextBox3.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox3.Name = "TextBox3" Me.TextBox3.Size = New System.Drawing.Size(92, 23) Me.TextBox3.TabIndex = 847 ' 'TextBox1 ' Me.TextBox1.Location = New System.Drawing.Point(429, 3) Me.TextBox1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(122, 23) Me.TextBox1.TabIndex = 845 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(324, 6) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(104, 16) Me.Label1.TabIndex = 846 Me.Label1.Text = "營運成本收支單號" ' 'ContextMenuStrip1 ' Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.重新讀取ToolStripMenuItem, Me.ToolStripSeparator6, Me.審核通過ToolStripMenuItem, Me.單據作廢ToolStripMenuItem}) Me.ContextMenuStrip1.Name = "ContextMenuStrip1" Me.ContextMenuStrip1.Size = New System.Drawing.Size(123, 76) ' '重新讀取ToolStripMenuItem ' Me.重新讀取ToolStripMenuItem.Name = "重新讀取ToolStripMenuItem" Me.重新讀取ToolStripMenuItem.Size = New System.Drawing.Size(122, 22) Me.重新讀取ToolStripMenuItem.Text = "重新讀取" ' 'ToolStripSeparator6 ' Me.ToolStripSeparator6.Name = "ToolStripSeparator6" Me.ToolStripSeparator6.Size = New System.Drawing.Size(119, 6) ' '審核通過ToolStripMenuItem ' Me.審核通過ToolStripMenuItem.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.審核通過ToolStripMenuItem.Name = "審核通過ToolStripMenuItem" Me.審核通過ToolStripMenuItem.Size = New System.Drawing.Size(122, 22) Me.審核通過ToolStripMenuItem.Text = "審核通過" ' '單據作廢ToolStripMenuItem ' Me.單據作廢ToolStripMenuItem.ForeColor = System.Drawing.Color.Red Me.單據作廢ToolStripMenuItem.Name = "單據作廢ToolStripMenuItem" Me.單據作廢ToolStripMenuItem.Size = New System.Drawing.Size(122, 22) Me.單據作廢ToolStripMenuItem.Text = "單據作廢" ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.Checked = True Me.CheckBox1.CheckState = System.Windows.Forms.CheckState.Checked Me.CheckBox1.Location = New System.Drawing.Point(833, 5) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(39, 20) Me.CheckBox1.TabIndex = 882 Me.CheckBox1.Text = "補" Me.CheckBox1.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.ForeColor = System.Drawing.Color.Blue Me.Label2.Location = New System.Drawing.Point(691, 6) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(32, 16) Me.Label2.TabIndex = 881 Me.Label2.Text = "日期" ' 'DateTimePicker1 ' Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.DateTimePicker1.Location = New System.Drawing.Point(730, 3) Me.DateTimePicker1.Name = "DateTimePicker1" Me.DateTimePicker1.Size = New System.Drawing.Size(97, 23) Me.DateTimePicker1.TabIndex = 880 ' 'TextBox6 ' Me.TextBox6.Location = New System.Drawing.Point(994, 29) Me.TextBox6.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox6.Name = "TextBox6" Me.TextBox6.Size = New System.Drawing.Size(113, 23) Me.TextBox6.TabIndex = 887 Me.TextBox6.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label9 ' Me.Label9.AutoSize = True Me.Label9.Location = New System.Drawing.Point(935, 32) Me.Label9.Name = "Label9" Me.Label9.Size = New System.Drawing.Size(56, 16) Me.Label9.TabIndex = 886 Me.Label9.Text = "現金餘額" ' 'TextBox2 ' Me.TextBox2.Location = New System.Drawing.Point(820, 29) Me.TextBox2.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(113, 23) Me.TextBox2.TabIndex = 885 Me.TextBox2.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label6 ' Me.Label6.AutoSize = True Me.Label6.Location = New System.Drawing.Point(786, 32) Me.Label6.Name = "Label6" Me.Label6.Size = New System.Drawing.Size(32, 16) Me.Label6.TabIndex = 884 Me.Label6.Text = "支出" ' 'TextBox8 ' Me.TextBox8.Location = New System.Drawing.Point(522, 29) Me.TextBox8.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox8.Name = "TextBox8" Me.TextBox8.Size = New System.Drawing.Size(113, 23) Me.TextBox8.TabIndex = 891 Me.TextBox8.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label11 ' Me.Label11.AutoSize = True Me.Label11.Location = New System.Drawing.Point(488, 32) Me.Label11.Name = "Label11" Me.Label11.Size = New System.Drawing.Size(32, 16) Me.Label11.TabIndex = 890 Me.Label11.Text = "支票" ' 'TextBox7 ' Me.TextBox7.Location = New System.Drawing.Point(373, 29) Me.TextBox7.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.TextBox7.Name = "TextBox7" Me.TextBox7.Size = New System.Drawing.Size(113, 23) Me.TextBox7.TabIndex = 889 Me.TextBox7.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label10 ' Me.Label10.AutoSize = True Me.Label10.Location = New System.Drawing.Point(327, 32) Me.Label10.Name = "Label10" Me.Label10.Size = New System.Drawing.Size(44, 16) Me.Label10.TabIndex = 888 Me.Label10.Text = "零用金" ' 'TextBox14 ' Me.TextBox14.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.TextBox14.ForeColor = System.Drawing.Color.Blue Me.TextBox14.Location = New System.Drawing.Point(222, 530) Me.TextBox14.Name = "TextBox14" Me.TextBox14.Size = New System.Drawing.Size(99, 23) Me.TextBox14.TabIndex = 964 Me.TextBox14.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'TextBox13 ' Me.TextBox13.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.TextBox13.ForeColor = System.Drawing.Color.Blue Me.TextBox13.Location = New System.Drawing.Point(47, 530) Me.TextBox13.Name = "TextBox13" Me.TextBox13.Size = New System.Drawing.Size(120, 23) Me.TextBox13.TabIndex = 963 Me.TextBox13.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' 'Label20 ' Me.Label20.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.Label20.AutoSize = True Me.Label20.ForeColor = System.Drawing.Color.Blue Me.Label20.Location = New System.Drawing.Point(168, 533) Me.Label20.Name = "Label20" Me.Label20.Size = New System.Drawing.Size(56, 16) Me.Label20.TabIndex = 962 Me.Label20.Text = "圖片編碼" ' 'Label19 ' Me.Label19.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.Label19.AutoSize = True Me.Label19.ForeColor = System.Drawing.Color.Blue Me.Label19.Location = New System.Drawing.Point(5, 533) Me.Label19.Name = "Label19" Me.Label19.Size = New System.Drawing.Size(44, 16) Me.Label19.TabIndex = 961 Me.Label19.Text = "驗證碼" ' 'PictureBox1 ' Me.PictureBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch Me.PictureBox1.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.PictureBox1.Location = New System.Drawing.Point(192, 557) Me.PictureBox1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.PictureBox1.Name = "PictureBox1" Me.PictureBox1.Size = New System.Drawing.Size(129, 47) Me.PictureBox1.TabIndex = 960 Me.PictureBox1.TabStop = False ' 'DataGridView3 ' Me.DataGridView3.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.DataGridView3.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.DataGridView3.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.DataGridView3.Location = New System.Drawing.Point(6, 557) Me.DataGridView3.Name = "DataGridView3" Me.DataGridView3.RowHeadersWidth = 5 Me.DataGridView3.RowTemplate.Height = 24 Me.DataGridView3.Size = New System.Drawing.Size(180, 47) Me.DataGridView3.TabIndex = 959 ' '財務_收支單審核 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1249, 611) Me.ContextMenuStrip = Me.ContextMenuStrip1 Me.Controls.Add(Me.TextBox14) Me.Controls.Add(Me.TextBox13) Me.Controls.Add(Me.Label20) Me.Controls.Add(Me.Label19) Me.Controls.Add(Me.PictureBox1) Me.Controls.Add(Me.DataGridView3) Me.Controls.Add(Me.Label11) Me.Controls.Add(Me.TextBox7) Me.Controls.Add(Me.Label10) Me.Controls.Add(Me.TextBox6) Me.Controls.Add(Me.Label9) Me.Controls.Add(Me.TextBox2) Me.Controls.Add(Me.Label6) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.DateTimePicker1) Me.Controls.Add(Me.TextBox5) Me.Controls.Add(Me.Label8) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.TextBox3) Me.Controls.Add(Me.TextBox1) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.明細_dgv) Me.Controls.Add(Me.RadioButton2) Me.Controls.Add(Me.RadioButton1) Me.Controls.Add(Me.DataGridView2) Me.Controls.Add(Me.TextBox8) 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() CType(Me.DataGridView2, System.ComponentModel.ISupportInitialize).EndInit() Me.ContextMenuStrip1.ResumeLayout(False) CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.DataGridView3, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Button2 As Button Friend WithEvents Button1 As Button Friend WithEvents 明細_dgv As DataGridView Friend WithEvents RadioButton2 As RadioButton Friend WithEvents RadioButton1 As RadioButton Friend WithEvents DataGridView2 As DataGridView Friend WithEvents TextBox5 As TextBox Friend WithEvents Label8 As Label Friend WithEvents Label3 As Label Friend WithEvents TextBox3 As TextBox Friend WithEvents TextBox1 As TextBox Friend WithEvents Label1 As Label Friend WithEvents ContextMenuStrip1 As ContextMenuStrip Friend WithEvents 重新讀取ToolStripMenuItem As ToolStripMenuItem Friend WithEvents ToolStripSeparator6 As ToolStripSeparator Friend WithEvents 審核通過ToolStripMenuItem As ToolStripMenuItem Friend WithEvents 單據作廢ToolStripMenuItem As ToolStripMenuItem Friend WithEvents CheckBox1 As CheckBox Friend WithEvents Label2 As Label Friend WithEvents DateTimePicker1 As DateTimePicker Friend WithEvents TextBox6 As TextBox Friend WithEvents Label9 As Label Friend WithEvents TextBox2 As TextBox Friend WithEvents Label6 As Label Friend WithEvents TextBox8 As TextBox Friend WithEvents Label11 As Label Friend WithEvents TextBox7 As TextBox Friend WithEvents Label10 As Label Friend WithEvents TextBox14 As TextBox Friend WithEvents TextBox13 As TextBox Friend WithEvents Label20 As Label Friend WithEvents Label19 As Label Friend WithEvents PictureBox1 As PictureBox Friend WithEvents DataGridView3 As DataGridView End Class