_ 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.components = New System.ComponentModel.Container() Me.Label379 = New System.Windows.Forms.Label() Me.合約編號3_tb = New System.Windows.Forms.TextBox() Me.合約編號2_tb = New System.Windows.Forms.TextBox() Me.合約編號1_tb = New System.Windows.Forms.TextBox() Me.合約編號_cb = New System.Windows.Forms.ComboBox() Me.Label35 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.合約編號_tb = New System.Windows.Forms.TextBox() Me.Label1 = New System.Windows.Forms.Label() Me.Label3 = New System.Windows.Forms.Label() Me.合約編號修正_bt = New System.Windows.Forms.Button() Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) Me.SuspendLayout() ' 'Label379 ' Me.Label379.AutoSize = True Me.Label379.Font = New System.Drawing.Font("微軟正黑體", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label379.ForeColor = System.Drawing.Color.Green Me.Label379.Location = New System.Drawing.Point(6, 43) Me.Label379.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0) Me.Label379.Name = "Label379" Me.Label379.Size = New System.Drawing.Size(39, 38) Me.Label379.TabIndex = 1045 Me.Label379.Text = "合約" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "編號" Me.Label379.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約編號3_tb ' Me.合約編號3_tb.ForeColor = System.Drawing.Color.Green Me.合約編號3_tb.Location = New System.Drawing.Point(260, 60) Me.合約編號3_tb.Margin = New System.Windows.Forms.Padding(4) Me.合約編號3_tb.Name = "合約編號3_tb" Me.合約編號3_tb.Size = New System.Drawing.Size(40, 23) Me.合約編號3_tb.TabIndex = 1049 ' '合約編號2_tb ' Me.合約編號2_tb.ForeColor = System.Drawing.Color.Green Me.合約編號2_tb.Location = New System.Drawing.Point(183, 60) Me.合約編號2_tb.Margin = New System.Windows.Forms.Padding(4) Me.合約編號2_tb.MaxLength = 6 Me.合約編號2_tb.Name = "合約編號2_tb" Me.合約編號2_tb.Size = New System.Drawing.Size(75, 23) Me.合約編號2_tb.TabIndex = 1048 ' '合約編號1_tb ' Me.合約編號1_tb.ForeColor = System.Drawing.Color.Green Me.合約編號1_tb.Location = New System.Drawing.Point(123, 59) Me.合約編號1_tb.Margin = New System.Windows.Forms.Padding(4) Me.合約編號1_tb.Name = "合約編號1_tb" Me.合約編號1_tb.Size = New System.Drawing.Size(58, 23) Me.合約編號1_tb.TabIndex = 1047 ' '合約編號_cb ' Me.合約編號_cb.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.合約編號_cb.ForeColor = System.Drawing.Color.Green Me.合約編號_cb.FormattingEnabled = True Me.合約編號_cb.Items.AddRange(New Object() {"", "HX", "PGS"}) Me.合約編號_cb.Location = New System.Drawing.Point(48, 59) Me.合約編號_cb.Margin = New System.Windows.Forms.Padding(4) Me.合約編號_cb.Name = "合約編號_cb" Me.合約編號_cb.Size = New System.Drawing.Size(72, 24) Me.合約編號_cb.TabIndex = 1046 ' 'Label35 ' Me.Label35.AutoSize = True Me.Label35.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label35.ForeColor = System.Drawing.Color.Green Me.Label35.Location = New System.Drawing.Point(47, 44) Me.Label35.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0) Me.Label35.Name = "Label35" Me.Label35.Size = New System.Drawing.Size(244, 16) Me.Label35.TabIndex = 1050 Me.Label35.Text = "乙方 甲方 立約日期 序號 " Me.Label35.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.BackColor = System.Drawing.SystemColors.Control Me.Label2.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label2.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.Label2.Location = New System.Drawing.Point(7, 5) Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(103, 16) Me.Label2.TabIndex = 1052 Me.Label2.Text = "系統單上的舊編號" Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約編號_tb ' Me.合約編號_tb.Enabled = False Me.合約編號_tb.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer)) Me.合約編號_tb.Location = New System.Drawing.Point(118, 1) Me.合約編號_tb.Margin = New System.Windows.Forms.Padding(4) Me.合約編號_tb.Name = "合約編號_tb" Me.合約編號_tb.Size = New System.Drawing.Size(182, 23) Me.合約編號_tb.TabIndex = 1051 ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.BackColor = System.Drawing.SystemColors.Control Me.Label1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label1.Location = New System.Drawing.Point(7, 12) Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(297, 16) Me.Label1.TabIndex = 1053 Me.Label1.Text = "__________________________________________________________" Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.BackColor = System.Drawing.SystemColors.Control Me.Label3.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label3.ForeColor = System.Drawing.Color.Green Me.Label3.Location = New System.Drawing.Point(7, 28) Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(67, 16) Me.Label3.TabIndex = 1054 Me.Label3.Text = "指定新編號" Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' '合約編號修正_bt ' Me.合約編號修正_bt.BackgroundImage = Global.HX_PGS_ERP_SYS.My.Resources.Resources.SAVER Me.合約編號修正_bt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.合約編號修正_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.合約編號修正_bt.Location = New System.Drawing.Point(302, 1) Me.合約編號修正_bt.Name = "合約編號修正_bt" Me.合約編號修正_bt.Size = New System.Drawing.Size(82, 82) Me.合約編號修正_bt.TabIndex = 1672 Me.合約編號修正_bt.UseVisualStyleBackColor = True ' 'ToolTip1 ' Me.ToolTip1.AutoPopDelay = 5000 Me.ToolTip1.InitialDelay = 500 Me.ToolTip1.IsBalloon = True Me.ToolTip1.ReshowDelay = 100 Me.ToolTip1.ToolTipTitle = "illustrate" ' '合約編號修改器 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(387, 88) Me.Controls.Add(Me.合約編號修正_bt) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.合約編號_tb) Me.Controls.Add(Me.Label379) Me.Controls.Add(Me.合約編號3_tb) Me.Controls.Add(Me.合約編號2_tb) Me.Controls.Add(Me.合約編號1_tb) Me.Controls.Add(Me.合約編號_cb) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.Label35) 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(4) Me.Name = "合約編號修改器" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "合約編號修改器" Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents Label379 As Label Friend WithEvents 合約編號3_tb As TextBox Friend WithEvents 合約編號2_tb As TextBox Friend WithEvents 合約編號1_tb As TextBox Friend WithEvents 合約編號_cb As ComboBox Friend WithEvents Label35 As Label Friend WithEvents Label2 As Label Friend WithEvents 合約編號_tb As TextBox Friend WithEvents Label1 As Label Friend WithEvents Label3 As Label Friend WithEvents 合約編號修正_bt As Button Friend WithEvents ToolTip1 As ToolTip End Class