导航:首页 > 万维百科 > 软件工程课程设计课程网站建设

软件工程课程设计课程网站建设

发布时间:2020-09-03 17:34:07

1、软件工程课程设计的介绍

《软件工程课程设计》结合高等院校软件工程课程的相关要求,通过一个会议系统的实例,向读者介绍软件工程理论在实际项目中的应用,以达到深入理解软件工程过程和实现方法的目的。《软件工程课程设计》内容包括项目准备、项目管理、需求分析、软件设计、软件实现、软件测试,以及如何编写用户手册和如何进行配置管理等。此外,《软件工程课程设计》还给出了各个关键阶段的项目文档,具有很强的参考价值。《软件工程课程设计》适合作为高等院校计算机及相关专业“软件工程”课程的配套课程设计教材,也可作为软件工程技术人员的参考读物。

2、软件工程课程设计设计思路怎么写

软件工程课程设计
没问题的帮忙的。

3、求软件工程课程设计一份

图书馆管理系统 软件工程课程设计说明书一份

《图书管理系统》系统设计报告

一、 引言
1. 摘要:中学图书馆管理系统
目的:方便图书馆对书籍借阅的管理
主要功能: —学生基本信息查询
—书籍借阅管理
—书籍管理
2. 背景:第十小组承担开发任务
3. 工作条件与限制:windows操作平台,Visual Basic6.0和SQL Sserver2000等软件为开发工具,利用上课时间和课外时间做成。由于现在图书管理系统已经比叫完善,所以我们暂时没有能做出比以前有先进技术的管理系统。
4. 参考和引用资料:《数据库系统概论》,VB应用
5. 专门术语定义:
二、系统总体技术方案
1. 计算机系统配置:windows平台,VB/SqlServer2000,WINNT SERVER操作系统, SQL server2000关系数据库管理系统 ,VB操作软件,局域网。
2. 模块设计:主要分为三个模块:即学生基本信息模块,书籍借阅模块,书籍管理模块
代码设计:读者信息查询
Public connStr As ADODB.Connection
Private Sub Command1_Click()

End Sub

Private Sub cmdAdd_Click()
If Trim(List1.Text) <> "" Then
List2.AddItem (List1.Text)
End If
End Sub

Private Sub cmdMove_Click()
If Trim(List2.Text) <> "" Then
List2.RemoveItem (List2.ListIndex)
End If
End Sub

Private Sub cmdSearch_Click()
Dim cmdstr As String
If List2.ListCount = 0 Then
MsgBox "请选择输出列!", vbOKOnly, "提示"
Exit Sub
End If
cmdstr = "select "
For i = 0 To List2.ListCount - 1
If Trim(List2.List(i)) = "图书证号" Then
cmdstr = cmdstr + "READER_DATA." + Trim(List2.List(i)) + ","
Else
If Trim(List2.List(i)) = "书号" Then
cmdstr = cmdstr + "MARC_DATA." + Trim(List2.List(i)) + ","
Else
cmdstr = cmdstr + Trim(List2.List(i)) + ","
End If
End If
Next
cmdstr = Left(cmdstr, Len(cmdstr) - 1)
If Opbook.Value = True Then
cmdstr = cmdstr + " from MARC_DATA where "
End If
If Opreader.Value = True Then
cmdstr = cmdstr + " from READER_DATA where "
End If
If Oplend.Value = True Then
cmdstr = cmdstr + " from MARC_DATA,READER_DATA,LEND_DATA " & " where MARC_DATA.书号=LEND_DATA. 书号 and " & " READER_DATA.图书证号=LEND_DATA.图书证号 and "
End If
If Trim(comKey.Text) = "" Then
MsgBox "请选择查询关键字!", vbOKOnly, "提示"
Exit Sub
End If
If Trim(txtKey.Text) = "" Then
MsgBox "请设置查询关键字的值!", vbOKOnly, "提示"
Exit Sub
End If
If ComType.Text = "精确匹配" Then
cmdstr = cmdstr + Trim(comKey.Text) + "='" + Trim(txtKey.Text) + "'"
Else
cmdstr = cmdstr + Trim(comKey.Text) + " like '" + Trim(txtKey.Text) + "%'"
End If
Adodc1.RecordSource = cmdstr
Adodc1.Refresh
DataGrid1.Refresh
End Sub

Private Sub Form_Load()
Set connStr = New ADODB.Connection
connStr.Open "driver={SQL Server}; Server=SYSLAB000;UID=jj138;PWD=;database=计教(1)班38号"
Adodc1.ConnectionString = connStr
ComType.AddItem ("精确匹配")
ComType.AddItem ("前方一致匹配")

End Sub

Private Sub Label3_Click()

End Sub

Private Sub List2_Click()

End Sub

Private Sub Opbook_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "MARC_DATA", connStr, adOpenKeyset, adLockReadOnly, adCmdTable
comKey.Clear
List1.Clear
For i = 0 To rs.Fields.Count - 1
comKey.AddItem (rs.Fields(i).Name)

