_ 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 DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.刪除_bt = New System.Windows.Forms.Button() Me.新增_bt = New System.Windows.Forms.Button() Me.修改_bt = New System.Windows.Forms.Button() Me.類別清單_dgv = New System.Windows.Forms.DataGridView() Me.A1_lb = New System.Windows.Forms.Label() Me.類別1_tb = New System.Windows.Forms.TextBox() Me.GroupBox1 = New System.Windows.Forms.GroupBox() Me.A3_lb = New System.Windows.Forms.Label() Me.類別3_tb = New System.Windows.Forms.TextBox() Me.A2_lb = New System.Windows.Forms.Label() Me.類別2_tb = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.類別編號_tb = New System.Windows.Forms.TextBox() CType(Me.類別清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.GroupBox1.SuspendLayout() Me.SuspendLayout() ' '刪除_bt ' Me.刪除_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.刪除_bt.ForeColor = System.Drawing.Color.Red Me.刪除_bt.Location = New System.Drawing.Point(349, 78) Me.刪除_bt.Name = "刪除_bt" Me.刪除_bt.Size = New System.Drawing.Size(150, 24) Me.刪除_bt.TabIndex = 1368 Me.刪除_bt.Text = "DELETE" Me.刪除_bt.UseVisualStyleBackColor = True ' '新增_bt ' Me.新增_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.新增_bt.ForeColor = System.Drawing.Color.Blue Me.新增_bt.Location = New System.Drawing.Point(349, 28) Me.新增_bt.Name = "新增_bt" Me.新增_bt.Size = New System.Drawing.Size(150, 24) Me.新增_bt.TabIndex = 1366 Me.新增_bt.Text = "ADD" Me.新增_bt.UseVisualStyleBackColor = True ' '修改_bt ' Me.修改_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.修改_bt.ForeColor = System.Drawing.Color.DarkGreen Me.修改_bt.Location = New System.Drawing.Point(349, 53) Me.修改_bt.Name = "修改_bt" Me.修改_bt.Size = New System.Drawing.Size(150, 24) Me.修改_bt.TabIndex = 1367 Me.修改_bt.Text = "SAVE" Me.修改_bt.UseVisualStyleBackColor = True ' '類別清單_dgv ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(224, 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(6, 104) Me.類別清單_dgv.Name = "類別清單_dgv" Me.類別清單_dgv.RowHeadersWidth = 5 DataGridViewCellStyle2.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.類別清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2 Me.類別清單_dgv.RowTemplate.Height = 24 Me.類別清單_dgv.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[True] Me.類別清單_dgv.Size = New System.Drawing.Size(493, 371) Me.類別清單_dgv.TabIndex = 1365 ' 'A1_lb ' Me.A1_lb.AutoSize = True Me.A1_lb.Location = New System.Drawing.Point(6, 19) Me.A1_lb.Name = "A1_lb" Me.A1_lb.Size = New System.Drawing.Size(55, 16) Me.A1_lb.TabIndex = 1361 Me.A1_lb.Text = "繁體中文" ' '類別1_tb ' Me.類別1_tb.Location = New System.Drawing.Point(82, 16) Me.類別1_tb.Name = "類別1_tb" Me.類別1_tb.Size = New System.Drawing.Size(247, 23) Me.類別1_tb.TabIndex = 1360 ' 'GroupBox1 ' Me.GroupBox1.Controls.Add(Me.A3_lb) Me.GroupBox1.Controls.Add(Me.類別3_tb) Me.GroupBox1.Controls.Add(Me.A2_lb) Me.GroupBox1.Controls.Add(Me.類別2_tb) Me.GroupBox1.Controls.Add(Me.A1_lb) Me.GroupBox1.Controls.Add(Me.類別1_tb) Me.GroupBox1.Location = New System.Drawing.Point(6, 3) Me.GroupBox1.Name = "GroupBox1" Me.GroupBox1.Size = New System.Drawing.Size(337, 95) Me.GroupBox1.TabIndex = 1369 Me.GroupBox1.TabStop = False Me.GroupBox1.Text = "供應商類別" ' 'A3_lb ' Me.A3_lb.AutoSize = True Me.A3_lb.Location = New System.Drawing.Point(6, 69) Me.A3_lb.Name = "A3_lb" Me.A3_lb.Size = New System.Drawing.Size(69, 16) Me.A3_lb.TabIndex = 1365 Me.A3_lb.Text = "Indonesian" ' '類別3_tb ' Me.類別3_tb.Location = New System.Drawing.Point(82, 66) Me.類別3_tb.Name = "類別3_tb" Me.類別3_tb.Size = New System.Drawing.Size(247, 23) Me.類別3_tb.TabIndex = 1364 ' 'A2_lb ' Me.A2_lb.AutoSize = True Me.A2_lb.Location = New System.Drawing.Point(6, 44) Me.A2_lb.Name = "A2_lb" Me.A2_lb.Size = New System.Drawing.Size(47, 16) Me.A2_lb.TabIndex = 1363 Me.A2_lb.Text = "English" ' '類別2_tb ' Me.類別2_tb.Location = New System.Drawing.Point(82, 41) Me.類別2_tb.Name = "類別2_tb" Me.類別2_tb.Size = New System.Drawing.Size(247, 23) Me.類別2_tb.TabIndex = 1362 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(349, 7) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(55, 16) Me.Label1.TabIndex = 1371 Me.Label1.Text = "類別編號" ' '類別編號_tb ' Me.類別編號_tb.Location = New System.Drawing.Point(411, 4) Me.類別編號_tb.Name = "類別編號_tb" Me.類別編號_tb.Size = New System.Drawing.Size(88, 23) Me.類別編號_tb.TabIndex = 1370 ' '供應商類別管理 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(504, 478) Me.Controls.Add(Me.刪除_bt) Me.Controls.Add(Me.新增_bt) Me.Controls.Add(Me.修改_bt) Me.Controls.Add(Me.類別清單_dgv) Me.Controls.Add(Me.GroupBox1) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.類別編號_tb) 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, 4, 4, 4) Me.Name = "供應商類別管理" Me.Text = "供應商類別管理" CType(Me.類別清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.GroupBox1.ResumeLayout(False) Me.GroupBox1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 刪除_bt As Button Friend WithEvents 新增_bt As Button Friend WithEvents 修改_bt As Button Friend WithEvents 類別清單_dgv As DataGridView Friend WithEvents A1_lb As Label Friend WithEvents 類別1_tb As TextBox Friend WithEvents GroupBox1 As GroupBox Friend WithEvents A3_lb As Label Friend WithEvents 類別3_tb As TextBox Friend WithEvents A2_lb As Label Friend WithEvents 類別2_tb As TextBox Friend WithEvents Label1 As Label Friend WithEvents 類別編號_tb As TextBox End Class