NBA球员管理系统文档格式.docx

上传人:b****3 文档编号:14935692 上传时间:2022-10-26 格式:DOCX 页数:18 大小:93.89KB
下载 相关 举报
NBA球员管理系统文档格式.docx_第1页
第1页 / 共18页
NBA球员管理系统文档格式.docx_第2页
第2页 / 共18页
NBA球员管理系统文档格式.docx_第3页
第3页 / 共18页
NBA球员管理系统文档格式.docx_第4页
第4页 / 共18页
NBA球员管理系统文档格式.docx_第5页
第5页 / 共18页
点击查看更多>>
下载资源
资源描述

NBA球员管理系统文档格式.docx

《NBA球员管理系统文档格式.docx》由会员分享,可在线阅读,更多相关《NBA球员管理系统文档格式.docx(18页珍藏版)》请在冰豆网上搜索。

NBA球员管理系统文档格式.docx

1.2开发环境

操作系统Windows7

软件配置VisualBasic6、0&

SQLServer2014

二、需求分析

2、1用户需求

NBA发展至今,整个联盟涵括了三十支球队,每支球队的球员名单上限在常规赛时期可以达到15位,加上不计其数的自由球员,管理并分析这些球员的生涯数据成为了一件棘手的事,NBA球员信息管理系统可以师解决这个问题。

本系统面向的对象为球队数据分析师,对于专业人士,她们不仅有权浏览数据,也可以对数据进行修改、删除,用户共享数据并更新数据。

2、2主要功能

本系统从用户的需求出发,可实现以下功能:

a)球员数据浏览

b)球员数据修改

c)球员数据删除

2、3数据字典

名称

数据类型

字段描述

char

球员姓名

Prage

smallint

球员年龄

Pno

球衣号码

PID

球员代号

Pcapital

money

球员薪金

Tname

隶属球队名称

TID

隶属球队代号

ppg

float

场均得分

rpg

场均篮板

apg

场均助攻

spg

场均抢断

bpg

场均盖帽

Pbe

最近一场得分

三、数据库概念结构设计

根据需求分析,可知本系统有以下E-R图:

3、1球员信息E-R图

3、2球员数据E-R图

球员信息

球员数据

球员表现

 

3、3球员表现E-R图

四、逻辑结构设计

4、1球员信息表

列名

NULL

约束

NOTNULL

primarykey

Pname

4、2球员数据表

4、3球员表现表

五、创建数据库及其对象

5、1建表

5、1、1球员信息表

createtableplayer(

PIDchar(10)NOTNULL,

Pnamechar(25)NOTNULL,

PcapitalmoneyNOTNULL,

PragesmallintNOTNULL,

Tnamechar(30)NOTNULL,

PnosmallintNOTNULL,

TIDchar(15)NOTNULL,

primarykey(PID,Pname)

5、1、2球员数据表

createtableplayerData(

ppgfloatNOTNULL,

rpgfloatNOTNULL,

apgfloatNOTNULL,

spgfloatNOTNULL,

bpgfloatNOTNULL,

5、1、3球员表现表

createtablebehave(

PbesmallintNOTNULL,

Pnamechar(25)NOTNULL

primarykey(PID)

六、基于VB的UI设计

6、1Form1窗口

PrivateSubAdd_Click()

Adodc1、Recordset、AddNew

Add、Enabled=False

Del、Enabled=False

Edit、Enabled=True

Cancel、Enabled=True

EndSub

PrivateSubCancel_Click()

Adodc1、Recordset、CancelUpdate

Add、Enabled=True

Del、Enabled=True

Cancel、Enabled=False

PrivateSubCommand1_Click()//打开form2窗口

Form2、Show

PrivateSubDel_Click()

DimresAsInteger

res=MsgBox("

确实要删除此行不?

"

vbExclamation+vbYesNo+vbDefaultButton2)

Ifres=vbYesThen

Adodc1、Recordset、Delete

Adodc1、Recordset、MoveNext

IfAdodc1、Recordset、EOF=TrueThen

Adodc1、Recordset、MoveLast

EndIf

PrivateSubEdit_Click()

Adodc1、Recordset、Fields("

Pno"

)=Trim(TextPno、Text)

Pname"

)=Trim(TextPname、Text)

Prage"

)=Trim(TextPrage、Text)

Pcapital"

)=Trim(TextPcpt、Text)

PID"

)=Trim(TextPID、Text)

TID"

)=Trim(TextTID、Text)

Tname"

)=Trim(TextTname、Text)

Adodc1、Recordset、Update

PrivateSubExit_Click()

End

PrivateSubFirst_Click()

Adodc1、Recordset、MoveFirst

PrivateSubLast_Click()

Adodc1、Recordset、MoveLast

PrivateSubNext_Click()

Adodc1、Recordset、MoveNext

IfAdodc1、Recordset、EOF=TrueThen

PrivateSubPrevious_Click()

Adodc1、Recordset、MovePrevious

IfAdodc1、Recordset、BOF=TrueThen

PrivateSubPrint_Click()//打开apg窗口

apg、Show

PrivateSubForm_Load()

Cancel、Enabled=False

Combo1、AddItem"

球员信息"

球员数据"

球员表现"

球员表现对比"

DimstrPIDAsString

DimstrSelectAsString

strPID=Trim(TextPID、Text)

strSelect="

select*fromplayer"

Adodc1、CommandType=adCmdText

Adodc1、RecordSource=strSelect

Adodc1、Refresh

SetDtgCond、DataSource=Adodc1

CallInitGird

DimstrPID1AsString

DimstrSelect1AsString

strPID1=Trim(TextPID、Text)

strSelect1="

select*fromplayerData"

Adodc2、CommandType=adCmdText

Adodc2、RecordSource=strSelect1

Adodc2、Refresh

SetDtgCond1、DataSource=Adodc2

CallInitGird1

DimstrPID2AsString

DimstrSelect2AsString

strPID2=Trim(TextPID、Text)

strSelect2="

select*frombehave"

Adodc3、CommandType=adCmdText

Adodc3、RecordSource=strSelect2

Adodc3、Refresh

SetDtgCond2、DataSource=Adodc3

CallInitGird2

DimstrPID3AsString

DimstrSelect3AsString

strPID3=Trim(TextPID、Text)

strSelect3="

select*fromplayerDatajoinbehaveonplayerData、PID=behave、PID"

Adodc4、CommandType=adCmdText

Adodc4、RecordSource=strSelect3

Adodc4、Refresh

SetDtgCond3、DataSource=Adodc4

PrivateSubInitGird()

WithDtgCon

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 求职职场 > 简历

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1