List1.AddItem (rs.Fields(i).Name)
Next
rs.Close
List2.Clear
txtKey.Text = ""
End Sub

Private Sub Oplend_Click()
comKey.Clear
List1.Clear
comKey.AddItem ("图书证号")
comKey.AddItem ("姓名")
comKey.AddItem ("书号")
comKey.AddItem ("书名")
comKey.AddItem ("出版社")
comKey.AddItem ("借出日期")
comKey.AddItem ("还书日期")
List1.AddItem ("图书证号")
List1.AddItem ("姓名")
List1.AddItem ("书号")
List1.AddItem ("书名")
List1.AddItem ("出版社")
List1.AddItem ("借出日期")
List1.AddItem ("还书日期")
List2.Clear
txtKey.Text = ""
End Sub

Private Sub Opreader_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "READER_DATA", connStr, adOpenKeyset, adLockReadOnly, adCmdTable
comKey.Clear
List1.Clear
For i = 0 To rs.Fields.Count - 1
comKey.AddItem (rs.Fields(i).Name)
List1.AddItem (rs.Fields(i).Name)
Next
rs.Close
List2.Clear
txtKey.Text = ""
End Sub

借还书处理
Private Sub cmdLend_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
If Trim(txtBid.Text) = "" Or Trim(txtRid_1.Text) = "" Then
MsgBox "请输入图书证号和书号!", vbOKOnly, "提示信息"
Else
rs.Open "LEND_DATA", connStr, adOpenKeyset, adLockOptimistic, adCmdTable
rs.AddNew
rs("书号") = txtBid.Text
rs("借出日期") = Date
rs("图书证号") = txtRid.Text
rs.Update
Adodc1.Refresh
End If
End Sub

Private Sub cmdReturn_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
If Trim(txtBid.Text) = "" Or Trim(txtRid_1.Text) = "" Then
MsgBox "请输入图书证号和书号!", vbOKOnly, "提示信息"
Else
cmdstr = "update LEND_DATA set 还书日期='" _
& Date & "' where 书号='" & Trim(txtBid.Text) & "'"
rs.Open cmdstr, connStr, adOpenKeyset, adLockOptimistic, adCmdText
Adodc1.Refresh
End If
End Sub

Private Sub cmds_Click()
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
cmdstr = "select * from READER_DATA WHERE 图书证号 ='" & Trim(txtRid_1.Text) & "'"
rs.Open cmdstr, connStr, adOpenForwardOnly, adLockReadOnly, adCmdText
If Not rs.EOF Then
txtRid.Text = rs("图书证号")
txtName.Text = rs("姓名")
If Not IsNull(rs("性别")) Then
txtXb.Text = rs("性别")
End If
If Not IsNull(rs("系名")) Then
txtXm.Text = rs("系名")
End If
Else
MsgBox "未找到该读者信息!", vbOKOnly, "提示信息"
End If
cmdstr = "select 借出日期,还书日期,LEND_DATA.书号,书名,作者,出版社" & " from LEND_DATA,MARC_DATA " & "where LEND_DATA.书号=MARC_DATA.书号 and " & " 还书日期 is null and 图书证号='" & Trim(txtRid_1.Text) & "'"
Adodc1.RecordSource = cmdstr
Adodc1.Refresh

End Sub

Private Sub cmdSearch_Click()
cmdstr = "select 借出日期,还书日期,LEND_DATA.书号,书名,作者,出版社" & "from LEND_DATA,MARC_DATA " & "where LEND_DATA.书号=MARC_DATA.书号 and 图书证号='" & Trim(txtRid_1.Text) & "'"
Adodc1.RecordSource = cmdstr
Adodc1.Refresh
End Sub

Private Sub DataGrid1_Click()
If Not Adodc1.Recordset.BOF And Not Adodc1.Recordset.BOF Then
txtBid.Text = Adodc1.Recordset("书号")
End If
End Sub

Private Sub Form_Load()
Set connStr = New ADODB.Connection
connStr.Open "driver={SQL Server}; Server=SYSLAB000;UID=jj138;PWD=;database=计教(1)班38号"
Adodc1.ConnectionString = connStr
End Sub

图书馆详细信息
Private Sub txt_refresh()
If Not Adodc1.Recordset.EOF And Not Adodc1.Recordset.BOF Then
txtBid.Text = Adodc1.Recordset("书号")
txtBname.Text = Adodc1.Recordset("书名")
txtWrite.Text = Adodc1.Recordset("作者")
txtPublisher.Text = Adodc1.Recordset("出版社")
txtYear.Text = Adodc1.Recordset("出版时间")
txtGb.Text = Adodc1.Recordset("国别代码")
txtDate.Text = Adodc1.Recordset("进馆时间")
txtCallno.Text = Adodc1.Recordset("分类号")
End If
End Sub

