分享
 
 
 

那位大虾有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

小贴士:① 若网友所发内容与教科书相悖,请以教科书为准;② 若网友所发内容与科学常识、官方权威机构相悖,请以后者为准;③ 若网友所发内容不正确或者违背公序良俗,右下举报/纠错。
 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有