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.MAC碼_tb = New System.Windows.Forms.TextBox() Me.取得本地電腦訊息_bt = New System.Windows.Forms.Button() Me.硬碟ID_tb = New System.Windows.Forms.TextBox() Me.硬碟序列_tb = New System.Windows.Forms.TextBox() Me.磁盘型態_tb = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.Label4 = New System.Windows.Forms.Label() Me.電腦註冊_tb = New System.Windows.Forms.Button() Me.註冊刪除_bt = New System.Windows.Forms.Button() Me.註冊表_dgv = New System.Windows.Forms.DataGridView() Me.語言_dgv = New System.Windows.Forms.DataGridView() Me.Column1 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.Column2 = New System.Windows.Forms.DataGridViewTextBoxColumn() CType(Me.註冊表_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'MAC碼_tb ' Me.MAC碼_tb.Location = New System.Drawing.Point(74, 3) Me.MAC碼_tb.Name = "MAC碼_tb" Me.MAC碼_tb.Size = New System.Drawing.Size(307, 23) Me.MAC碼_tb.TabIndex = 0 ' '取得本地電腦訊息_bt ' Me.取得本地電腦訊息_bt.Location = New System.Drawing.Point(762, 3) Me.取得本地電腦訊息_bt.Name = "取得本地電腦訊息_bt" Me.取得本地電腦訊息_bt.Size = New System.Drawing.Size(130, 52) Me.取得本地電腦訊息_bt.TabIndex = 1 Me.取得本地電腦訊息_bt.Text = "取得本地電腦訊息" Me.取得本地電腦訊息_bt.UseVisualStyleBackColor = True ' '硬碟ID_tb ' Me.硬碟ID_tb.Location = New System.Drawing.Point(74, 28) Me.硬碟ID_tb.Name = "硬碟ID_tb" Me.硬碟ID_tb.Size = New System.Drawing.Size(307, 23) Me.硬碟ID_tb.TabIndex = 2 ' '硬碟序列_tb ' Me.硬碟序列_tb.Location = New System.Drawing.Point(449, 3) Me.硬碟序列_tb.Name = "硬碟序列_tb" Me.硬碟序列_tb.Size = New System.Drawing.Size(307, 23) Me.硬碟序列_tb.TabIndex = 4 ' '磁盘型態_tb ' Me.磁盘型態_tb.Location = New System.Drawing.Point(449, 28) Me.磁盘型態_tb.Name = "磁盘型態_tb" Me.磁盘型態_tb.Size = New System.Drawing.Size(307, 23) Me.磁盘型態_tb.TabIndex = 6 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.BackColor = System.Drawing.Color.Transparent Me.Label1.Location = New System.Drawing.Point(12, 6) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(47, 16) Me.Label1.TabIndex = 7 Me.Label1.Text = "MAC碼" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.BackColor = System.Drawing.Color.Transparent Me.Label2.Location = New System.Drawing.Point(12, 31) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(43, 16) Me.Label2.TabIndex = 8 Me.Label2.Text = "硬碟ID" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.BackColor = System.Drawing.Color.Transparent Me.Label3.Location = New System.Drawing.Point(387, 6) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(55, 16) Me.Label3.TabIndex = 9 Me.Label3.Text = "硬碟序列" ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.BackColor = System.Drawing.Color.Transparent Me.Label4.Location = New System.Drawing.Point(387, 31) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(55, 16) Me.Label4.TabIndex = 10 Me.Label4.Text = "磁盘型態" ' '電腦註冊_tb ' Me.電腦註冊_tb.Location = New System.Drawing.Point(898, 3) Me.電腦註冊_tb.Name = "電腦註冊_tb" Me.電腦註冊_tb.Size = New System.Drawing.Size(130, 52) Me.電腦註冊_tb.TabIndex = 11 Me.電腦註冊_tb.Text = "電腦註冊" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) Me.電腦註冊_tb.UseVisualStyleBackColor = True ' '註冊刪除_bt ' Me.註冊刪除_bt.ForeColor = System.Drawing.Color.Red Me.註冊刪除_bt.Location = New System.Drawing.Point(1034, 3) Me.註冊刪除_bt.Name = "註冊刪除_bt" Me.註冊刪除_bt.Size = New System.Drawing.Size(130, 52) Me.註冊刪除_bt.TabIndex = 12 Me.註冊刪除_bt.Text = "註冊刪除" Me.註冊刪除_bt.UseVisualStyleBackColor = True ' '註冊表_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) _ 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.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D Me.註冊表_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.註冊表_dgv.Location = New System.Drawing.Point(3, 56) 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(1340, 620) Me.註冊表_dgv.TabIndex = 229 ' '語言_dgv ' Me.語言_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.語言_dgv.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.Column1, Me.Column2}) Me.語言_dgv.Location = New System.Drawing.Point(640, 304) Me.語言_dgv.Name = "語言_dgv" Me.語言_dgv.RowTemplate.Height = 24 Me.語言_dgv.Size = New System.Drawing.Size(70, 73) Me.語言_dgv.TabIndex = 1725 Me.語言_dgv.Visible = False ' 'Column1 ' Me.Column1.HeaderText = "Column1" Me.Column1.Name = "Column1" ' 'Column2 ' Me.Column2.HeaderText = "Column2" Me.Column2.Name = "Column2" ' '系統對應電腦註冊 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1350, 681) Me.Controls.Add(Me.註冊表_dgv) Me.Controls.Add(Me.註冊刪除_bt) Me.Controls.Add(Me.電腦註冊_tb) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.磁盘型態_tb) Me.Controls.Add(Me.硬碟序列_tb) Me.Controls.Add(Me.硬碟ID_tb) Me.Controls.Add(Me.取得本地電腦訊息_bt) Me.Controls.Add(Me.MAC碼_tb) 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(3, 4, 3, 4) Me.Name = "系統對應電腦註冊" 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 MAC碼_tb As TextBox Friend WithEvents 取得本地電腦訊息_bt As Button Friend WithEvents 硬碟ID_tb As TextBox Friend WithEvents 硬碟序列_tb As TextBox Friend WithEvents 磁盘型態_tb As TextBox Friend WithEvents Label1 As Label Friend WithEvents Label2 As Label Friend WithEvents Label3 As Label Friend WithEvents Label4 As Label Friend WithEvents 電腦註冊_tb As Button Friend WithEvents 註冊刪除_bt As Button Friend WithEvents 註冊表_dgv As DataGridView Friend WithEvents 語言_dgv As DataGridView Friend WithEvents Column1 As DataGridViewTextBoxColumn Friend WithEvents Column2 As DataGridViewTextBoxColumn End Class