Private Sub cmdDele_Click()
Dim deletxt As String
deletxt = "是否删除图书《" & Adodc1.Recordset("书名") & "》的记录?"
If Not Adodc1.Recordset.EOF And Not Adodc1.Recordset.BOF Then
If MsgBox(deletxt, vbOKCancel, "提示信息") = vbOK Then
Adodc1.Recordset.Delete
Adodc1.Refresh
End If
End If
End Sub

Private Sub cmdNew_Click()

If cmdNew.Caption = "新增" Then
txt_enable (2)
cmdNew.Caption = "保存"
txtBid.Text = ""
txtBname.Text = ""
txtWrite.Text = ""
txtPublisher.Text = ""
txtYear.Text = ""
txtGb.Text = ""
txtDate.Text = ""
txtCallno.Text = ""
Else
Adodc1.Recordset.AddNew
Adodc1.Recordset("书号") = Trim(txtBid.Text)
Adodc1.Recordset("书名") = Trim(txtBname.Text)
Adodc1.Recordset("作者") = Trim(txtWrite.Text)
Adodc1.Recordset("出版社") = Trim(txtPublisher.Text)
Adodc1.Recordset("出版时间") = Trim(txtYear.Text)
Adodc1.Recordset("国别代码") = Trim(txtGb.Text)
4
Adodc1.Recordset("进馆时间") = Trim(txtDate.Text)
Adodc1.Recordset("分类号") = Trim(txtCallno.Text)
Adodc1.Recordset.UpdateBatch
Adodc1.Refresh
txt_enable (1)
cmdNew.Caption = "新增"
Adodc1.Recordset.MoveFirst
txt_refresh
End If

Private Sub cmdNext_Click()
If Not Adodc1.Recordset.EOF Then
Adodc1.Recordset.MoveNext
txt_refresh
End If
End Sub

Private Sub cmdPre_Click()
If Not Adodc1.Recordset.BOF Then
Adodc1.Recordset.MovePrevious
txt_refresh 2
End If

End Sub

Private Sub cmdUpdate_Click()
If cmdUpdate.Caption = "修改" Then
txt_enable (2)
cmdUpdate.Caption = "保存"
Else
Adodc1.Recordset("书号") = Trim(txtBid.Text)
Adodc1.Recordset("书名") = Trim(txtBname.Text)
Adodc1.Recordset("作者") = Trim(txtWrite.Text)
Adodc1.Recordset("出版社") = Trim(txtPublisher.Text)
Adodc1.Recordset("出版时间") = Trim(txtYear.Text)
Adodc1.Recordset("国别代码") = Trim(txtGb.Text)
Adodc1.Recordset("进馆时间") = Trim(txtDate.Text)
Adodc1.Recordset("分类号") = Trim(txtCallno.Text)
Adodc1.Recordset.UpdateBatch
Adodc1.Refresh
txt_enable (1)
cmdUpdate.Caption = "修改"
End If
End Sub

Private Sub Form_Load()
txt_refresh
End Sub

Private Sub Text1_Change()

End Sub

Private Sub Text8_Change()

End Sub

Private Sub txtBname_Change()

End Sub

4、求一份软件工程课程设计!

楼主的qq不对吧?加完之后发现聊错了....

5、软件工程课程设计具体步骤

1.首先接受老师下发的任务
2.根据任务查找资料,上网啦,找学哥学姐要啊,各种途径
3.资料找好后上机调试
4.答辩
5.课程设计报告

6、软件工程课程设计

软件发展阶段
1.程序设计阶段-50至60年代
2.程序系统阶段-60至70年代
3.软件工程阶段-70年代以后

软件生存期
定义阶段、开发阶段、维护阶段
瀑布模型
计划、需求分析、设计、编码、测试、运行维护
1.制定计划
确定开发软件系统的总目标、
给出功能性能可靠性以及接口等方面的要求、
完成该软件任务的可行性研究、
估计可利用的资源成本效益开发进度、
制定出完成开发任务的实施计划,连同可行性研究报告,提交管理部门审查、
2.需求分析和定义
对用户提出的要求进行分析并给出详细的定义、
编写软件需求说明书或系统功能说明书及初步的系统用户手册、
提交管理部门评审、
3.软件设计
概要设计
详细设计
4.程序编写
5.软件测试
单元测试、组装测试、有效性测试
6.运行维护
改正性维护、适应性维护、完善性维护

7、软件工程课程设计

兄弟这个不可能完成的!唉!太复杂了,这个系统要几十个人才能共同完成,用时几个月吧!和你说实话真的做不了,不是一个人能做出来的,要编程序的!java!不是说搞就能搞出来的!

8、软件工程课程设计~~~~~~~~~~~~!~~

要求太多了呀哥们!~
还一分不给,那怕你给点分,都帮你在网上找个源码给你发过去。
现在知道真是越来越难混了。

9、《软件工程》课程设计作业

没猜错的化你是想找一份完整的《软件设计开发文档》,最主要的是得做过项目,有实践经验的才能写出合格的文档,如果有难题可以私我

与软件工程课程设计课程网站建设相关的知识