win.vb

强大的教务考勤系统数据库

        Me.Label12.Text = "时间"
        Me.Label12.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label11
        '
        Me.Label11.Location = New System.Drawing.Point(16, 184)
        Me.Label11.Name = "Label11"
        Me.Label11.Size = New System.Drawing.Size(48, 24)
        Me.Label11.TabIndex = 10
        Me.Label11.Text = "学生数"
        Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label10
        '
        Me.Label10.Location = New System.Drawing.Point(16, 144)
        Me.Label10.Name = "Label10"
        Me.Label10.Size = New System.Drawing.Size(48, 24)
        Me.Label10.TabIndex = 9
        Me.Label10.Text = "教师ID"
        Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label9
        '
        Me.Label9.Location = New System.Drawing.Point(16, 104)
        Me.Label9.Name = "Label9"
        Me.Label9.Size = New System.Drawing.Size(48, 24)
        Me.Label9.TabIndex = 8
        Me.Label9.Text = "教室"
        Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label8
        '
        Me.Label8.Location = New System.Drawing.Point(16, 64)
        Me.Label8.Name = "Label8"
        Me.Label8.Size = New System.Drawing.Size(48, 24)
        Me.Label8.TabIndex = 7
        Me.Label8.Text = "课程名"
        Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label7
        '
        Me.Label7.Location = New System.Drawing.Point(16, 24)
        Me.Label7.Name = "Label7"
        Me.Label7.Size = New System.Drawing.Size(48, 24)
        Me.Label7.TabIndex = 6
        Me.Label7.Text = "课程ID"
        Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'tbLesStuNum
        '
        Me.tbLesStuNum.Location = New System.Drawing.Point(72, 184)
        Me.tbLesStuNum.Name = "tbLesStuNum"
        Me.tbLesStuNum.Size = New System.Drawing.Size(112, 21)
        Me.tbLesStuNum.TabIndex = 4
        Me.tbLesStuNum.Text = ""
        '
        'tbLesTea
        '
        Me.tbLesTea.Location = New System.Drawing.Point(72, 144)
        Me.tbLesTea.Name = "tbLesTea"
        Me.tbLesTea.Size = New System.Drawing.Size(112, 21)
        Me.tbLesTea.TabIndex = 3
        Me.tbLesTea.Text = ""
        '
        'tbLesCr
        '
        Me.tbLesCr.Location = New System.Drawing.Point(72, 104)
        Me.tbLesCr.Name = "tbLesCr"
        Me.tbLesCr.Size = New System.Drawing.Size(112, 21)
        Me.tbLesCr.TabIndex = 2
        Me.tbLesCr.Text = ""
        '
        'tbLesName
        '
        Me.tbLesName.Location = New System.Drawing.Point(72, 64)
        Me.tbLesName.Name = "tbLesName"
        Me.tbLesName.Size = New System.Drawing.Size(112, 21)
        Me.tbLesName.TabIndex = 1
        Me.tbLesName.Text = ""
        '
        'tbLesID
        '
        Me.tbLesID.Location = New System.Drawing.Point(72, 24)
        Me.tbLesID.Name = "tbLesID"
        Me.tbLesID.Size = New System.Drawing.Size(112, 21)
        Me.tbLesID.TabIndex = 0
        Me.tbLesID.Text = ""
        '
        'gbInquire
        '
        Me.gbInquire.Controls.Add(Me.gbInquireM)
        Me.gbInquire.Controls.Add(Me.cbInquireTime)
        Me.gbInquire.Controls.Add(Me.cbInquireLesson)
        Me.gbInquire.Controls.Add(Me.gbInquireL)
        Me.gbInquire.Controls.Add(Me.cbInquireContent)
        Me.gbInquire.Controls.Add(Me.Label6)
        Me.gbInquire.Controls.Add(Me.Label5)
        Me.gbInquire.Controls.Add(Me.Label4)
        Me.gbInquire.Enabled = False
        Me.gbInquire.Location = New System.Drawing.Point(8, 8)
        Me.gbInquire.Name = "gbInquire"
        Me.gbInquire.Size = New System.Drawing.Size(200, 256)
        Me.gbInquire.TabIndex = 14
        Me.gbInquire.TabStop = False
        Me.gbInquire.Visible = False
        '
        'gbInquireM
        '
        Me.gbInquireM.Controls.Add(Me.Label2)
        Me.gbInquireM.Controls.Add(Me.tbInquireM)
        Me.gbInquireM.Controls.Add(Me.cbInquireM)
        Me.gbInquireM.Enabled = False
        Me.gbInquireM.Location = New System.Drawing.Point(8, 128)
        Me.gbInquireM.Name = "gbInquireM"
        Me.gbInquireM.Size = New System.Drawing.Size(184, 56)
        Me.gbInquireM.TabIndex = 11
        Me.gbInquireM.TabStop = False
        Me.gbInquireM.Text = "缺勤"
        '
        'Label2
        '
        Me.Label2.Location = New System.Drawing.Point(144, 24)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(32, 23)
        Me.Label2.TabIndex = 11
        Me.Label2.Text = "课时"
        Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'tbInquireM
        '
        Me.tbInquireM.Location = New System.Drawing.Point(72, 24)
        Me.tbInquireM.Name = "tbInquireM"
        Me.tbInquireM.Size = New System.Drawing.Size(64, 21)
        Me.tbInquireM.TabIndex = 9
        Me.tbInquireM.Text = ""
        '
        'cbInquireM
        '
        Me.cbInquireM.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cbInquireM.Items.AddRange(New Object() {"", "小于", "等于", "大于"})
        Me.cbInquireM.Location = New System.Drawing.Point(16, 24)
        Me.cbInquireM.Name = "cbInquireM"
        Me.cbInquireM.Size = New System.Drawing.Size(56, 20)
        Me.cbInquireM.TabIndex = 7
        '
        'cbInquireTime
        '
        Me.cbInquireTime.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cbInquireTime.Enabled = False
        Me.cbInquireTime.Items.AddRange(New Object() {"", "今天", "本周", "本月", "本学期", "本学年", "全部"})
        Me.cbInquireTime.Location = New System.Drawing.Point(64, 56)
        Me.cbInquireTime.Name = "cbInquireTime"
        Me.cbInquireTime.Size = New System.Drawing.Size(121, 20)
        Me.cbInquireTime.TabIndex = 5
        '
        'cbInquireLesson
        '
        Me.cbInquireLesson.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cbInquireLesson.Items.AddRange(New Object() {"", "全部"})
        Me.cbInquireLesson.Location = New System.Drawing.Point(64, 16)
        Me.cbInquireLesson.Name = "cbInquireLesson"
        Me.cbInquireLesson.Size = New System.Drawing.Size(121, 20)
        Me.cbInquireLesson.TabIndex = 4
        '
        'gbInquireL
        '
        Me.gbInquireL.Controls.Add(Me.tbInquireL)
        Me.gbInquireL.Controls.Add(Me.cbInquireL)
        Me.gbInquireL.Controls.Add(Me.Label3)
        Me.gbInquireL.Enabled = False
        Me.gbInquireL.Location = New System.Drawing.Point(8, 192)
        Me.gbInquireL.Name = "gbInquireL"
        Me.gbInquireL.Size = New System.Drawing.Size(184, 56)
        Me.gbInquireL.TabIndex = 0
        Me.gbInquireL.TabStop = False
        Me.gbInquireL.Text = "迟到"
        '
        'tbInquireL
        '
        Me.tbInquireL.Location = New System.Drawing.Point(72, 24)
        Me.tbInquireL.Name = "tbInquireL"
        Me.tbInquireL.Size = New System.Drawing.Size(64, 21)
        Me.tbInquireL.TabIndex = 10
        Me.tbInquireL.Text = ""
        '
        'cbInquireL
        '
        Me.cbInquireL.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cbInquireL.Items.AddRange(New Object() {"", "小于", "等于", "大于"})
        Me.cbInquireL.Location = New System.Drawing.Point(16, 24)
        Me.cbInquireL.Name = "cbInquireL"
        Me.cbInquireL.Size = New System.Drawing.Size(56, 20)
        Me.cbInquireL.TabIndex = 8
        '
        'Label3
        '
        Me.Label3.Location = New System.Drawing.Point(144, 24)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(32, 23)
        Me.Label3.TabIndex = 12
        Me.Label3.Text = "课时"
        Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'cbInquireContent
        '
        Me.cbInquireContent.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
        Me.cbInquireContent.Items.AddRange(New Object() {"", "缺勤", "迟到", "缺勤和迟到", "缺勤或迟到"})
        Me.cbInquireContent.Location = New System.Drawing.Point(64, 96)
        Me.cbInquireContent.Name = "cbInquireContent"
        Me.cbInquireContent.Size = New System.Drawing.Size(121, 20)
        Me.cbInquireContent.TabIndex = 6
        '
        'Label6
        '
        Me.Label6.Location = New System.Drawing.Point(16, 96)
        Me.Label6.Name = "Label6"
        Me.Label6.Size = New System.Drawing.Size(32, 24)
        Me.Label6.TabIndex = 6
        Me.Label6.Text = "内容"
        Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label5
        '
        Me.Label5.Enabled = False
        Me.Label5.Location = New System.Drawing.Point(16, 56)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(32, 24)
        Me.Label5.TabIndex = 5
        Me.Label5.Text = "时间"
        Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'Label4
        '
        Me.Label4.Location = New System.Drawing.Point(16, 16)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(32, 24)
        Me.Label4.TabIndex = 4
        Me.Label4.Text = "课程"
        Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
        '
        'gbTeacher
        '
        Me.gbTeacher.Controls.Add(Me.GroupBox1)
        Me.gbTeacher.Controls.Add(Me.Label14)
        Me.gbTeacher.Controls.Add(Me.Label13)
        Me.gbTeacher.Controls.Add(Me.tbTeaName)
        Me.gbTeacher.Controls.Add(Me.tbTeaID)
        Me.gbTeacher.Enabled = False
        Me.gbTeacher.Location = New System.Drawing.Point(8, 8)
        Me.gbTeacher.Name = "gbTeacher"
        Me.gbTeacher.Size = New System.Drawing.Size(200, 256)
        Me.gbTeacher.TabIndex = 15
        Me.gbTeacher.TabStop = False
        Me.gbTeacher.Visible = False
        '
        'GroupBox1
        '
        Me.GroupBox1.Controls.Add(Me.rbTea2)
        Me.GroupBox1.Controls.Add(Me.rbTea1)
        Me.GroupBox1.Location = New System.Drawing.Point(8, 160)
        Me.GroupBox1.Name = "GroupBox1"
        Me.GroupBox1.Size = New System.Drawing.Size(184, 88)
        Me.GroupBox1.TabIndex = 5
        Me.GroupBox1.TabStop = False
        '
        'rbTea2
        '
        Me.rbTea2.Location = New System.Drawing.Point(40, 56)
        Me.rbTea2.Name = "rbTea2"
        Me.rbTea2.Size = New System.Drawing.Size(96, 24)
        Me.rbTea2.TabIndex = 5
        Me.rbTea2.Text = "精确查询"
        '
        'rbTea1
        '
        Me.rbTea1.Checked = True
        Me.rbTea1.Location = New System.Drawing.Point(40, 24)