那位大虾有visual foxpro 的教程和设计作品让小弟看下.
我的毕业设计是选择用visual foxpro作出学生学籍管理系统,希望这方面有专长的朋友帮帮忙。
参考答案:下面是数据准备部分的T—SQL代码:
--建立数据库
use master
go
if exists (select * from dbo.sysdatabases where name = 'vb成绩管理')
drop database vb成绩管理
GO
create database vb成绩管理
go
use vb成绩管理
go
--建立学生表
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[学生]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[学生]
GO
CREATE TABLE [dbo].[学生]
(学号 char(6) PRIMARY KEY,姓名 varchar(20),性别 char(2),
出生日期 smalldatetime, 入学成绩 Smallint,
系别 char(8) NOT NULL, 有汽车 bit, 照片 image,备注 text)
INSERT INTO 学生 (学号,姓名,性别, 出生日期, 入学成绩,系别,有汽车)
VALUES ('031002','张平','男','85-12-01',600,'经管',0)
INSERT INTO 学生(学号,姓名,性别, 出生日期, 入学成绩,系别,有汽车)
VALUES ('031003','王丽','女','86-02-24',590,'经管',1)
INSERT INTO 学生(学号,姓名,性别, 出生日期, 入学成绩,系别,有汽车)
VALUES ('032001','李健','男','86-08-02',570,'商务',1)
INSERT INTO 学生(学号,姓名,性别, 出生日期, 入学成绩,系别,有汽车)
VALUES ('032002','张平','女','86-05-12',580,'商务',0)
INSERT INTO 学生(学号,姓名,性别, 出生日期, 入学成绩,系别,有汽车)
VALUES ('033001','王五','男','84-01-01',600,'物流',0)
INSERT INTO 学生(学号,姓名,性别, 出生日期, 入学成绩,系别,有汽车)
VALUES ('033002','赵六','男','87-12-31',590,'物流',1)
GO
--建立学科表
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[学科]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[学科]
GO
CREATE TABLE [dbo].[学科]
(编号 char(4) PRIMARY KEY,课程名 Varchar(20))
INSERT INTO 学科 VALUES ('1001','数学1')
INSERT INTO 学科 VALUES ('1002','数学2')
INSERT INTO 学科 VALUES ('1003','英语')
INSERT INTO 学科 VALUES ('1004','计算机基础')
INSERT INTO 学科 VALUES ('1005','VB')
INSERT INTO 学科 VALUES ('1006','数据库')
GO
--建立系别表
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[系别]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[系别]
GO
CREATE TABLE [dbo].[系别]
(系名 Varchar(20), 简称 char(8) PRIMARY KEY)
INSERT INTO 系别 VALUES ('经济管理','经管')
INSERT INTO 系别 VALUES ('电子商务','商务')
INSERT INTO 系别 VALUES ('网络营销与物流','物流')
GO
--建立成绩表
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[成绩]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
drop table [dbo].[成绩]
GO
CREATE TABLE [dbo].[成绩]
(学号 char(6),课程编号 char(4),成绩 Smallint)
GO
INSERT INTO 成绩 VALUES ('031003','1001',95)
INSERT INTO 成绩 VALUES ('031003','1002',88)
INSERT INTO 成绩 VALUES ('031003','1003',86)
INSERT INTO 成绩 VALUES ('031003','1004',77)
INSERT INTO 成绩 VALUES ('031002','1001',85)
INSERT INTO 成绩 VALUES ('031002','1003',98)
INSERT INTO 成绩 VALUES ('031002','1005',24)
INSERT INTO 成绩 VALUES ('032001','1001',100)
INSERT INTO 成绩 VALUES ('032001','1006',80)
INSERT INTO 成绩 VALUES ('033002','1002',60)
INSERT INTO 成绩 VALUES ('033002','1003',59)
INSERT INTO 成绩 VALUES ('033002','1004',47)
INSERT INTO 成绩 VALUES ('033002','1005',90)
INSERT INTO 成绩 VALUES ('033002','1006',35)
下面是文字说明(word版)
一、 建立表“学生”
列名 数据类型 长度 允许空 说明
学号 Char 6 固定6个字符
姓名 Varchar 20 最多20个字符
性别 Char 2 √ 固定2个字符
出生日期 Smalldatetime √ 定长4字节
入学成绩 Smallint √ 定长2字节
系别 Char 8 固定8个字符
有汽车 Bit √ 定长1字节
照片 Image √ 定长16字节
备注 Text √ 定长16字节
数据行如下:
学号 姓名 性别 出生日期 入学成绩 系别 有汽车 照片 备注
031002 张平 男 85/12/01 600 经管 0
031003 王丽 女 86/02/24 590 经管 1
032001 李健 男 86/08/02 570 商务 1
032002 张平 女 86/05/12 580 商务 0
033001 王五 男 84/01/01 600 物流 0
033002 赵六 男 87/12/31 590 物流 1
二、 建立表“系别”
列名 数据类型 长度 允许空 说明
系名 Varchar 20 最多20个字符
简称 Char 8 固定8个字符
数据行如下:
系名 简称
经济管理 经管
电子商务 商务
网络贸易与物流 物流
三、建立表“学科”
列名 数据类型 长度 允许空 说明
编号 Char 4 固定4个字符
课程名 Varchar 20 最多20个字符
数据行如下:
编号 课程名
1001 数学1
1002 数学2
1003 英语
1004 计算机基础
1005 VB
1006 数据库
四、建立表“成绩”
列名 数据类型 长度 允许空 说明
学号 Char 6 固定6个字符
课程编号 Char 4 固定4个字符
成绩 Smallint 定长2字节
数据行如下:
学号 课程编号 成绩
031003 1001 95
031003 1002 88
031003 1003 86
031003 1004 77
031002 1001 85
031002 1003 98
031002 1004 24
032001 1001 100
032001 1006 80
033002 1002 60
033002 1003 59
033002 1004 47
032002 1005 90
032002 1006 35