form6.frm

学生管理系统：包括查询

VERSION 5.00
Begin VB.Form Form2 
   BorderStyle     =   0  'None
   Caption         =   "学生信息管理系统"
   ClientHeight    =   7875
   ClientLeft      =   105
   ClientTop       =   105
   ClientWidth     =   10755
   BeginProperty Font 
      Name            =   "黑体"
      Size            =   9
      Charset         =   134
      Weight          =   400
      Underline       =   0   'False
      Italic          =   0   'False
      Strikethrough   =   0   'False
   EndProperty
   LinkTopic       =   "Form2"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   NegotiateMenus  =   0   'False
   ScaleHeight     =   7875
   ScaleWidth      =   10755
   ShowInTaskbar   =   0   'False
   Begin VB.Image Image1 
      Height          =   15
      Left            =   120
      Top             =   0
      Width           =   255
   End
   Begin VB.Label Label1 
      Alignment       =   2  'Center
      Appearance      =   0  'Flat
      AutoSize        =   -1  'True
      BackStyle       =   0  'Transparent
      Caption         =   "学生信息管理系统"
      BeginProperty Font 
         Name            =   "黑体"
         Size            =   42
         Charset         =   134
         Weight          =   400
         Underline       =   0   'False
         Italic          =   0   'False
         Strikethrough   =   0   'False
      EndProperty
      ForeColor       =   &H80000008&
      Height          =   840
      Left            =   1800
      TabIndex        =   0
      Top             =   3240
      Width           =   6735
   End
   Begin VB.Menu xitong 
      Caption         =   "系统(&s)"
      Begin VB.Menu TIANJIA 
         Caption         =   "添加用户"
         Shortcut        =   ^A
      End
      Begin VB.Menu SHANCHU 
         Caption         =   "删除用户"
         Shortcut        =   ^B
      End
      Begin VB.Menu XIUGAI 
         Caption         =   "修改密码"
         Shortcut        =   ^C
      End
      Begin VB.Menu TUICHU 
         Caption         =   "退出系统"
         Shortcut        =   ^D
      End
   End
   Begin VB.Menu xjgl 
      Caption         =   "学籍管理(&e)"
      Begin VB.Menu TX 
         Caption         =   "添加学籍信息"
         Shortcut        =   ^E
      End
      Begin VB.Menu XX 
         Caption         =   "修改学籍信息"
         Shortcut        =   ^F
      End
      Begin VB.Menu CX 
         Caption         =   "查询学籍信息"
         Shortcut        =   ^G
      End
   End
   Begin VB.Menu kecheng 
      Caption         =   "课程管理(&c)"
      Begin VB.Menu TK 
         Caption         =   "添加课程"
         Shortcut        =   ^H
      End
      Begin VB.Menu XK 
         Caption         =   "修改课程"
         Shortcut        =   ^I
      End
   End
   Begin VB.Menu cjguanli 
      Caption         =   "成绩管理(&g)"
      Begin VB.Menu SC 
         Caption         =   "输入成绩"
         Shortcut        =   ^J
      End
      Begin VB.Menu XT 
         Caption         =   "修改成绩"
         Shortcut        =   ^K
      End
      Begin VB.Menu CT 
         Caption         =   "查询成绩"
         Shortcut        =   ^L
      End
   End
   Begin VB.Menu xinxi 
      Caption         =   "信息统计(&x)"
   End
End
Attribute VB_Name = "Form2"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False

Private Sub Picture1_Click()
Picture1
End Sub

Private Sub CT_Click()
Form3.Show
End Sub