_ 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() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Me.Label1 = New System.Windows.Forms.Label() Me.人民幣中心_tb = New System.Windows.Forms.TextBox() Me.Button2 = New System.Windows.Forms.Button() Me.Button4 = New System.Windows.Forms.Button() Me.Button5 = New System.Windows.Forms.Button() Me.DataGridView4 = New System.Windows.Forms.DataGridView() Me.Label2 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.人民幣買_tb = New System.Windows.Forms.TextBox() Me.人民幣賣_tb = New System.Windows.Forms.TextBox() Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker() Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.TextBox4 = New System.Windows.Forms.TextBox() Me.TextBox5 = New System.Windows.Forms.TextBox() Me.美金中心_tb = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() Me.印尼中心_tb = New System.Windows.Forms.TextBox() Me.Label5 = New System.Windows.Forms.Label() CType(Me.DataGridView4, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label1.Location = New System.Drawing.Point(5, 98) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(73, 20) Me.Label1.TabIndex = 9 Me.Label1.Text = "目前匯率" ' '人民幣中心_tb ' Me.人民幣中心_tb.Enabled = False Me.人民幣中心_tb.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.人民幣中心_tb.Location = New System.Drawing.Point(84, 95) Me.人民幣中心_tb.Name = "人民幣中心_tb" Me.人民幣中心_tb.Size = New System.Drawing.Size(147, 29) Me.人民幣中心_tb.TabIndex = 10 ' 'Button2 ' Me.Button2.Font = New System.Drawing.Font("微軟正黑體", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button2.ForeColor = System.Drawing.Color.DarkGreen Me.Button2.Location = New System.Drawing.Point(9, 190) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(101, 34) Me.Button2.TabIndex = 11 Me.Button2.Text = "修改" Me.Button2.UseVisualStyleBackColor = True ' 'Button4 ' Me.Button4.Enabled = False Me.Button4.Font = New System.Drawing.Font("微軟正黑體", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button4.ForeColor = System.Drawing.Color.Green Me.Button4.Location = New System.Drawing.Point(111, 190) Me.Button4.Name = "Button4" Me.Button4.Size = New System.Drawing.Size(120, 69) Me.Button4.TabIndex = 12 Me.Button4.Text = "儲存修改" Me.Button4.UseVisualStyleBackColor = True ' 'Button5 ' Me.Button5.Enabled = False Me.Button5.Font = New System.Drawing.Font("微軟正黑體", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button5.ForeColor = System.Drawing.Color.Black Me.Button5.Location = New System.Drawing.Point(9, 225) Me.Button5.Name = "Button5" Me.Button5.Size = New System.Drawing.Size(101, 34) Me.Button5.TabIndex = 19 Me.Button5.Text = "取消" Me.Button5.UseVisualStyleBackColor = True ' 'DataGridView4 ' Me.DataGridView4.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.DataGridView4.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1 Me.DataGridView4.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window DataGridViewCellStyle2.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] Me.DataGridView4.DefaultCellStyle = DataGridViewCellStyle2 Me.DataGridView4.Location = New System.Drawing.Point(235, 5) Me.DataGridView4.Name = "DataGridView4" DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control DataGridViewCellStyle3.Font = New System.Drawing.Font("微軟正黑體", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.DataGridView4.RowHeadersDefaultCellStyle = DataGridViewCellStyle3 Me.DataGridView4.RowHeadersWidth = 5 Me.DataGridView4.RowTemplate.Height = 24 Me.DataGridView4.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[True] Me.DataGridView4.Size = New System.Drawing.Size(530, 254) Me.DataGridView4.TabIndex = 39 ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label2.Location = New System.Drawing.Point(5, 36) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(73, 20) Me.Label2.TabIndex = 40 Me.Label2.Text = "買進匯率" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label3.Location = New System.Drawing.Point(5, 67) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(73, 20) Me.Label3.TabIndex = 41 Me.Label3.Text = "賣出匯率" ' '人民幣買_tb ' Me.人民幣買_tb.Enabled = False Me.人民幣買_tb.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.人民幣買_tb.Location = New System.Drawing.Point(84, 33) Me.人民幣買_tb.Name = "人民幣買_tb" Me.人民幣買_tb.Size = New System.Drawing.Size(147, 29) Me.人民幣買_tb.TabIndex = 42 ' '人民幣賣_tb ' Me.人民幣賣_tb.Enabled = False Me.人民幣賣_tb.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.人民幣賣_tb.Location = New System.Drawing.Point(84, 64) Me.人民幣賣_tb.Name = "人民幣賣_tb" Me.人民幣賣_tb.Size = New System.Drawing.Size(147, 29) Me.人民幣賣_tb.TabIndex = 43 ' 'DateTimePicker1 ' Me.DateTimePicker1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.DateTimePicker1.Location = New System.Drawing.Point(9, 5) Me.DateTimePicker1.Name = "DateTimePicker1" Me.DateTimePicker1.Size = New System.Drawing.Size(120, 23) Me.DateTimePicker1.TabIndex = 44 ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.Location = New System.Drawing.Point(135, 11) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(96, 16) Me.CheckBox1.TabIndex = 89 Me.CheckBox1.Text = "寫入歷史資料" Me.CheckBox1.UseVisualStyleBackColor = True ' 'TextBox4 ' Me.TextBox4.Enabled = False Me.TextBox4.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.TextBox4.Location = New System.Drawing.Point(277, 38) Me.TextBox4.Name = "TextBox4" Me.TextBox4.Size = New System.Drawing.Size(83, 23) Me.TextBox4.TabIndex = 90 Me.TextBox4.Visible = False ' 'TextBox5 ' Me.TextBox5.Enabled = False Me.TextBox5.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.TextBox5.Location = New System.Drawing.Point(366, 38) Me.TextBox5.Name = "TextBox5" Me.TextBox5.Size = New System.Drawing.Size(83, 23) Me.TextBox5.TabIndex = 91 Me.TextBox5.Visible = False ' '美金中心_tb ' Me.美金中心_tb.Enabled = False Me.美金中心_tb.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.美金中心_tb.Location = New System.Drawing.Point(84, 126) Me.美金中心_tb.Name = "美金中心_tb" Me.美金中心_tb.Size = New System.Drawing.Size(147, 29) Me.美金中心_tb.TabIndex = 93 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label4.Location = New System.Drawing.Point(5, 130) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(73, 20) Me.Label4.TabIndex = 92 Me.Label4.Text = "美金匯率" ' '印尼中心_tb ' Me.印尼中心_tb.Enabled = False Me.印尼中心_tb.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.印尼中心_tb.Location = New System.Drawing.Point(84, 157) Me.印尼中心_tb.Name = "印尼中心_tb" Me.印尼中心_tb.Size = New System.Drawing.Size(147, 29) Me.印尼中心_tb.TabIndex = 95 ' 'Label5 ' Me.Label5.AutoSize = True Me.Label5.Font = New System.Drawing.Font("微軟正黑體", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label5.Location = New System.Drawing.Point(5, 160) Me.Label5.Name = "Label5" Me.Label5.Size = New System.Drawing.Size(73, 20) Me.Label5.TabIndex = 94 Me.Label5.Text = "印尼匯率" ' '匯率修改 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(771, 265) Me.Controls.Add(Me.印尼中心_tb) Me.Controls.Add(Me.Label5) Me.Controls.Add(Me.美金中心_tb) Me.Controls.Add(Me.Label4) Me.Controls.Add(Me.TextBox5) Me.Controls.Add(Me.TextBox4) Me.Controls.Add(Me.CheckBox1) Me.Controls.Add(Me.DateTimePicker1) Me.Controls.Add(Me.人民幣賣_tb) Me.Controls.Add(Me.人民幣買_tb) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.DataGridView4) Me.Controls.Add(Me.Button5) Me.Controls.Add(Me.Button4) Me.Controls.Add(Me.Button2) Me.Controls.Add(Me.人民幣中心_tb) Me.Controls.Add(Me.Label1) Me.Name = "匯率修改" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "匯率修改" CType(Me.DataGridView4, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents 人民幣中心_tb As System.Windows.Forms.TextBox Friend WithEvents Button2 As System.Windows.Forms.Button Friend WithEvents Button4 As System.Windows.Forms.Button Friend WithEvents Button5 As System.Windows.Forms.Button Friend WithEvents DataGridView4 As DataGridView Friend WithEvents Label2 As Label Friend WithEvents Label3 As Label Friend WithEvents 人民幣買_tb As TextBox Friend WithEvents 人民幣賣_tb As TextBox Friend WithEvents DateTimePicker1 As DateTimePicker Friend WithEvents CheckBox1 As CheckBox Friend WithEvents TextBox4 As TextBox Friend WithEvents TextBox5 As TextBox Friend WithEvents 美金中心_tb As TextBox Friend WithEvents Label4 As Label Friend WithEvents 印尼中心_tb As TextBox Friend WithEvents Label5 As Label End Class