_ Partial Class FTP資料夾管理 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() Me.刪除_bt = New System.Windows.Forms.Button() Me.修改_bt = New System.Windows.Forms.Button() Me.新增_bt = New System.Windows.Forms.Button() Me.備註_tb = New System.Windows.Forms.TextBox() Me.指定頁面_tb = New System.Windows.Forms.TextBox() Me.資料夾名稱_tb = New System.Windows.Forms.TextBox() Me.主表單_dgv = New System.Windows.Forms.DataGridView() Me.伺服器FTP文件夾_lb = New System.Windows.Forms.Label() Me.WebBrowser1 = New System.Windows.Forms.WebBrowser() Me.指定_tb = New System.Windows.Forms.TextBox() CType(Me.主表單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '刪除_bt ' Me.刪除_bt.Location = New System.Drawing.Point(743, 5) Me.刪除_bt.Name = "刪除_bt" Me.刪除_bt.Size = New System.Drawing.Size(75, 23) Me.刪除_bt.TabIndex = 612 Me.刪除_bt.Text = "刪除" Me.刪除_bt.UseVisualStyleBackColor = True ' '修改_bt ' Me.修改_bt.Location = New System.Drawing.Point(662, 5) Me.修改_bt.Name = "修改_bt" Me.修改_bt.Size = New System.Drawing.Size(75, 23) Me.修改_bt.TabIndex = 611 Me.修改_bt.Text = "修改" Me.修改_bt.UseVisualStyleBackColor = True ' '新增_bt ' Me.新增_bt.Location = New System.Drawing.Point(581, 5) Me.新增_bt.Name = "新增_bt" Me.新增_bt.Size = New System.Drawing.Size(75, 23) Me.新增_bt.TabIndex = 610 Me.新增_bt.Text = "新增" Me.新增_bt.UseVisualStyleBackColor = True ' '備註_tb ' Me.備註_tb.Location = New System.Drawing.Point(299, 5) Me.備註_tb.Name = "備註_tb" Me.備註_tb.Size = New System.Drawing.Size(200, 23) Me.備註_tb.TabIndex = 609 ' '指定頁面_tb ' Me.指定頁面_tb.Location = New System.Drawing.Point(93, 5) Me.指定頁面_tb.Name = "指定頁面_tb" Me.指定頁面_tb.Size = New System.Drawing.Size(200, 23) Me.指定頁面_tb.TabIndex = 608 ' '資料夾名稱_tb ' Me.資料夾名稱_tb.Location = New System.Drawing.Point(17, 5) Me.資料夾名稱_tb.Name = "資料夾名稱_tb" Me.資料夾名稱_tb.Size = New System.Drawing.Size(70, 23) Me.資料夾名稱_tb.TabIndex = 607 ' '主表單_dgv ' DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) Me.主表單_dgv.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1 Me.主表單_dgv.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _ Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.主表單_dgv.AutoSizeColumnsMode = System.Windows.Forms.DataGridViewAutoSizeColumnsMode.Fill Me.主表單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.主表單_dgv.Location = New System.Drawing.Point(4, 34) Me.主表單_dgv.Name = "主表單_dgv" Me.主表單_dgv.RowHeadersWidth = 5 Me.主表單_dgv.RowTemplate.Height = 24 Me.主表單_dgv.Size = New System.Drawing.Size(565, 644) Me.主表單_dgv.TabIndex = 606 ' '伺服器FTP文件夾_lb ' Me.伺服器FTP文件夾_lb.AutoSize = True Me.伺服器FTP文件夾_lb.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.伺服器FTP文件夾_lb.Location = New System.Drawing.Point(960, 12) Me.伺服器FTP文件夾_lb.Name = "伺服器FTP文件夾_lb" Me.伺服器FTP文件夾_lb.Size = New System.Drawing.Size(100, 16) Me.伺服器FTP文件夾_lb.TabIndex = 605 Me.伺服器FTP文件夾_lb.Text = "伺服器FTP文件夾" ' '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(575, 34) Me.WebBrowser1.MinimumSize = New System.Drawing.Size(20, 20) Me.WebBrowser1.Name = "WebBrowser1" Me.WebBrowser1.Size = New System.Drawing.Size(769, 644) Me.WebBrowser1.TabIndex = 604 Me.WebBrowser1.Url = New System.Uri("", System.UriKind.Relative) ' '指定_tb ' Me.指定_tb.Location = New System.Drawing.Point(505, 5) Me.指定_tb.Name = "指定_tb" Me.指定_tb.Size = New System.Drawing.Size(70, 23) Me.指定_tb.TabIndex = 623 ' 'FTP資料夾管理 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 16.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1349, 681) Me.Controls.Add(Me.指定_tb) Me.Controls.Add(Me.刪除_bt) Me.Controls.Add(Me.修改_bt) Me.Controls.Add(Me.新增_bt) Me.Controls.Add(Me.備註_tb) Me.Controls.Add(Me.指定頁面_tb) Me.Controls.Add(Me.資料夾名稱_tb) Me.Controls.Add(Me.主表單_dgv) Me.Controls.Add(Me.伺服器FTP文件夾_lb) Me.Controls.Add(Me.WebBrowser1) 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 = "FTP資料夾管理" Me.Text = "FTP資料夾管理" CType(Me.主表單_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 刪除_bt As Button Friend WithEvents 修改_bt As Button Friend WithEvents 新增_bt As Button Friend WithEvents 備註_tb As TextBox Friend WithEvents 指定頁面_tb As TextBox Friend WithEvents 資料夾名稱_tb As TextBox Friend WithEvents 主表單_dgv As DataGridView Friend WithEvents 伺服器FTP文件夾_lb As Label Friend WithEvents WebBrowser1 As WebBrowser Friend WithEvents 指定_tb As TextBox End Class