_ 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() Me.語轉扭_bt = New System.Windows.Forms.Button() Me.語言_dgv = New System.Windows.Forms.DataGridView() Me.大間距1_ch = New System.Windows.Forms.CheckBox() Me.中間距1_ch = New System.Windows.Forms.CheckBox() Me.小間距1_ch = New System.Windows.Forms.CheckBox() Me.批量刷新_bt = New System.Windows.Forms.Button() Me.刪除_bt = New System.Windows.Forms.Button() Me.Label2 = New System.Windows.Forms.Label() Me.存檔_bt = New System.Windows.Forms.Button() Me.選定權限取消_bt = New System.Windows.Forms.Button() Me.部門權限指定_bt = New System.Windows.Forms.Button() Me.級別1_tb = New System.Windows.Forms.TextBox() Me.組別1_tb = New System.Windows.Forms.TextBox() Me.課別1_tb = New System.Windows.Forms.TextBox() Me.處別1_tb = New System.Windows.Forms.TextBox() Me.部門1_tb = New System.Windows.Forms.TextBox() Me.級別_lb = New System.Windows.Forms.Label() Me.DateTimePicker2 = New System.Windows.Forms.DateTimePicker() Me.帳號_tb = New System.Windows.Forms.TextBox() Me.姓名_tb = New System.Windows.Forms.TextBox() Me.組別_tb = New System.Windows.Forms.TextBox() Me.課別_tb = New System.Windows.Forms.TextBox() 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.清單_dgv = New System.Windows.Forms.DataGridView() CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.設定_dgv, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' '語轉扭_bt ' Me.語轉扭_bt.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.語轉扭_bt.ForeColor = System.Drawing.Color.Black Me.語轉扭_bt.Location = New System.Drawing.Point(1313, 61) Me.語轉扭_bt.Name = "語轉扭_bt" Me.語轉扭_bt.Size = New System.Drawing.Size(25, 25) Me.語轉扭_bt.TabIndex = 1379 Me.語轉扭_bt.Text = "L" Me.語轉扭_bt.UseVisualStyleBackColor = True ' '語言_dgv ' Me.語言_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.語言_dgv.Location = New System.Drawing.Point(595, 304) Me.語言_dgv.Name = "語言_dgv" Me.語言_dgv.RowTemplate.Height = 24 Me.語言_dgv.Size = New System.Drawing.Size(158, 73) Me.語言_dgv.TabIndex = 1378 Me.語言_dgv.Visible = False ' '大間距1_ch ' Me.大間距1_ch.AutoSize = True Me.大間距1_ch.Location = New System.Drawing.Point(897, 64) Me.大間距1_ch.Name = "大間距1_ch" Me.大間距1_ch.Size = New System.Drawing.Size(40, 20) Me.大間距1_ch.TabIndex = 1377 Me.大間距1_ch.Text = "L3" Me.大間距1_ch.UseVisualStyleBackColor = True ' '中間距1_ch ' Me.中間距1_ch.AutoSize = True Me.中間距1_ch.Location = New System.Drawing.Point(836, 64) Me.中間距1_ch.Name = "中間距1_ch" Me.中間距1_ch.Size = New System.Drawing.Size(40, 20) Me.中間距1_ch.TabIndex = 1376 Me.中間距1_ch.Text = "L2" Me.中間距1_ch.UseVisualStyleBackColor = True ' '小間距1_ch ' Me.小間距1_ch.AutoSize = True Me.小間距1_ch.Location = New System.Drawing.Point(772, 64) Me.小間距1_ch.Name = "小間距1_ch" Me.小間距1_ch.Size = New System.Drawing.Size(40, 20) Me.小間距1_ch.TabIndex = 1375 Me.小間距1_ch.Text = "L1" Me.小間距1_ch.UseVisualStyleBackColor = True ' '批量刷新_bt ' Me.批量刷新_bt.ForeColor = System.Drawing.Color.Green Me.批量刷新_bt.Location = New System.Drawing.Point(1103, 61) Me.批量刷新_bt.Name = "批量刷新_bt" Me.批量刷新_bt.Size = New System.Drawing.Size(103, 25) Me.批量刷新_bt.TabIndex = 1374 Me.批量刷新_bt.Text = "批量刷新" Me.批量刷新_bt.UseVisualStyleBackColor = True ' '刪除_bt ' Me.刪除_bt.ForeColor = System.Drawing.Color.Red Me.刪除_bt.Location = New System.Drawing.Point(1209, 61) Me.刪除_bt.Name = "刪除_bt" Me.刪除_bt.Size = New System.Drawing.Size(101, 25) Me.刪除_bt.TabIndex = 1373 Me.刪除_bt.Text = "刪除" Me.刪除_bt.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(510, 38) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(54, 16) Me.Label2.TabIndex = 1372 Me.Label2.Text = "No Files" ' '存檔_bt ' Me.存檔_bt.ForeColor = System.Drawing.Color.Green Me.存檔_bt.Location = New System.Drawing.Point(997, 61) Me.存檔_bt.Name = "存檔_bt" Me.存檔_bt.Size = New System.Drawing.Size(103, 25) Me.存檔_bt.TabIndex = 1371 Me.存檔_bt.Text = "存檔" Me.存檔_bt.UseVisualStyleBackColor = True ' '選定權限取消_bt ' Me.選定權限取消_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(128, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) Me.選定權限取消_bt.Location = New System.Drawing.Point(619, 61) Me.選定權限取消_bt.Name = "選定權限取消_bt" Me.選定權限取消_bt.Size = New System.Drawing.Size(101, 25) Me.選定權限取消_bt.TabIndex = 1370 Me.選定權限取消_bt.Text = "選定權限取消" Me.選定權限取消_bt.UseVisualStyleBackColor = True ' '部門權限指定_bt ' Me.部門權限指定_bt.ForeColor = System.Drawing.Color.FromArgb(CType(CType(128, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer)) Me.部門權限指定_bt.Location = New System.Drawing.Point(511, 61) Me.部門權限指定_bt.Name = "部門權限指定_bt" Me.部門權限指定_bt.Size = New System.Drawing.Size(101, 25) Me.部門權限指定_bt.TabIndex = 1369 Me.部門權限指定_bt.Text = "部門權限指定" Me.部門權限指定_bt.UseVisualStyleBackColor = True ' '級別1_tb ' Me.級別1_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.級別1_tb.Location = New System.Drawing.Point(665, 33) Me.級別1_tb.Name = "級別1_tb" Me.級別1_tb.Size = New System.Drawing.Size(32, 25) Me.級別1_tb.TabIndex = 1368 ' '組別1_tb ' Me.組別1_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.組別1_tb.Location = New System.Drawing.Point(1278, 33) Me.組別1_tb.Name = "組別1_tb" Me.組別1_tb.Size = New System.Drawing.Size(59, 25) Me.組別1_tb.TabIndex = 1367 ' '課別1_tb ' Me.課別1_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.課別1_tb.Location = New System.Drawing.Point(1076, 33) Me.課別1_tb.Name = "課別1_tb" Me.課別1_tb.Size = New System.Drawing.Size(196, 25) Me.課別1_tb.TabIndex = 1366 ' '處別1_tb ' Me.處別1_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.處別1_tb.Location = New System.Drawing.Point(875, 33) Me.處別1_tb.Name = "處別1_tb" Me.處別1_tb.Size = New System.Drawing.Size(196, 25) Me.處別1_tb.TabIndex = 1365 ' '部門1_tb ' Me.部門1_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.部門1_tb.Location = New System.Drawing.Point(703, 33) Me.部門1_tb.Name = "部門1_tb" Me.部門1_tb.Size = New System.Drawing.Size(166, 25) Me.部門1_tb.TabIndex = 1364 ' '級別_lb ' Me.級別_lb.AutoSize = True Me.級別_lb.Location = New System.Drawing.Point(614, 6) Me.級別_lb.Name = "級別_lb" Me.級別_lb.Size = New System.Drawing.Size(32, 16) Me.級別_lb.TabIndex = 1363 Me.級別_lb.Text = "級別" ' 'DateTimePicker2 ' Me.DateTimePicker2.Format = System.Windows.Forms.DateTimePickerFormat.[Short] Me.DateTimePicker2.Location = New System.Drawing.Point(571, 34) Me.DateTimePicker2.Name = "DateTimePicker2" Me.DateTimePicker2.Size = New System.Drawing.Size(87, 23) Me.DateTimePicker2.TabIndex = 1362 Me.DateTimePicker2.Visible = False ' '帳號_tb ' Me.帳號_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.帳號_tb.Location = New System.Drawing.Point(525, 114) Me.帳號_tb.Name = "帳號_tb" Me.帳號_tb.Size = New System.Drawing.Size(63, 25) Me.帳號_tb.TabIndex = 1361 Me.帳號_tb.Visible = False ' '姓名_tb ' Me.姓名_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.姓名_tb.Location = New System.Drawing.Point(513, 2) Me.姓名_tb.Name = "姓名_tb" Me.姓名_tb.Size = New System.Drawing.Size(101, 25) Me.姓名_tb.TabIndex = 1360 ' '組別_tb ' Me.組別_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.組別_tb.Location = New System.Drawing.Point(1277, 3) Me.組別_tb.Name = "組別_tb" Me.組別_tb.Size = New System.Drawing.Size(59, 25) Me.組別_tb.TabIndex = 1359 ' '課別_tb ' Me.課別_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.課別_tb.Location = New System.Drawing.Point(1076, 3) Me.課別_tb.Name = "課別_tb" Me.課別_tb.Size = New System.Drawing.Size(196, 25) Me.課別_tb.TabIndex = 1358 ' '處別_tb ' Me.處別_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.處別_tb.Location = New System.Drawing.Point(875, 3) Me.處別_tb.Name = "處別_tb" Me.處別_tb.Size = New System.Drawing.Size(196, 25) Me.處別_tb.TabIndex = 1357 ' '部門_tb ' Me.部門_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.部門_tb.Location = New System.Drawing.Point(703, 3) Me.部門_tb.Name = "部門_tb" Me.部門_tb.Size = New System.Drawing.Size(166, 25) Me.部門_tb.TabIndex = 1356 ' '級別_tb ' Me.級別_tb.Font = New System.Drawing.Font("微軟正黑體", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.級別_tb.Location = New System.Drawing.Point(665, 3) Me.級別_tb.Name = "級別_tb" Me.級別_tb.Size = New System.Drawing.Size(32, 25) Me.級別_tb.TabIndex = 1355 ' '設定_dgv ' 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.BackgroundColor = System.Drawing.Color.White Me.設定_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.設定_dgv.Location = New System.Drawing.Point(511, 88) Me.設定_dgv.Name = "設定_dgv" Me.設定_dgv.RowHeadersWidth = 5 DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.設定_dgv.RowsDefaultCellStyle = DataGridViewCellStyle1 Me.設定_dgv.RowTemplate.Height = 24 Me.設定_dgv.Size = New System.Drawing.Size(835, 589) Me.設定_dgv.TabIndex = 1354 ' '清單_dgv ' 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.BackgroundColor = System.Drawing.Color.White Me.清單_dgv.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize Me.清單_dgv.Location = New System.Drawing.Point(3, 3) Me.清單_dgv.Name = "清單_dgv" Me.清單_dgv.RowHeadersWidth = 5 DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.清單_dgv.RowsDefaultCellStyle = DataGridViewCellStyle2 Me.清單_dgv.RowTemplate.Height = 24 Me.清單_dgv.Size = New System.Drawing.Size(505, 674) Me.清單_dgv.TabIndex = 1353 ' '部門權限設定 ' 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.語轉扭_bt) Me.Controls.Add(Me.語言_dgv) Me.Controls.Add(Me.大間距1_ch) Me.Controls.Add(Me.中間距1_ch) Me.Controls.Add(Me.小間距1_ch) Me.Controls.Add(Me.批量刷新_bt) Me.Controls.Add(Me.刪除_bt) Me.Controls.Add(Me.Label2) Me.Controls.Add(Me.存檔_bt) Me.Controls.Add(Me.選定權限取消_bt) Me.Controls.Add(Me.部門權限指定_bt) Me.Controls.Add(Me.級別1_tb) Me.Controls.Add(Me.組別1_tb) Me.Controls.Add(Me.課別1_tb) Me.Controls.Add(Me.處別1_tb) Me.Controls.Add(Me.部門1_tb) Me.Controls.Add(Me.級別_lb) Me.Controls.Add(Me.DateTimePicker2) Me.Controls.Add(Me.帳號_tb) Me.Controls.Add(Me.姓名_tb) Me.Controls.Add(Me.組別_tb) Me.Controls.Add(Me.課別_tb) Me.Controls.Add(Me.處別_tb) Me.Controls.Add(Me.部門_tb) Me.Controls.Add(Me.級別_tb) Me.Controls.Add(Me.設定_dgv) Me.Controls.Add(Me.清單_dgv) Me.Font = New System.Drawing.Font("微軟正黑體", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4) Me.Name = "部門權限設定" Me.Text = "部門權限設定" CType(Me.語言_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.設定_dgv, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.清單_dgv, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents 語轉扭_bt As Button Friend WithEvents 語言_dgv As DataGridView Friend WithEvents 大間距1_ch As CheckBox Friend WithEvents 中間距1_ch As CheckBox Friend WithEvents 小間距1_ch As CheckBox Friend WithEvents 批量刷新_bt As Button Friend WithEvents 刪除_bt As Button Friend WithEvents Label2 As Label Friend WithEvents 存檔_bt As Button Friend WithEvents 選定權限取消_bt As Button Friend WithEvents 部門權限指定_bt As Button Friend WithEvents 級別1_tb As TextBox Friend WithEvents 組別1_tb As TextBox Friend WithEvents 課別1_tb As TextBox Friend WithEvents 處別1_tb As TextBox Friend WithEvents 部門1_tb As TextBox Friend WithEvents 級別_lb As Label Friend WithEvents DateTimePicker2 As DateTimePicker Friend WithEvents 帳號_tb As TextBox Friend WithEvents 姓名_tb As TextBox Friend WithEvents 組別_tb As TextBox Friend WithEvents 課別_tb As TextBox Friend WithEvents 處別_tb As TextBox Friend WithEvents 部門_tb As TextBox Friend WithEvents 級別_tb As TextBox Friend WithEvents 設定_dgv As DataGridView Friend WithEvents 清單_dgv As DataGridView End Class