_ 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.測試_rbt = New System.Windows.Forms.Button() Me.工地_rbt = New System.Windows.Forms.Button() Me.總部_rbt = New System.Windows.Forms.Button() Me.SuspendLayout() ' '測試_rbt ' Me.測試_rbt.BackgroundImage = Global.Calculator_SYS.My.Resources.Resources.test Me.測試_rbt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.測試_rbt.Location = New System.Drawing.Point(167, 4) Me.測試_rbt.Name = "測試_rbt" Me.測試_rbt.Size = New System.Drawing.Size(75, 75) Me.測試_rbt.TabIndex = 2 Me.測試_rbt.UseVisualStyleBackColor = True ' '工地_rbt ' Me.工地_rbt.BackgroundImage = Global.Calculator_SYS.My.Resources.Resources.人員 Me.工地_rbt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.工地_rbt.Location = New System.Drawing.Point(86, 4) Me.工地_rbt.Name = "工地_rbt" Me.工地_rbt.Size = New System.Drawing.Size(75, 75) Me.工地_rbt.TabIndex = 1 Me.工地_rbt.UseVisualStyleBackColor = True ' '總部_rbt ' Me.總部_rbt.BackgroundImage = Global.Calculator_SYS.My.Resources.Resources.User_Clients_01 Me.總部_rbt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.總部_rbt.Location = New System.Drawing.Point(5, 4) Me.總部_rbt.Name = "總部_rbt" Me.總部_rbt.Size = New System.Drawing.Size(75, 75) Me.總部_rbt.TabIndex = 0 Me.總部_rbt.UseVisualStyleBackColor = True ' '線路選擇 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(247, 85) Me.Controls.Add(Me.測試_rbt) Me.Controls.Add(Me.工地_rbt) Me.Controls.Add(Me.總部_rbt) Me.Name = "線路選擇" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "線路選擇" Me.ResumeLayout(False) End Sub Friend WithEvents 總部_rbt As Button Friend WithEvents 工地_rbt As Button Friend WithEvents 測試_rbt As Button End Class