⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 grade_tj.frm

📁 这是一个非常 好的一个程序进行体会一下学生管理系统
💻 FRM
📖 第 1 页 / 共 4 页
字号:
VERSION 5.00
Object = "{5E9E78A0-531B-11CF-91F6-C2863C385E30}#1.0#0"; "MSFLXGRD.OCX"
Begin VB.Form Form9 
   BackColor       =   &H00FFC0C0&
   Caption         =   "成绩信息统计"
   ClientHeight    =   7215
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   11565
   LinkTopic       =   "Form9"
   MDIChild        =   -1  'True
   ScaleHeight     =   7215
   ScaleWidth      =   11565
   WindowState     =   2  'Maximized
   Begin VB.Frame Frame2 
      BackColor       =   &H00FFC0C0&
      Height          =   5655
      Index           =   2
      Left            =   120
      TabIndex        =   40
      Top             =   1320
      Visible         =   0   'False
      Width           =   11295
      Begin VB.CheckBox Check6 
         BackColor       =   &H00FFC0C0&
         Caption         =   "包含选课信息"
         Height          =   255
         Left            =   4920
         TabIndex        =   65
         Top             =   5160
         Value           =   1  'Checked
         Visible         =   0   'False
         Width           =   1455
      End
      Begin VB.CommandButton Command12 
         Caption         =   "统计信息导出"
         Enabled         =   0   'False
         Height          =   495
         Left            =   6960
         TabIndex        =   64
         Top             =   5040
         Visible         =   0   'False
         Width           =   1455
      End
      Begin VB.TextBox Text3 
         Height          =   270
         Left            =   1440
         TabIndex        =   59
         Top             =   360
         Width           =   1095
      End
      Begin VB.ComboBox Combo3 
         BeginProperty DataFormat 
            Type            =   1
            Format          =   "0.0%"
            HaveTrueFalseNull=   0
            FirstDayOfWeek  =   0
            FirstWeekOfYear =   0
            LCID            =   2052
            SubFormatType   =   5
         EndProperty
         Height          =   300
         Index           =   0
         ItemData        =   "Grade_tj.frx":0000
         Left            =   1440
         List            =   "Grade_tj.frx":0002
         TabIndex        =   54
         Top             =   840
         Width           =   1455
      End
      Begin VB.ComboBox Combo3 
         Height          =   300
         Index           =   1
         ItemData        =   "Grade_tj.frx":0004
         Left            =   1440
         List            =   "Grade_tj.frx":0006
         TabIndex        =   53
         Top             =   1320
         Width           =   1815
      End
      Begin VB.CommandButton Command9 
         Caption         =   "确  定"
         Height          =   375
         Left            =   480
         TabIndex        =   52
         Top             =   1800
         Width           =   975
      End
      Begin VB.CommandButton Command8 
         Caption         =   "重  置"
         Height          =   375
         Left            =   2520
         TabIndex        =   51
         Top             =   1800
         Width           =   975
      End
      Begin VB.Frame Frame6 
         BackColor       =   &H00FFC0C0&
         Caption         =   "请选择统计项目"
         Height          =   2775
         Left            =   240
         TabIndex        =   43
         Top             =   2400
         Visible         =   0   'False
         Width           =   3855
         Begin VB.CheckBox Check3 
            BackColor       =   &H00FFC0C0&
            Caption         =   "平 均 分"
            Height          =   255
            Index           =   0
            Left            =   360
            TabIndex        =   50
            Top             =   480
            Width           =   1095
         End
         Begin VB.CheckBox Check3 
            BackColor       =   &H00FFC0C0&
            Caption         =   "最 高 分"
            Height          =   255
            Index           =   1
            Left            =   360
            TabIndex        =   49
            Top             =   960
            Width           =   1095
         End
         Begin VB.CheckBox Check3 
            BackColor       =   &H00FFC0C0&
            Caption         =   "最 低 分"
            Height          =   255
            Index           =   2
            Left            =   360
            TabIndex        =   48
            Top             =   1440
            Width           =   1095
         End
         Begin VB.CheckBox Check3 
            BackColor       =   &H00FFC0C0&
            Caption         =   "及 格 率"
            Height          =   255
            Index           =   3
            Left            =   2040
            TabIndex        =   47
            Top             =   480
            Width           =   1095
         End
         Begin VB.CheckBox Check3 
            BackColor       =   &H00FFC0C0&
            Caption         =   "优 秀 率"
            Height          =   255
            Index           =   4
            Left            =   2040
            TabIndex        =   46
            Top             =   960
            Width           =   1095
         End
         Begin VB.CheckBox Check3 
            BackColor       =   &H00FFC0C0&
            Caption         =   "分段人数"
            Height          =   255
            Index           =   5
            Left            =   2040
            TabIndex        =   45
            Top             =   1440
            Width           =   1095
         End
         Begin VB.CommandButton Command7 
            Caption         =   "开使统计"
            Height          =   375
            Left            =   1080
            TabIndex        =   44
            Top             =   2040
            Width           =   1215
         End
      End
      Begin VB.ListBox List2 
         BackColor       =   &H00FFFFFF&
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   1950
         ItemData        =   "Grade_tj.frx":0008
         Left            =   4320
         List            =   "Grade_tj.frx":000A
         TabIndex        =   41
         Top             =   2880
         Visible         =   0   'False
         Width           =   4575
      End
      Begin MSFlexGridLib.MSFlexGrid myFlexGrid4 
         Height          =   2055
         Left            =   4320
         TabIndex        =   42
         Top             =   600
         Width           =   4575
         _ExtentX        =   8070
         _ExtentY        =   3625
         _Version        =   393216
         Cols            =   4
         FixedCols       =   0
         BackColorBkg    =   16761024
      End
      Begin VB.Label Label11 
         BackColor       =   &H00FFC0C0&
         Caption         =   "请输入班级:"
         Height          =   255
         Left            =   240
         TabIndex        =   58
         Top             =   360
         Width           =   1215
      End
      Begin VB.Label Label10 
         BackColor       =   &H00FFC0C0&
         Caption         =   "请选择课程名:"
         Height          =   255
         Left            =   240
         TabIndex        =   57
         Top             =   1320
         Width           =   1335
      End
      Begin VB.Label Label9 
         BackColor       =   &H00FFC0C0&
         Caption         =   "选课信息显示"
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   255
         Left            =   4320
         TabIndex        =   56
         Top             =   240
         Width           =   1335
      End
      Begin VB.Label Label7 
         BackColor       =   &H00FFC0C0&
         Caption         =   "请选择学期:"
         Height          =   255
         Left            =   240
         TabIndex        =   55
         Top             =   840
         Width           =   1455
      End
   End
   Begin VB.Frame Frame2 
      BackColor       =   &H00FFC0C0&
      Height          =   5655
      Index           =   1
      Left            =   120
      TabIndex        =   6
      Top             =   1320
      Visible         =   0   'False
      Width           =   11295
      Begin VB.CheckBox Check5 
         BackColor       =   &H00FFC0C0&
         Caption         =   "包含选课信息"
         Height          =   255
         Left            =   4680
         TabIndex        =   63
         Top             =   5160
         Value           =   1  'Checked
         Visible         =   0   'False
         Width           =   1455
      End
      Begin VB.CommandButton Command11 
         Caption         =   "统计信息导出"
         Enabled         =   0   'False
         Height          =   495
         Left            =   6360
         TabIndex        =   62
         Top             =   5040
         Visible         =   0   'False
         Width           =   1455
      End
      Begin VB.ListBox List1 
         BackColor       =   &H00FFFFFF&
         BeginProperty Font 
            Name            =   "宋体"
            Size            =   10.5
            Charset         =   134
            Weight          =   400
            Underline       =   0   'False
            Italic          =   0   'False
            Strikethrough   =   0   'False
         EndProperty
         Height          =   1950
         ItemData        =   "Grade_tj.frx":000C
         Left            =   4320
         List            =   "Grade_tj.frx":000E
         TabIndex        =   37
         Top             =   2880
         Visible         =   0   'False
         Width           =   4335
      End
      Begin MSFlexGridLib.MSFlexGrid myFlexGrid3 
         Height          =   2055
         Left            =   4320
         TabIndex        =   30
         Top             =   600
         Width           =   4335
         _ExtentX        =   7646
         _ExtentY        =   3625
         _Version        =   393216
         Cols            =   4
         FixedCols       =   0
         BackColorBkg    =   16761024
      End
      Begin VB.Frame Frame5 
         BackColor       =   &H00FFC0C0&
         Caption         =   "请选择统计项目"
         Height          =   2895
         Left            =   240
         TabIndex        =   29
         Top             =   2400
         Visible         =   0   'False
         Width           =   3855
         Begin VB.CommandButton Command6 
            Caption         =   "开使统计"
            Height          =   375
            Left            =   1080
            TabIndex        =   38
            Top             =   2040
            Width           =   1215
         End
         Begin VB.CheckBox Check2 
            BackColor       =   &H00FFC0C0&
            Caption         =   "分段人数"
            Height          =   255
            Index           =   5
            Left            =   2040
            TabIndex        =   36
            Top             =   1440
            Width           =   1095
         End
         Begin VB.CheckBox Check2 
            BackColor       =   &H00FFC0C0&
            Caption         =   "优 秀 率"
            Height          =   255
            Index           =   4
            Left            =   2040
            TabIndex        =   35
            Top             =   960
            Width           =   1095
         End
         Begin VB.CheckBox Check2 
            BackColor       =   &H00FFC0C0&
            Caption         =   "及 格 率"
            Height          =   255
            Index           =   3
            Left            =   2040
            TabIndex        =   34
            Top             =   480
            Width           =   1095
         End
         Begin VB.CheckBox Check2 
            BackColor       =   &H00FFC0C0&
            Caption         =   "最 低 分"
            Height          =   255
            Index           =   2
            Left            =   360
            TabIndex        =   33
            Top             =   1440
            Width           =   1095
         End
         Begin VB.CheckBox Check2 
            BackColor       =   &H00FFC0C0&
            Caption         =   "最 高 分"
            Height          =   255
            Index           =   1
            Left            =   360
            TabIndex        =   32
            Top             =   960
            Width           =   1095
         End
         Begin VB.CheckBox Check2 
            BackColor       =   &H00FFC0C0&
            Caption         =   "平 均 分"
            Height          =   255
            Index           =   0
            Left            =   360
            TabIndex        =   31
            Top             =   480
            Width           =   1095
         End

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -