VB与SQL实现学生管理系统

use master go IF EXISTS (SELECT name FROM master.dbo.sysdatabases WHERE name = 'StudentMIS') DROP DATABASE [StudentMIS] GO CREATE DATABASE [StudentMIS] GO use [StudentMIS] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[allkecheng]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[allkecheng] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[cj]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[cj] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[class]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[class] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[classkecheng]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[classkecheng] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[jf]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[jf] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[kaoshileixing]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[kaoshileixing] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[userinfo]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[userinfo] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[xj]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[xj] GO if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[xuefei]') and OBJECTPROPERTY(id, N'IsUserTable') = 1) drop table [dbo].[xuefei] GO CREATE TABLE [dbo].[allkecheng] ( [课程名称] [nvarchar] (20) COLLATE Chinese_PRC_CI_AS NULL , [教材] [nvarchar] (30) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] GO CREATE TABLE [dbo].[cj] ( [学号] [nvarchar] (10) COLLATE Chinese_PRC_CI_AS NULL , [学期] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [类型] [nvarchar] (16) COLLATE Chinese_PRC_CI_AS NULL , [课程名称] [nvarchar] (20) COLLATE Chinese_PRC_CI_AS NULL , [分数] [real] NULL ) ON [PRIMARY] GO CREATE TABLE [dbo].[class] ( [年级] [nvarchar] (16) COLLATE Chinese_PRC_CI_AS NULL , [班级] [nvarchar] (20) COLLATE Chinese_PRC_CI_AS NULL , [教室] [nvarchar] (5) COLLATE Chinese_PRC_CI_AS NULL , [年制] [nvarchar] (8) COLLATE Chinese_PRC_CI_AS NULL , [专业] [nvarchar] (16) COLLATE Chinese_PRC_CI_AS NULL , [班主任] [nvarchar] (8) COLLATE Chinese_PRC_CI_AS NULL , [备注] [ntext] COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY] GO CREATE TABLE [dbo].[classkecheng] ( [年级] [nvarchar] (16) COLLATE Chinese_PRC_CI_AS NULL , [专业] [nvarchar] (12) COLLATE Chinese_PRC_CI_AS NULL , [年制] [nvarchar] (8) COLLATE Chinese_PRC_CI_AS NULL , [学期] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [课程名称] [nvarchar] (20) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] GO CREATE TABLE [dbo].[jf] ( [学号] [nvarchar] (5) COLLATE Chinese_PRC_CI_AS NULL , [学期] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL , [交费] [money] NULL , [欠费] [money] NULL , [日期] [smalldatetime] NULL , [操作员] [nvarchar] (10) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] GO CREATE TABLE [dbo].[kaoshileixing] ( [类型] [nvarchar] (10) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] GO CREATE TABLE [dbo].[userinfo] ( [username] [nvarchar] (20) COLLATE Chinese_PRC_CI_AS NULL , [password] [nvarchar] (20) COLLATE Chinese_PRC_CI_AS NULL , [admin] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NULL , [readonly] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NULL , [qx1] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NULL , [qx2] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NULL , [qx3] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NULL , [qx4] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NULL ) ON [PRIMARY] GO CREATE TABLE [dbo].[xj] ( [学号] [nvarchar] (5) COLLATE Chinese_PRC_CI_AS NULL , [姓名] [nvarchar] (8) COLLATE Chinese_PRC_CI_AS NULL , [性别] [nvarchar] (2) COLLATE Chinese_PRC_CI_AS NU