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.資料庫版本號_lb = New System.Windows.Forms.Label() Me.Label13 = New System.Windows.Forms.Label() Me.Button14 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.Label3 = New System.Windows.Forms.Label() Me.版本號_tb = New System.Windows.Forms.TextBox() Me.WebBrowser2 = New System.Windows.Forms.WebBrowser() Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() Me.Label12 = New System.Windows.Forms.Label() Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog() Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.TextBox3 = New System.Windows.Forms.TextBox() Me.Label9 = New System.Windows.Forms.Label() Me.TextBox4 = New System.Windows.Forms.TextBox() Me.Button3 = New System.Windows.Forms.Button() Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel1.SuspendLayout() Me.SuspendLayout() ' '資料庫版本號_lb ' Me.資料庫版本號_lb.AutoSize = True Me.資料庫版本號_lb.BackColor = System.Drawing.SystemColors.Control Me.資料庫版本號_lb.Location = New System.Drawing.Point(552, 5) Me.資料庫版本號_lb.Name = "資料庫版本號_lb" Me.資料庫版本號_lb.Size = New System.Drawing.Size(158, 16) Me.資料庫版本號_lb.TabIndex = 602 Me.資料庫版本號_lb.Text = "資料庫版本號 : 2018110801" ' 'Label13 ' Me.Label13.AutoSize = True Me.Label13.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label13.Location = New System.Drawing.Point(13, 7) Me.Label13.Name = "Label13" Me.Label13.Size = New System.Drawing.Size(55, 16) Me.Label13.TabIndex = 601 Me.Label13.Text = "我的電腦" ' 'Button14 ' Me.Button14.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Button14.ForeColor = System.Drawing.Color.Blue Me.Button14.Location = New System.Drawing.Point(74, 3) Me.Button14.Name = "Button14" Me.Button14.Size = New System.Drawing.Size(97, 24) Me.Button14.TabIndex = 600 Me.Button14.Text = "讀取料夾路徑" Me.Button14.UseVisualStyleBackColor = True ' 'Button1 ' Me.Button1.Location = New System.Drawing.Point(441, 1) Me.Button1.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(105, 25) Me.Button1.TabIndex = 599 Me.Button1.Text = "修改" ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.BackColor = System.Drawing.SystemColors.Control Me.Label3.Location = New System.Drawing.Point(281, 7) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(43, 16) Me.Label3.TabIndex = 598 Me.Label3.Text = "版本號" ' '版本號_tb ' Me.版本號_tb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.版本號_tb.Location = New System.Drawing.Point(332, 3) Me.版本號_tb.Margin = New System.Windows.Forms.Padding(5) Me.版本號_tb.Name = "版本號_tb" Me.版本號_tb.Size = New System.Drawing.Size(101, 23) Me.版本號_tb.TabIndex = 597 ' 'WebBrowser2 ' Me.WebBrowser2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.WebBrowser2.Location = New System.Drawing.Point(4, 29) Me.WebBrowser2.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser2.Name = "WebBrowser2" Me.WebBrowser2.Size = New System.Drawing.Size(1341, 326) Me.WebBrowser2.TabIndex = 604 Me.WebBrowser2.Url = New System.Uri("", System.UriKind.Relative) ' 'WebBrowser1 ' Me.WebBrowser1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.WebBrowser1.Location = New System.Drawing.Point(5, 376) Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser1.Name = "WebBrowser1" Me.WebBrowser1.Size = New System.Drawing.Size(1340, 302) Me.WebBrowser1.TabIndex = 603 Me.WebBrowser1.Url = New System.Uri("", System.UriKind.Relative) ' 'Label12 ' Me.Label12.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label12.AutoSize = True Me.Label12.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Label12.Location = New System.Drawing.Point(13, 358) Me.Label12.Name = "Label12" Me.Label12.Size = New System.Drawing.Size(79, 16) Me.Label12.TabIndex = 606 Me.Label12.Text = "執行檔放置區" ' 'FolderBrowserDialog1 ' Me.FolderBrowserDialog1.RootFolder = System.Environment.SpecialFolder.MyComputer Me.FolderBrowserDialog1.SelectedPath = "C:\Users\USER\Desktop" ' 'SaveFileDialog1 ' Me.SaveFileDialog1.DefaultExt = "jpg" Me.SaveFileDialog1.SupportMultiDottedExtensions = True Me.SaveFileDialog1.Title = "指定檔案名稱與選擇檔案路徑" ' 'TextBox1 ' Me.TextBox1.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.TextBox1.Location = New System.Drawing.Point(36, 3) Me.TextBox1.Margin = New System.Windows.Forms.Padding(5) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(89, 23) Me.TextBox1.TabIndex = 609 ' 'TextBox3 ' Me.TextBox3.AllowDrop = True Me.TextBox3.ForeColor = System.Drawing.Color.Black Me.TextBox3.Location = New System.Drawing.Point(3, 3) Me.TextBox3.Multiline = True Me.TextBox3.Name = "TextBox3" Me.TextBox3.Size = New System.Drawing.Size(25, 23) Me.TextBox3.TabIndex = 625 ' 'Label9 ' Me.Label9.AutoSize = True Me.Label9.Location = New System.Drawing.Point(4, 38) Me.Label9.Name = "Label9" Me.Label9.Size = New System.Drawing.Size(55, 16) Me.Label9.TabIndex = 624 Me.Label9.Text = "檔案名稱" ' 'TextBox4 ' Me.TextBox4.AllowDrop = True Me.TextBox4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.TextBox4.ForeColor = System.Drawing.Color.Black Me.TextBox4.Location = New System.Drawing.Point(61, 34) Me.TextBox4.Multiline = True Me.TextBox4.Name = "TextBox4" Me.TextBox4.Size = New System.Drawing.Size(126, 23) Me.TextBox4.TabIndex = 623 ' 'Button3 ' Me.Button3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button3.Location = New System.Drawing.Point(82, 64) Me.Button3.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(105, 24) Me.Button3.TabIndex = 626 Me.Button3.Text = "上傳" ' 'Panel1 ' Me.Panel1.Controls.Add(Me.TextBox3) Me.Panel1.Controls.Add(Me.Button3) Me.Panel1.Controls.Add(Me.TextBox1) Me.Panel1.Controls.Add(Me.Label9) Me.Panel1.Controls.Add(Me.TextBox4) Me.Panel1.Location = New System.Drawing.Point(457, 195) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(200, 100) Me.Panel1.TabIndex = 627 ' '系統執行檔版本管理 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1350, 681) Me.Controls.Add(Me.Panel1) Me.Controls.Add(Me.Label12) Me.Controls.Add(Me.WebBrowser2) Me.Controls.Add(Me.WebBrowser1) Me.Controls.Add(Me.資料庫版本號_lb) Me.Controls.Add(Me.Label13) Me.Controls.Add(Me.Button14) Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.版本號_tb) 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.MaximizeBox = False Me.MinimizeBox = False Me.Name = "系統執行檔版本管理" Me.Text = "系統執行檔版本管理" Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 資料庫版本號_lb As Label Friend WithEvents Label13 As Label Friend WithEvents Button14 As Button Friend WithEvents Button1 As Button Friend WithEvents Label3 As Label Friend WithEvents 版本號_tb As TextBox Friend WithEvents WebBrowser2 As WebBrowser Friend WithEvents WebBrowser1 As WebBrowser Friend WithEvents Label12 As Label Friend WithEvents FolderBrowserDialog1 As FolderBrowserDialog Friend WithEvents SaveFileDialog1 As SaveFileDialog Friend WithEvents TextBox1 As TextBox Friend WithEvents TextBox3 As TextBox Friend WithEvents Label9 As Label Friend WithEvents TextBox4 As TextBox Friend WithEvents Button3 As Button Friend WithEvents Panel1 As Panel End Class