_ 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.結果_tb = New System.Windows.Forms.TextBox() Me.計算式_tb = New System.Windows.Forms.TextBox() Me.等於_bt = New System.Windows.Forms.Button() Me.清除_bt = New System.Windows.Forms.Button() Me.小數點_bt = New System.Windows.Forms.Button() Me.倒退_bt = New System.Windows.Forms.Button() Me.b0_bt = New System.Windows.Forms.Button() Me.b9_bt = New System.Windows.Forms.Button() Me.b8_bt = New System.Windows.Forms.Button() Me.b7_bt = New System.Windows.Forms.Button() Me.b6_bt = New System.Windows.Forms.Button() Me.b5_bt = New System.Windows.Forms.Button() Me.b4_bt = New System.Windows.Forms.Button() Me.b3_bt = New System.Windows.Forms.Button() Me.b2_bt = New System.Windows.Forms.Button() Me.b1_bt = New System.Windows.Forms.Button() Me.數值1_tb = New System.Windows.Forms.TextBox() Me.數值2_tb = New System.Windows.Forms.TextBox() Me.除_bt = New System.Windows.Forms.Button() Me.乘_bt = New System.Windows.Forms.Button() Me.減_bt = New System.Windows.Forms.Button() Me.加_bt = New System.Windows.Forms.Button() Me.資料寫入_bt = New System.Windows.Forms.Button() Me.SuspendLayout() ' '結果_tb ' Me.結果_tb.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.結果_tb.Location = New System.Drawing.Point(4, 28) Me.結果_tb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.結果_tb.Name = "結果_tb" Me.結果_tb.Size = New System.Drawing.Size(234, 39) Me.結果_tb.TabIndex = 859 Me.結果_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Right ' '計算式_tb ' Me.計算式_tb.Location = New System.Drawing.Point(88, 3) Me.計算式_tb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.計算式_tb.Name = "計算式_tb" Me.計算式_tb.Size = New System.Drawing.Size(63, 23) Me.計算式_tb.TabIndex = 858 Me.計算式_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' '等於_bt ' Me.等於_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.等於_bt.Location = New System.Drawing.Point(180, 270) Me.等於_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.等於_bt.Name = "等於_bt" Me.等於_bt.Size = New System.Drawing.Size(58, 67) Me.等於_bt.TabIndex = 857 Me.等於_bt.Text = "=" Me.等於_bt.UseVisualStyleBackColor = True ' '清除_bt ' Me.清除_bt.DialogResult = System.Windows.Forms.DialogResult.Cancel Me.清除_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.清除_bt.Location = New System.Drawing.Point(122, 270) Me.清除_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.清除_bt.Name = "清除_bt" Me.清除_bt.Size = New System.Drawing.Size(58, 67) Me.清除_bt.TabIndex = 856 Me.清除_bt.Text = "AC" Me.清除_bt.UseVisualStyleBackColor = True ' '小數點_bt ' Me.小數點_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.小數點_bt.Location = New System.Drawing.Point(62, 270) Me.小數點_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.小數點_bt.Name = "小數點_bt" Me.小數點_bt.Size = New System.Drawing.Size(58, 67) Me.小數點_bt.TabIndex = 855 Me.小數點_bt.Text = "." Me.小數點_bt.UseVisualStyleBackColor = True ' '倒退_bt ' Me.倒退_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.倒退_bt.Location = New System.Drawing.Point(180, 69) Me.倒退_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.倒退_bt.Name = "倒退_bt" Me.倒退_bt.Size = New System.Drawing.Size(58, 40) Me.倒退_bt.TabIndex = 854 Me.倒退_bt.Text = "➨" Me.倒退_bt.UseVisualStyleBackColor = True ' 'b0_bt ' Me.b0_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b0_bt.Location = New System.Drawing.Point(4, 270) Me.b0_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b0_bt.Name = "b0_bt" Me.b0_bt.Size = New System.Drawing.Size(58, 67) Me.b0_bt.TabIndex = 853 Me.b0_bt.Text = "0" Me.b0_bt.UseVisualStyleBackColor = True ' 'b9_bt ' Me.b9_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b9_bt.Location = New System.Drawing.Point(121, 69) Me.b9_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b9_bt.Name = "b9_bt" Me.b9_bt.Size = New System.Drawing.Size(58, 67) Me.b9_bt.TabIndex = 852 Me.b9_bt.Text = "9" Me.b9_bt.UseVisualStyleBackColor = True ' 'b8_bt ' Me.b8_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b8_bt.Location = New System.Drawing.Point(62, 69) Me.b8_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b8_bt.Name = "b8_bt" Me.b8_bt.Size = New System.Drawing.Size(58, 67) Me.b8_bt.TabIndex = 851 Me.b8_bt.Text = "8" Me.b8_bt.UseVisualStyleBackColor = True ' 'b7_bt ' Me.b7_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b7_bt.Location = New System.Drawing.Point(4, 69) Me.b7_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b7_bt.Name = "b7_bt" Me.b7_bt.Size = New System.Drawing.Size(58, 67) Me.b7_bt.TabIndex = 850 Me.b7_bt.Text = "7" Me.b7_bt.UseVisualStyleBackColor = True ' 'b6_bt ' Me.b6_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b6_bt.Location = New System.Drawing.Point(121, 136) Me.b6_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b6_bt.Name = "b6_bt" Me.b6_bt.Size = New System.Drawing.Size(58, 67) Me.b6_bt.TabIndex = 849 Me.b6_bt.Text = "6" Me.b6_bt.UseVisualStyleBackColor = True ' 'b5_bt ' Me.b5_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b5_bt.Location = New System.Drawing.Point(62, 136) Me.b5_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b5_bt.Name = "b5_bt" Me.b5_bt.Size = New System.Drawing.Size(58, 67) Me.b5_bt.TabIndex = 848 Me.b5_bt.Text = "5" Me.b5_bt.UseVisualStyleBackColor = True ' 'b4_bt ' Me.b4_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b4_bt.Location = New System.Drawing.Point(4, 136) Me.b4_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b4_bt.Name = "b4_bt" Me.b4_bt.Size = New System.Drawing.Size(58, 67) Me.b4_bt.TabIndex = 847 Me.b4_bt.Text = "4" Me.b4_bt.UseVisualStyleBackColor = True ' 'b3_bt ' Me.b3_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b3_bt.Location = New System.Drawing.Point(121, 203) Me.b3_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b3_bt.Name = "b3_bt" Me.b3_bt.Size = New System.Drawing.Size(58, 67) Me.b3_bt.TabIndex = 846 Me.b3_bt.Text = "3" Me.b3_bt.UseVisualStyleBackColor = True ' 'b2_bt ' Me.b2_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b2_bt.Location = New System.Drawing.Point(62, 203) Me.b2_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b2_bt.Name = "b2_bt" Me.b2_bt.Size = New System.Drawing.Size(58, 67) Me.b2_bt.TabIndex = 845 Me.b2_bt.Text = "2" Me.b2_bt.UseVisualStyleBackColor = True ' 'b1_bt ' Me.b1_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.b1_bt.Location = New System.Drawing.Point(4, 203) Me.b1_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.b1_bt.Name = "b1_bt" Me.b1_bt.Size = New System.Drawing.Size(58, 67) Me.b1_bt.TabIndex = 844 Me.b1_bt.Text = "1" Me.b1_bt.UseVisualStyleBackColor = True ' '數值1_tb ' Me.數值1_tb.Location = New System.Drawing.Point(4, 3) Me.數值1_tb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.數值1_tb.Name = "數值1_tb" Me.數值1_tb.Size = New System.Drawing.Size(80, 23) Me.數值1_tb.TabIndex = 843 Me.數值1_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' '數值2_tb ' Me.數值2_tb.Location = New System.Drawing.Point(157, 3) Me.數值2_tb.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.數值2_tb.Name = "數值2_tb" Me.數值2_tb.Size = New System.Drawing.Size(80, 23) Me.數值2_tb.TabIndex = 842 Me.數值2_tb.TextAlign = System.Windows.Forms.HorizontalAlignment.Center ' '除_bt ' Me.除_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.除_bt.Location = New System.Drawing.Point(180, 149) Me.除_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.除_bt.Name = "除_bt" Me.除_bt.Size = New System.Drawing.Size(58, 40) Me.除_bt.TabIndex = 841 Me.除_bt.Text = "/" Me.除_bt.UseVisualStyleBackColor = True ' '乘_bt ' Me.乘_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.乘_bt.Location = New System.Drawing.Point(180, 109) Me.乘_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.乘_bt.Name = "乘_bt" Me.乘_bt.Size = New System.Drawing.Size(58, 40) Me.乘_bt.TabIndex = 840 Me.乘_bt.Text = "X" Me.乘_bt.UseVisualStyleBackColor = True ' '減_bt ' Me.減_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.減_bt.Location = New System.Drawing.Point(180, 230) Me.減_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.減_bt.Name = "減_bt" Me.減_bt.Size = New System.Drawing.Size(58, 40) Me.減_bt.TabIndex = 839 Me.減_bt.Text = "-" Me.減_bt.UseVisualStyleBackColor = True ' '加_bt ' Me.加_bt.Font = New System.Drawing.Font("微軟正黑體", 18.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.加_bt.Location = New System.Drawing.Point(180, 189) Me.加_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.加_bt.Name = "加_bt" Me.加_bt.Size = New System.Drawing.Size(58, 40) Me.加_bt.TabIndex = 838 Me.加_bt.Text = "+" Me.加_bt.UseVisualStyleBackColor = True ' '資料寫入_bt ' Me.資料寫入_bt.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.資料寫入_bt.Location = New System.Drawing.Point(4, 342) Me.資料寫入_bt.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.資料寫入_bt.Name = "資料寫入_bt" Me.資料寫入_bt.Size = New System.Drawing.Size(233, 28) Me.資料寫入_bt.TabIndex = 860 Me.資料寫入_bt.Text = "資料寫入" Me.資料寫入_bt.UseVisualStyleBackColor = True ' '計算機 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(241, 374) Me.Controls.Add(Me.資料寫入_bt) Me.Controls.Add(Me.結果_tb) Me.Controls.Add(Me.計算式_tb) Me.Controls.Add(Me.等於_bt) Me.Controls.Add(Me.清除_bt) Me.Controls.Add(Me.小數點_bt) Me.Controls.Add(Me.倒退_bt) Me.Controls.Add(Me.b0_bt) Me.Controls.Add(Me.b9_bt) Me.Controls.Add(Me.b8_bt) Me.Controls.Add(Me.b7_bt) Me.Controls.Add(Me.b6_bt) Me.Controls.Add(Me.b5_bt) Me.Controls.Add(Me.b4_bt) Me.Controls.Add(Me.b3_bt) Me.Controls.Add(Me.b2_bt) Me.Controls.Add(Me.b1_bt) Me.Controls.Add(Me.數值1_tb) Me.Controls.Add(Me.數值2_tb) Me.Controls.Add(Me.除_bt) Me.Controls.Add(Me.乘_bt) Me.Controls.Add(Me.減_bt) Me.Controls.Add(Me.加_bt) 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.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent Me.Text = "計算機" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 結果_tb As TextBox Friend WithEvents 計算式_tb As TextBox Friend WithEvents 等於_bt As Button Friend WithEvents 清除_bt As Button Friend WithEvents 小數點_bt As Button Friend WithEvents 倒退_bt As Button Friend WithEvents b0_bt As Button Friend WithEvents b9_bt As Button Friend WithEvents b8_bt As Button Friend WithEvents b7_bt As Button Friend WithEvents b6_bt As Button Friend WithEvents b5_bt As Button Friend WithEvents b4_bt As Button Friend WithEvents b3_bt As Button Friend WithEvents b2_bt As Button Friend WithEvents b1_bt As Button Friend WithEvents 數值1_tb As TextBox Friend WithEvents 數值2_tb As TextBox Friend WithEvents 除_bt As Button Friend WithEvents 乘_bt As Button Friend WithEvents 減_bt As Button Friend WithEvents 加_bt As Button Friend WithEvents 資料寫入_bt As Button End Class