shouke_edit.frm

这是一个非常 好的一个程序进行体会一下学生管理系统

               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   330
               Index           =   1
               Left            =   4320
               TabIndex        =   246
               Top             =   600
               Width           =   1695
            End
            Begin VB.TextBox Text15 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   0
               Left            =   7560
               TabIndex        =   245
               Top             =   600
               Width           =   1335
            End
            Begin VB.TextBox Text15 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   1
               Left            =   1320
               TabIndex        =   244
               Top             =   1320
               Width           =   1335
            End
            Begin VB.TextBox Text15 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   2
               Left            =   4800
               TabIndex        =   243
               Top             =   1320
               Width           =   4095
            End
            Begin VB.TextBox Text15 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   3
               Left            =   1800
               TabIndex        =   242
               Top             =   2040
               Width           =   4215
            End
            Begin VB.TextBox Text15 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   1755
               Index           =   4
               Left            =   360
               MultiLine       =   -1  'True
               TabIndex        =   241
               Top             =   3000
               Width           =   8535
            End
            Begin VB.Label Label90 
               Caption         =   "教师姓名："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   360
               TabIndex        =   256
               Top             =   600
               Width           =   1095
            End
            Begin VB.Label Label89 
               Caption         =   "课程名："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   3480
               TabIndex        =   255
               Top             =   600
               Width           =   1095
            End
            Begin VB.Label Label88 
               Caption         =   "指导对象："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   6480
               TabIndex        =   254
               Top             =   600
               Width           =   1095
            End
            Begin VB.Label Label87 
               Caption         =   "学生人数："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   360
               TabIndex        =   253
               Top             =   1320
               Width           =   1095
            End
            Begin VB.Label Label86 
               Caption         =   "课程设计地点："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   3360
               TabIndex        =   252
               Top             =   1320
               Width           =   1575
            End
            Begin VB.Label Label85 
               Caption         =   "课程设计时间："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   360
               TabIndex        =   251
               Top             =   2040
               Width           =   1695
            End
            Begin VB.Label Label84 
               Caption         =   "备注信息："
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   255
               Left            =   360
               TabIndex        =   250
               Top             =   2640
               Width           =   1095
            End
         End
         Begin VB.Frame Frame6 
            Caption         =   "课程设计_添加"
            Height          =   5535
            Index           =   1
            Left            =   0
            TabIndex        =   223
            Top             =   240
            Visible         =   0   'False
            Width           =   9375
            Begin VB.TextBox Text14 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   1755
               Index           =   4
               Left            =   360
               MultiLine       =   -1  'True
               TabIndex        =   238
               Top             =   3000
               Width           =   8535
            End
            Begin VB.TextBox Text14 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   3
               Left            =   1800
               TabIndex        =   237
               Top             =   2040
               Width           =   4215
            End
            Begin VB.TextBox Text14 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   2
               Left            =   4800
               TabIndex        =   236
               Top             =   1320
               Width           =   4095
            End
            Begin VB.TextBox Text14 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   1
               Left            =   1320
               TabIndex        =   233
               Top             =   1320
               Width           =   1335
            End
            Begin VB.TextBox Text14 
               BeginProperty Font 
                  Name            =   "宋体"
                  Size            =   10.5
                  Charset         =   134
                  Weight          =   400
                  Underline       =   0   'False
                  Italic          =   0   'False
                  Strikethrough   =   0   'False
               EndProperty
               Height          =   315
               Index           =   0
               Left            =   7560
               TabIndex        =   231
               Top             =   600
               Width           =   1335