📄 课表查询.vb
字号:
Imports System.Data.SqlClient
Public Class frmLessonTable
Inherits System.Windows.Forms.Form
#Region " Windows 窗体设计器生成的代码 "
Public Sub New()
MyBase.New()
'该调用是 Windows 窗体设计器所必需的。
InitializeComponent()
'在 InitializeComponent() 调用之后添加任何初始化
End Sub
'窗体重写 dispose 以清理组件列表。
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Windows 窗体设计器所必需的
Private components As System.ComponentModel.IContainer
'注意: 以下过程是 Windows 窗体设计器所必需的
'可以使用 Windows 窗体设计器修改此过程。
'不要使用代码编辑器修改它。
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents Panel2 As System.Windows.Forms.Panel
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
Friend WithEvents ImageList2 As System.Windows.Forms.ImageList
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents lvw_LessonTable As System.Windows.Forms.ListView
Friend WithEvents ColumnHeader1 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader2 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader3 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader4 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader5 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader6 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader7 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader8 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader9 As System.Windows.Forms.ColumnHeader
Friend WithEvents ColumnHeader11 As System.Windows.Forms.ColumnHeader
Friend WithEvents GroupBox2 As System.Windows.Forms.GroupBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents ComboBox4 As System.Windows.Forms.ComboBox
Friend WithEvents Label4 As System.Windows.Forms.Label
Friend WithEvents ComboBox3 As System.Windows.Forms.ComboBox
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents ComboBox2 As System.Windows.Forms.ComboBox
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
Friend WithEvents Label1 As System.Windows.Forms.Label
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(frmLessonTable))
Me.Panel1 = New System.Windows.Forms.Panel
Me.Panel2 = New System.Windows.Forms.Panel
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
Me.ImageList2 = New System.Windows.Forms.ImageList(Me.components)
Me.GroupBox1 = New System.Windows.Forms.GroupBox
Me.lvw_LessonTable = New System.Windows.Forms.ListView
Me.ColumnHeader1 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader2 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader3 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader4 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader5 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader6 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader7 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader8 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader9 = New System.Windows.Forms.ColumnHeader
Me.ColumnHeader11 = New System.Windows.Forms.ColumnHeader
Me.GroupBox2 = New System.Windows.Forms.GroupBox
Me.Button1 = New System.Windows.Forms.Button
Me.ComboBox4 = New System.Windows.Forms.ComboBox
Me.Label4 = New System.Windows.Forms.Label
Me.ComboBox3 = New System.Windows.Forms.ComboBox
Me.Label3 = New System.Windows.Forms.Label
Me.ComboBox2 = New System.Windows.Forms.ComboBox
Me.Label2 = New System.Windows.Forms.Label
Me.ComboBox1 = New System.Windows.Forms.ComboBox
Me.Label1 = New System.Windows.Forms.Label
Me.GroupBox1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.SuspendLayout()
'
'Panel1
'
Me.Panel1.BackColor = System.Drawing.Color.Blue
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel1.Location = New System.Drawing.Point(0, 0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(870, 1)
Me.Panel1.TabIndex = 0
'
'Panel2
'
Me.Panel2.BackColor = System.Drawing.Color.Blue
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Left
Me.Panel2.Location = New System.Drawing.Point(0, 1)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(1, 427)
Me.Panel2.TabIndex = 1
'
'ImageList1
'
Me.ImageList1.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
'
'ImageList2
'
Me.ImageList2.ImageSize = New System.Drawing.Size(16, 16)
Me.ImageList2.TransparentColor = System.Drawing.Color.Transparent
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.lvw_LessonTable)
Me.GroupBox1.Location = New System.Drawing.Point(10, 9)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(856, 352)
Me.GroupBox1.TabIndex = 2
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "课表信息"
'
'lvw_LessonTable
'
Me.lvw_LessonTable.BackColor = System.Drawing.Color.White
Me.lvw_LessonTable.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.lvw_LessonTable.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2, Me.ColumnHeader3, Me.ColumnHeader4, Me.ColumnHeader5, Me.ColumnHeader6, Me.ColumnHeader7, Me.ColumnHeader8, Me.ColumnHeader9, Me.ColumnHeader11})
Me.lvw_LessonTable.Dock = System.Windows.Forms.DockStyle.Fill
Me.lvw_LessonTable.FullRowSelect = True
Me.lvw_LessonTable.GridLines = True
Me.lvw_LessonTable.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
Me.lvw_LessonTable.Location = New System.Drawing.Point(3, 17)
Me.lvw_LessonTable.Name = "lvw_LessonTable"
Me.lvw_LessonTable.Size = New System.Drawing.Size(850, 332)
Me.lvw_LessonTable.SmallImageList = Me.ImageList2
Me.lvw_LessonTable.TabIndex = 11
Me.lvw_LessonTable.View = System.Windows.Forms.View.Details
'
'ColumnHeader1
'
Me.ColumnHeader1.Text = "课程名"
Me.ColumnHeader1.Width = 128
'
'ColumnHeader2
'
Me.ColumnHeader2.Text = "班级"
Me.ColumnHeader2.Width = 110
'
'ColumnHeader3
'
Me.ColumnHeader3.Text = "教师"
Me.ColumnHeader3.Width = 95
'
'ColumnHeader4
'
Me.ColumnHeader4.Text = "教室"
Me.ColumnHeader4.Width = 90
'
'ColumnHeader5
'
Me.ColumnHeader5.Text = "起始年份"
'
'ColumnHeader6
'
Me.ColumnHeader6.Text = "结束年份"
'
'ColumnHeader7
'
Me.ColumnHeader7.Text = "学期"
Me.ColumnHeader7.Width = 96
'
'ColumnHeader8
'
Me.ColumnHeader8.Text = "星期"
Me.ColumnHeader8.Width = 57
'
'ColumnHeader9
'
Me.ColumnHeader9.Text = "节次"
Me.ColumnHeader9.Width = 78
'
'ColumnHeader11
'
Me.ColumnHeader11.Text = "单双周标志"
Me.ColumnHeader11.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
Me.ColumnHeader11.Width = 115
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.Button1)
Me.GroupBox2.Controls.Add(Me.ComboBox4)
Me.GroupBox2.Controls.Add(Me.Label4)
Me.GroupBox2.Controls.Add(Me.ComboBox3)
Me.GroupBox2.Controls.Add(Me.Label3)
Me.GroupBox2.Controls.Add(Me.ComboBox2)
Me.GroupBox2.Controls.Add(Me.Label2)
Me.GroupBox2.Controls.Add(Me.ComboBox1)
Me.GroupBox2.Controls.Add(Me.Label1)
Me.GroupBox2.Location = New System.Drawing.Point(12, 368)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(768, 48)
Me.GroupBox2.TabIndex = 3
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "查询"
'
'Button1
'
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Location = New System.Drawing.Point(680, 16)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(72, 24)
Me.Button1.TabIndex = 28
Me.Button1.Text = "查 询(&S)"
'
'ComboBox4
'
Me.ComboBox4.Location = New System.Drawing.Point(560, 16)
Me.ComboBox4.Name = "ComboBox4"
Me.ComboBox4.Size = New System.Drawing.Size(96, 20)
Me.ComboBox4.TabIndex = 27
'
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -