王朝知道
分享
 
 
 

那位大虾有visual foxpro 的教程和设计作品让小弟看下.

王朝知道·作者佚名  2010-04-26  
宽屏版  字体: |||超大  
 
分类: 电脑/网络 >> 程序设计 >> 其他编程语言
 
问题描述:

我的毕业设计是选择用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

小贴士:① 若网友所发内容与教科书相悖,请以教科书为准;② 若网友所发内容与科学常识、官方权威机构相悖,请以后者为准;③ 若网友所发内容不正确或者违背公序良俗,右下举报/纠错。
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
如何用java替换看不见的字符比如零宽空格​十六进制U+200B
 干货   2023-09-10
网页字号不能单数吗,网页字体大小为什么一般都是偶数
 干货   2023-09-06
java.lang.ArrayIndexOutOfBoundsException: 4096
 干货   2023-09-06
Noto Sans CJK SC字体下载地址
 干货   2023-08-30
window.navigator和navigator的区别是什么?
 干货   2023-08-23
js获取referer、useragent、浏览器语言
 干货   2023-08-23
oscache遇到404时会不会缓存?
 干货   2023-08-23
linux下用rm -rf *删除大量文件太慢怎么解决?
 干货   2023-08-08
刀郎新歌破世界纪录!
 娱乐   2023-08-01
js实现放大缩小页面
 干货   2023-07-31
生成式人工智能服务管理暂行办法
 百态   2023-07-31
英语学习:过去完成时The Past Perfect Tense举例说明
 干货   2023-07-31
Mysql常用sql命令语句整理
 干货   2023-07-30
科学家复活了46000年前的虫子
 探索   2023-07-29
英语学习:过去进行时The Past Continuous Tense举例说明
 干货   2023-07-28
meta name="applicable-device"告知页面适合哪种终端设备:PC端、移动端还是自适应
 干货   2023-07-28
只用css如何实现打字机特效?
 百态   2023-07-15
css怎么实现上下滚动
 干货   2023-06-28
canvas怎么画一个三角形?
 干货   2023-06-28
canvas怎么画一个椭圆形?
 干货   2023-06-28
canvas怎么画一个圆形?
 干货   2023-06-28
canvas怎么画一个正方形?
 干货   2023-06-28
中国河南省郑州市金水区蜘蛛爬虫ip大全
 干货   2023-06-22
javascript简易动态时间代码
 干货   2023-06-20
感谢员工的付出和激励的话怎么说?
 干货   2023-06-18
 
>>返回首页<<
 
 
 
静静地坐在废墟上,四周的荒凉一望无际,忽然觉得,凄凉也很美
© 2005- 王朝网络 版权所有