goodstudent.frm

是我应我们学校学工部做的软件,其主要是解决想我们学校这样的条件--各个办公室之间还没有建立联网,而且学校分为两个校区（又不在一个城市). 因此

               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   1800
            TabIndex        =   56
            Top             =   120
            Width           =   975
         End
         Begin VB.Label Label25 
            BackStyle       =   0  'Transparent
            Caption         =   "大于"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   360
            TabIndex        =   55
            Top             =   600
            Width           =   495
         End
         Begin VB.Label Label24 
            BackStyle       =   0  'Transparent
            Caption         =   "分"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   1800
            TabIndex        =   54
            Top             =   600
            Width           =   975
         End
      End
      Begin VB.PictureBox Picture4 
         BorderStyle     =   0  'None
         Height          =   975
         Left            =   2040
         ScaleHeight     =   975
         ScaleWidth      =   2295
         TabIndex        =   36
         Top             =   2280
         Width           =   2295
         Begin VB.TextBox Text6 
            Alignment       =   1  'Right Justify
            Enabled         =   0   'False
            Height          =   405
            Left            =   840
            TabIndex        =   40
            Text            =   "50"
            Top             =   480
            Width           =   615
         End
         Begin VB.TextBox Text5 
            Alignment       =   1  'Right Justify
            Height          =   405
            Left            =   840
            TabIndex        =   39
            Text            =   "50"
            Top             =   0
            Width           =   615
         End
         Begin VB.OptionButton Option6 
            Height          =   375
            Left            =   120
            TabIndex        =   38
            Top             =   480
            Width           =   255
         End
         Begin VB.OptionButton Option5 
            Height          =   375
            Left            =   120
            TabIndex        =   37
            Top             =   0
            Value           =   -1  'True
            Width           =   255
         End
         Begin MSComCtl2.UpDown UpDown5 
            Height          =   405
            Left            =   1440
            TabIndex        =   41
            Top             =   0
            Width           =   240
            _ExtentX        =   423
            _ExtentY        =   714
            _Version        =   393216
            Value           =   1
            BuddyControl    =   "Text5"
            BuddyDispid     =   196632
            OrigLeft        =   1560
            OrigRight       =   1800
            OrigBottom      =   375
            Max             =   100
            Min             =   1
            SyncBuddy       =   -1  'True
            BuddyProperty   =   65547
            Enabled         =   -1  'True
         End
         Begin MSComCtl2.UpDown UpDown6 
            Height          =   405
            Left            =   1440
            TabIndex        =   42
            Top             =   480
            Width           =   240
            _ExtentX        =   423
            _ExtentY        =   714
            _Version        =   393216
            Value           =   1
            BuddyControl    =   "Text6"
            BuddyDispid     =   196631
            OrigLeft        =   1560
            OrigRight       =   1800
            OrigBottom      =   375
            Max             =   1000
            Min             =   -1000
            SyncBuddy       =   -1  'True
            BuddyProperty   =   65547
            Enabled         =   0   'False
         End
         Begin VB.Label Label23 
            BackStyle       =   0  'Transparent
            Caption         =   "分"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   1800
            TabIndex        =   46
            Top             =   600
            Width           =   975
         End
         Begin VB.Label Label22 
            BackStyle       =   0  'Transparent
            Caption         =   "大于"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   360
            TabIndex        =   45
            Top             =   600
            Width           =   495
         End
         Begin VB.Label Label21 
            BackStyle       =   0  'Transparent
            Caption         =   "%名"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   1800
            TabIndex        =   44
            Top             =   120
            Width           =   975
         End
         Begin VB.Label Label20 
            BackStyle       =   0  'Transparent
            Caption         =   "前"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   360
            TabIndex        =   43
            Top             =   120
            Width           =   375
         End
      End
      Begin VB.PictureBox Picture3 
         BorderStyle     =   0  'None
         Height          =   975
         Left            =   2040
         ScaleHeight     =   975
         ScaleWidth      =   2295
         TabIndex        =   25
         Top             =   1320
         Width           =   2295
         Begin VB.OptionButton Option4 
            Height          =   375
            Left            =   120
            TabIndex        =   30
            Top             =   0
            Value           =   -1  'True
            Width           =   255
         End
         Begin VB.OptionButton Option3 
            Height          =   375
            Left            =   120
            TabIndex        =   29
            Top             =   480
            Width           =   255
         End
         Begin VB.TextBox Text4 
            Alignment       =   1  'Right Justify
            Height          =   405
            Left            =   840
            TabIndex        =   28
            Text            =   "50"
            Top             =   0
            Width           =   615
         End
         Begin VB.TextBox Text3 
            Alignment       =   1  'Right Justify
            Enabled         =   0   'False
            Height          =   405
            Left            =   840
            TabIndex        =   26
            Text            =   "50"
            Top             =   480
            Width           =   615
         End
         Begin MSComCtl2.UpDown UpDown3 
            Height          =   405
            Left            =   1440
            TabIndex        =   27
            Top             =   0
            Width           =   240
            _ExtentX        =   423
            _ExtentY        =   714
            _Version        =   393216
            Value           =   1
            BuddyControl    =   "Text4"
            BuddyDispid     =   196642
            OrigLeft        =   1560
            OrigRight       =   1800
            OrigBottom      =   375
            Max             =   100
            Min             =   1
            SyncBuddy       =   -1  'True
            BuddyProperty   =   65547
            Enabled         =   -1  'True
         End
         Begin MSComCtl2.UpDown UpDown4 
            Height          =   405
            Left            =   1440
            TabIndex        =   31
            Top             =   480
            Width           =   240
            _ExtentX        =   423
            _ExtentY        =   714
            _Version        =   393216
            Value           =   1
            BuddyControl    =   "Text3"
            BuddyDispid     =   196643
            OrigLeft        =   1560
            OrigRight       =   1800
            OrigBottom      =   375
            Max             =   1000
            Min             =   -1000
            SyncBuddy       =   -1  'True
            BuddyProperty   =   65547
            Enabled         =   0   'False
         End
         Begin VB.Label Label19 
            BackStyle       =   0  'Transparent
            Caption         =   "前"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   360
            TabIndex        =   35
            Top             =   120
            Width           =   375
         End
         Begin VB.Label Label18 
            BackStyle       =   0  'Transparent
            Caption         =   "%名"
            BeginProperty Font 
               Name            =   "宋体"
               Size            =   9.75
               Charset         =   134
               Weight          =   400
               Underline       =   0   'False
               Italic          =   0   'False
               Strikethrough   =   0   'False
            EndProperty
            ForeColor       =   &H8000000D&
            Height          =   255
            Left            =   1800
            TabIndex        =   34
            Top             =   120