Partial Class Form1 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 resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) Me.電腦註冊_tb = New System.Windows.Forms.Button() Me.Label4 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Label1 = New System.Windows.Forms.Label() Me.磁盘型態_tb = New System.Windows.Forms.TextBox() Me.硬碟序列_tb = New System.Windows.Forms.TextBox() Me.硬碟ID_tb = New System.Windows.Forms.TextBox() Me.取得本地電腦訊息_bt = New System.Windows.Forms.Button() Me.MAC碼_tb = New System.Windows.Forms.TextBox() Me.SuspendLayout() ' '電腦註冊_tb ' Me.電腦註冊_tb.ForeColor = System.Drawing.Color.Red Me.電腦註冊_tb.Location = New System.Drawing.Point(197, 125) Me.電腦註冊_tb.Name = "電腦註冊_tb" Me.電腦註冊_tb.Size = New System.Drawing.Size(183, 52) Me.電腦註冊_tb.TabIndex = 31 Me.電腦註冊_tb.Text = "電腦註冊" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) Me.電腦註冊_tb.UseVisualStyleBackColor = True ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.ForeColor = System.Drawing.Color.Blue Me.Label4.Location = New System.Drawing.Point(11, 99) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(56, 16) Me.Label4.TabIndex = 30 Me.Label4.Text = "磁盘型態" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.ForeColor = System.Drawing.Color.Blue Me.Label3.Location = New System.Drawing.Point(11, 70) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(56, 16) Me.Label3.TabIndex = 29 Me.Label3.Text = "硬碟序列" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.ForeColor = System.Drawing.Color.Blue Me.Label2.Location = New System.Drawing.Point(11, 41) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(44, 16) Me.Label2.TabIndex = 28 Me.Label2.Text = "硬碟ID" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.ForeColor = System.Drawing.Color.Blue Me.Label1.Location = New System.Drawing.Point(11, 12) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(48, 16) Me.Label1.TabIndex = 27 Me.Label1.Text = "MAC碼" ' '磁盘型態_tb ' Me.磁盘型態_tb.ForeColor = System.Drawing.Color.Blue Me.磁盘型態_tb.Location = New System.Drawing.Point(73, 96) Me.磁盘型態_tb.Name = "磁盘型態_tb" Me.磁盘型態_tb.Size = New System.Drawing.Size(307, 23) Me.磁盘型態_tb.TabIndex = 26 ' '硬碟序列_tb ' Me.硬碟序列_tb.ForeColor = System.Drawing.Color.Blue Me.硬碟序列_tb.Location = New System.Drawing.Point(73, 67) Me.硬碟序列_tb.Name = "硬碟序列_tb" Me.硬碟序列_tb.Size = New System.Drawing.Size(307, 23) Me.硬碟序列_tb.TabIndex = 25 ' '硬碟ID_tb ' Me.硬碟ID_tb.ForeColor = System.Drawing.Color.Blue Me.硬碟ID_tb.Location = New System.Drawing.Point(73, 38) Me.硬碟ID_tb.Name = "硬碟ID_tb" Me.硬碟ID_tb.Size = New System.Drawing.Size(307, 23) Me.硬碟ID_tb.TabIndex = 24 ' '取得本地電腦訊息_bt ' Me.取得本地電腦訊息_bt.ForeColor = System.Drawing.Color.Green Me.取得本地電腦訊息_bt.Location = New System.Drawing.Point(9, 125) Me.取得本地電腦訊息_bt.Name = "取得本地電腦訊息_bt" Me.取得本地電腦訊息_bt.Size = New System.Drawing.Size(183, 52) Me.取得本地電腦訊息_bt.TabIndex = 23 Me.取得本地電腦訊息_bt.Text = "取得本地電腦訊息" Me.取得本地電腦訊息_bt.UseVisualStyleBackColor = True ' 'MAC碼_tb ' Me.MAC碼_tb.ForeColor = System.Drawing.Color.Blue Me.MAC碼_tb.Location = New System.Drawing.Point(73, 9) Me.MAC碼_tb.Name = "MAC碼_tb" Me.MAC碼_tb.Size = New System.Drawing.Size(307, 23) Me.MAC碼_tb.TabIndex = 22 ' 'Form1 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(389, 184) 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.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 = "Form1" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "YD-REG-SYS" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 電腦註冊_tb As Button Friend WithEvents Label4 As Label Friend WithEvents Label3 As Label Friend WithEvents Label2 As Label Friend WithEvents Label1 As Label Friend WithEvents 磁盘型態_tb As TextBox Friend WithEvents 硬碟序列_tb As TextBox Friend WithEvents 硬碟ID_tb As TextBox Friend WithEvents 取得本地電腦訊息_bt As Button Friend WithEvents MAC碼_tb As TextBox End Class