c语言综合实训

c语言综合实训
第一篇：c语言综合实训
《C语言程序设计》综合实训
一、实训目的：
1、完成C语言程序设计课程的教学之后,通过1周的课程设计可以进一步巩固所学知识,加深理解。

2、指导和促使学生通过各种途径对C语言相关技术内容进行拓展和深入,增强自学能力、软件开发能力等综合能力的培训。

二、综合实训题目：学生成绩管理系统完成下列功能：
1、初始化：把50个学生的学号、姓名、性别、年龄、四科成绩以及平均成绩和总成绩放在一个结构体数组中，学生的学号、姓名、四科成绩由键盘输入，然后计算出平均成绩和总成绩放在结构体对应的域中。

2、插入：输入一个学生的记录，按学号的先后顺序插入该学生的全部内容。

3、排序：对所有学生按要求排序（1.学号 2.总成绩），并输出。

4、查找：输入一个学生的学号或姓名，找到该学生并输出该学生的全部内容。

要求能查询多次。

5、删除：输入一个学生的学号或姓名，找到该学生并删除该学生的全部内容。

6、输出：输出全部学生的记录。

7、main调用所有函数，实现全部函数功能。

三、设计要求：
1、掌握《C语言程序设计》有关的专业基础知识和程序设计的基本方法。

2、学会利用程序的三种基本结构：顺序结构、选择结构、循环结构解决不同的问题。

3、学会根据实际需求定义变量及类型。

4、掌握过程和函数的定义及调用方法。

5、学会程序调试的基本方法。

四、时间分配：
序课程设计内容
号 1 2 3 4 界面设计模块设计程序综合调试设计报告总计
时）2 12 6
计学时
非上机时间完成不
时间（学
备注
五、实训报告要求
1、封面
2、目录
3、实训报告内容：
第一章需求分析
第二章系统设计
结构图数据类型
第三章程序实现
代码
第四章心得与不足
设计题目 C语言程序设计实训专业班级网络101 学生姓名学号06 指导教师张青起止日期 2012.5.28—2010.6.1 河南化工职业学院
#include
main()
{ int i=9;
while(i)
{
printf(“n1.插入学生信息n”);
printf(“2.修改学生信息n”);
printf(“3.查询学生信息n”);
printf(“0.退出n”);
printf(“请选择功能：”);
scanf(“%dn”,&i);
switch(i)
{case 1:printf(“n1.插入学生信息n”);break;
case 2:printf(“n2.修改学生信息n”);break;
case 3:printf(“n3.查询学生信息n”);break;
default:printf(“n输入有误，重新输入n”);
}
}
}
第二篇：C语言程序设计综合实训
《C语言程序设计》综合实训
一、实训目的：
1、完成C语言程序设计课程的教学之后,通过1周的课程设计可以进一步巩固所学知识,加深理解。

2、指导和促使学生通过各种途径对C语言相关技术内容进行拓展和深入,增强自学能力、软件开发能力等综合能力的培训。

二、题目：学生成绩管理系统
完成下列功能：
1、输入：函数input把20学生的学号、姓名、性别、年龄、四科成绩以及平均成绩和总成绩放在一个结构体数组中，学生的学号、姓名、四科成绩由键盘输入，然后计算出平均成绩和总成绩放在结构体对应的域中。

2、插入：insert 函数输入一个学生的记录，按学号的先后顺序插入该学生的全部内容。

3、排序：sort函数对所有学生按要求排序（1.学号
2.总成绩），并输出。

4、查找：find函数输入一个学生的学号或姓名，找到该学生并输出该学生的全部内容。

要求能查询多次。

5、删除：delete函数输入一个学生的学号或姓名，找到该学生并
删除该学生的全部内容。

6、输出：函数output 输出全部学生的记录。

7、main调用所有函数，实现全部函数功能（注：除了定义结构外，不允许使用全局变量，函数之间的数据全部使用参数传递）。

三、设计要求：
1、掌握《C语言程序设计》有关的专业基础知识和程序设计的基本方法。

2、学会利用程序的三种基本结构：顺序结构、选择结构、循环结构解决不同的问题。

3、学会根据实际需求定义变量及类型。

4、掌握过程和函数的定义及调用方法。

5、学会程序调试的基本方法。

四、时间分配：
序号 1 2 3 4 课程设计内容
界面设计模块设计程序综合调试设计报告总计
时间（学时）20 8 30
备注
非上机时间完成不计学时
五、考核形式及要求：
《C语言程序设计》综合实训实验部分评分结构表
序号
程序完成情况
成绩比例（%）
审评成绩（%）
项目
能正常运行，无语法错基本功能完备（6种操作）界面美观，有系统菜单
在完成基本功能的基础上，有扩展
操作演示
2 答辩
操作熟练各种操作有提示
能够正确描述程序中数据的组织形式、程序的整体结构和算法（10）回答提问流畅（10）20
1、课程设计报告占30%，实验70%。

2、课程设计结束上交课程设计报告和源程序；
3、要求在规定时间内独立完成；
第三篇：会计综合实训（定稿）
财务会计综合实训报告
——会计1241高明 1205073402
为期一个月的会计综合实训结束了，通过本次实训，让我对会计整个流程的操作有了较好的认识，我学会了会计中各个环节的操作，以及更加懂得了细心、谨慎和责任对于一个会计来说是那么的重要。

在这些会计模拟实训中，对于在课堂上老师讲授的通过这一次实训让我们系统地进行了一番实践。

通过这次的模拟实验使我加强了对基础会计各方面知识的记忆也让我发现了自己在哪些方面的不足，发现问题及时补救是这一次实训一大收获。

在实验我学习到了许多在书本上不能学到的知识。

这次是通过自己对企业发生的业务审核并亲自填写记账凭证，登记明细账、编制科目汇总表、登总账等一系统的操作。

在实训的过程中遇到问题除了问老师自己也意识到只有把书本上学到的会计理论知识应用于实际的会计实务操作中去，才能够真正掌握这门知识，我想这也是这次实训的真正目的吧。

在实训中，我们首先学习填写原始凭证，熟悉并了解了各种各样的原始凭证。

然后又根据发生经济业务的原始凭证来填写记账凭证。

又根据有关记账凭证逐日逐笔的登记现金日记账、银行存款日记账以及其他有关明细账；往后我们编制会计科目汇总表，进行试算平衡。

根据科目汇总表登记总分类账。

并与有关明细账、日记账核对；最后编制会计报表，将有关记账凭证，账页和报表。

会计本来就是烦琐的工作。

在实习期间，我曾觉得整天要对着那枯燥无味的账目和数字而心生烦闷、厌倦，以致于登账登得错漏百出。

愈错愈烦，愈烦愈错，这只会导致“雪上加霜”。

反之，只要你用心
地做，反而会左右逢源。

越做越觉乐趣，越做越起劲。

梁启超说过：凡职业都具有趣味的，只要你肯干下去，趣味自然会发生。

因此，做账切忌：粗心大意，马虎了事，心浮气躁。

做任何事都一样，需要有恒心、细心和毅力，那才会到达成功的彼岸！这次会计实习中，我可谓受益非浅。

通过这学期会计实训，深刻的让我体会到会计工作在企业的日常运转中的重要性，以及会计工作对我们会计从业人员的严格要求。

在实际操作过程中我找出自身存在的不足，对今后的会计学习有了一个更为明确的方向和目标。

通过实训，我们对会计核算的感性认识进一步加强。

加深理解了会计核算的基本原则和方法，将所有的基础会计、财务会计和成本会计等相关课程进行综合运用，了解会计内部控制的基本要求，掌握从理论到实践的转化过程和会计操作的基本技能将会计专业理论知识和专业实践，有机的结合起来，开阔了我们的视野，增进了我们对企业实践运作情况的认识，为我们毕业走上工作岗位奠定坚实的基础。

第四篇：VB综合实训
VB换肤（GUI界面）
第一种方法：后缀为.she文件的皮肤
SkinSharp换肤库不是COM组件，无需进行系统注册，仅以标准dll方式存在。

1.打开vb6开发环境，新建一个工程文件，并存档
2.将一个名为“肤色”的文件夹和一个名为SkinH_VB6.dll的文件拷贝到工程所在的目录
3.外部函数接口api函数原型，把这原形放在通用声明段
Private Declare Function SkinH_AttachEx Lib “SkinH_VB6.dll”(ByVal lpSkinFile As String, ByVal lpPasswd As String)As Long
4.若需要什么样的皮肤（即.she文件）就在相应的事件（比喻在Form_Load()）中输入下面的内容：
SkinH_AttachEx App.Path & “/皮肤/vista.she”, “ ”
app.path：系统字串常量，返回工程所在的路径。

皮肤：是跟工程在同一目录下的一个文件夹
vista.she：皮肤文件，可以把网上下载的.she文件放在同目录下用时，只接按上四步骤即可。

第二种方法：ActiveSkin 4.3软件的应用。

可以自己更改皮肤
1.安装ActiveSkin 4.3。

同其它软件安装一样。

2.汉化该软件。

直接运行setup.exe（汉化的安装文件）。

点下一步直至完成
3.新建一个VB工程文件，在工具箱灰白色地方右键单击，选择[部件]，在部件对话框中勾选ActiveSkin
4.3后单击[应用][确定]
4.在出现的两个控件中选择拖入到窗体上。

右键单击，选择[编辑皮肤]即可到ActiveSkin 4.3中编辑皮肤
bel控件必须使用该部件给的ab控件来替换。

原本的A是不会显示
6.选择相应的事件(如Form_Load())。

在该事件中输入：
Skin1.ApplySkin Me.hWnd
7.如果要移植你的程序到别的机器上运行，请编译打包。

因为该皮肤需要系统其它文件来支持。

所以你可以选择VB-PowerWrap进行VB程序的封装
VB与ACCESS2003数据库连接相关步骤：
第一步：建立连接
1.引用相关组件：Microsoft ActiveX Data Objects
2.0 Library。

Microsoft ADO Data Control 6.0 2.在通用声明段申明：Dim mConn As ADODB.Connection
3.在对应的事件（如Form_Click()）中：set mConn=New ADODB.Connection或Dim mConn As New ADODB.Connection
4.设置其连接字串（与磁盘上的MDB文件建立连接）：
mConn.ConnectionString=“Provider=Microsoft.jet.oledb.4. 0;Data Source=” & App.Path & “RSData.mdb” 5.打开连接：mConn.Open 6.测试连接是否成功：if mConn.State=adStateOpen
then msgbox “数据库已经连接成功！” else msgbox “数据库连接不成功！” 以上连接方法是在事件里完成，也可以把连接做一个过程，需要连接时直接带参调用也可。

如在模块中这样定义
Public conn As New ADODB.Connection Public Function DBConnection(FileName As String)As Boolean
Set conn = New ADODB.Connection conn.ConnectionString = “provider=microsoft.jet.oledb.4.0;” & “data source=” & FileName
conn.Open
If conn.State = adStateOpen Then
DBConnection = True
Else
DBConnection = False
End If End Function 然后回事件中调该函数。

其相应代码如下：Private Sub Command2_Click()
CommonDialog1.ShowOpen
Text1.Text = CommonDialog1.FileName
If DBConnection(Text1.Text)Then
MsgBox “连接成功！”
Else
MsgBox “连接失败！”
End If End Sub
第二步：从数据库中取出记录，绑定到相对应的控件(Microsoft DataGrid Control 6.0(SP6)(OLEDB))中
1.在通用声明段定义记录对象：
Dim rs As New ADODB.Recordset 2.在相应的事件（如Form_Click()）中定义：
Set rs = New ADODB.Recordset Dim sql As String
sql = “select * from 部门表” rs.CursorLocation = adUseClient rs.Open sql, mConn, 1, 3
3.在窗体上从部件中找到Microsoft DataGrid Control 6.0(SP6)(OLEDB)并加载到工具箱上，然后产生一个实体对象，其名称为DataGrid1 Set DataGrid1.DataSource = mRst.DataSource 注意：游标与锁
0=adopenForwardonly:仅向前游标—除仅允许在记录中向前滚动之外，其行为类似动态游标。

这样，当需要在Recordset 中单程移动时就可提高性能。

1=adopenkeyset:键集游标—其行为类似动态游标，不同的只是禁止查看其他用户添加的记录，并禁止访问其他用户删除的记录，其他用户所作的数据更改将依然可见。

它始终支持书签，因此允许Recordset 中各种类型的移动。

2=adopenDynamic:动态游标—用于查看其他用户所作的添加、更改和删除，并用于不依赖书签的Recordset 中各种类型的移动。

如果提供者支持，可使用书签。

3=adopenstatic:静态游标—提供记录集合的静态副本以查找数据或生成报告。

它始终支持书签，因此允许Recordset 中各种类型的移动。

其他用户所作的添加、更改或删除将不可见。

这是打开客户端(ADOR)Recordset 对象时唯一允许使用的游标类型。

mRst.CursorLocation = adUseClient:使用由本地游标库提供的客户端游标
mRst.CursorLocation = adUseServer 默认值。

使用数据提供者或驱动程序提供的游标。

1=adLockReadOnly 默认值，只读。

无法更改数据。

2=adLockPessimistic 保守式记录锁定（逐条）。

提供者执行必要的操作确保成功编辑记录，通常采用编辑时立即锁定数据源的记录的方式。

3=adLockOptimistic 开放式记录锁定（逐条）。

提供者使用开放式锁定，只在调用 Update 方法时锁定记录。

4=adLockBatchOptimistic 开放式批更新。

用于与立即更新模式相反的批更新模式。

第三步：向数据库中写数据（找一个相应的事件，如Command1_Click()）
Dim bmid As String,bmmc As String,sql As String Dim conn As New ADODB.Connection Dim rs As New ADODB.Recordset bmid = Text1.Text:bmmc = Text2.Text conn.ConnectionString = “provider=microsoft.jet.oledb.4.0;data source=” & App.Path &“rsdata.mdb” conn.Open
On Error GoTo cancel: sql = “insert into 部门表(部门ID,部门名称)values('” + bmid + “','” + bmmc + “')” rs.Open sql, conn
cancel:
If conn.Errors.Count = 0 Then
Else
MsgBox “写数据有问题，主键重复”
End If 除了用SQL语句增加库记录以外，也可以用下面的方法来增加库记录
rs.CursorType = adOpenKeyset rs.LockType = adLockOptimistic rs.Open “部门表”, conn, , , adCmdTable rs.AddNew rs.Fields(0)= bmid rs.Fields(1)= bmmc rs.Update 第四步：删除数据库中的一条记录（找一个相应的事件，如Command2_Click()）
Private Sub command2_click()Dim sql As String Dim conn As New ADODB.Connection Set rst = New ADODB.Recordset Dim bmid As String bmid = Trim(DataGrid1.Columns(0))conn.ConnectionString = “provider=microsoft.jet.oledb.4.0;data source=” & App.Path & “rsdata.mdb” conn.Open
sql = “delete from 部门表 where 部门ID='” + bmid + “'” rst.Open sql, conn, 1, 3
sql = “select * from 部门表”
rst.CursorLocation = adUseClient
rst.Open sql, conn, 1, 3 if not rst.eof()then
rst.movenext end if
Set DataGrid1.DataSource = rst.DataSource set rst=nothing set conn=nothing End sub 第五步：更改数据库中的信息（找一个相应的事件，如Command1_Click()）Private Sub Command1_Click()Dim sql As String Dim conn As New ADODB.Connection Set rst = New ADODB.Recordset Dim s As String
s = “实验中心”
conn.ConnectionString = “provider=microsoft.jet.oledb.4.0;data source=” & App.Path & “rsdata.mdb” conn.Open
sql = “update 部门表 set 部门名称='” + s + “' where 部门ID='001'” rst.Open sql, conn End Sub
第一步：建立连接
1.引用相关组件：Microsoft ActiveX Data Objects
2.0 Library。

Microsoft ADO Data Control 6.0 Dim mConn As ADODB.Connection Private Sub Form_Click()set mConn=New ADODB.Connection或Dim mConn As New ADODB.Connection mConn.ConnectionString=“Provider=Microsoft.jet.oledb.4.0;Da ta Source=” & App.Path & “Police Information.mdb” mConn.Open if mConn.State=adStateOpen then msgbox “数据库已经连接成功！” else msgbox “数据库连接不成功！” End Sub 以上连接方法是在事件里完成，也可以把连接做一个过程，需要连接时直接带参调用也可。

如在模块中这样定义
Public conn As New ADODB.Connection Public Function DBConnection(FileName As String)As Boolean
Set conn = New ADODB.Connection
conn.ConnectionString = “provider=microsoft.jet.oledb.4.0;”
& “data source=” & FileName
conn.Open
If conn.State = adStateOpen Then
DBConnection = True
Else
DBConnection = False
End If End Function 然后回事件中调该函数。

其相应代码如下：Private Sub Command2_Click()
CommonDialog1.ShowOpen
Text1.Text = CommonDialog1.FileName
If DBConnection(Text1.Text)Then
MsgBox “连接成功！”
Else
MsgBox “连接失败！”
End If End Sub
第五篇：综合实训报告
汕头星辉物流有限公司综合实训报告
实习单位：汕头星辉物流有限公司
实习时间：2013年11月1日至2013年11月28日
一·实训目的通过专业的物流管理实训，增加对物流产业的感性认识，熟悉物流的各环节，在真实的环境中掌握物流作业技术和物流管理能力，而仓储是物流活动的核心环节之一，是企业生产经营顺利进行的必要过程，通过到物流企业或工商企业实际训练仓储操作与管理，加深对理论知识的理解，提高仓储管理技能，使得自身选择和从事物流管理职业的条件进一步优化。

与此同时，培养自身实际调研能力，尝试检验所学知识，并从实际中进一步学习了解物流仓储的内涵与外延。

同时了解物流仓储的特点、主要设备和作业流程,对其进行分析，并依据学习的理论提出自己的意见。

二·汕头星辉物流有限公司简介
汕头星辉物流有限公司成立于2003年3月6日，隶属于中国星辉
实业集团，是专业经营和管理物流业务的大型企业，注册资本18亿元人民币。

公司下设36个省级子公司，是一家集仓储、封装、配送、加工、理货、运输和信息服务于一体的现代化综合性物流企业。

公司以一体化精益物流、区域配送、货运代理、分销与网购等四大板块为主要业务发展方向，依托和发挥星辉物流两网三流的资源优势的良好信誉，坚持至诚
至信，精益求精的经营理念，采用先进物流运作模式和技术手段，努力为客户提供个性化、量体裁衣的各类完善的物流解决方案。

1、企业目标
运用第三方物流的经营理念、管理模式和技术方法，发挥星辉物流
品牌与资源优势，整合物流资源及必要的社会物流资源，以市场为导向，以科技为支撑，建立与国际物流网络对接、覆盖全国的物流网络和先进、高效的物流信息平台，形成一体化物流服务体系，实现物流、信息流与资金流的融合，为客户提供供应链解决方案和综合物流服务，并将星辉
物流发展成为中国规模最大、具有国际竞争力的第三方物流企业。

2、市场定位
围绕国民经济和社会发展需要，以多批次、高时效、高附加值、小
批量、小体积、小重量的物品为主，重点为IT（电子、电信）医药、出版、汽车配件、高档消费品、烟草、电子商务等行业的国内外大中型制造企业、品牌流通企业和电子商务企业提供定制化的、高层次精益物流服务。

3、公司业务
一体化物流业务；区域配送业务；星辉物流快货业务与货运代理；
分销与网购业务。

4、汕头星辉物流有限公司东南汽车项目：汕头星辉物流有限公司作
为东南汽车的战略伙伴，全面负责东南汽车零部件的仓储管理及
全国102家经销商的汽车零部件配送业务。

东南汽车与汕头星辉物流有限公司全面合作一年多来，仓储料账相符率、配送及时率等各项作业指标稳步提高，东南汽车的客户满意度不断提升。

双方合作促进了汕头星辉物
流有限公司服务水平的提高，提升了一体化物流的解决能力，实现从客户订单接收到汽车备件配送完成的全过程监控和管理。

客户的任何需求均可在极短的时间内作出反应，使各环节有机、快速地运转，提高了物流的反应速度，缩短了配件从生产厂到消费者的时间，从而增强了客户忠诚度。

三·实训内容
（一）、学习目标
1、入库操作：货品的入库、架位的分配、各类货物保管、货物入库交接
2、出库操作：车辆的装载、配送线路安排、运输车辆安排、货物的堆放、提货通知
3、仓库盘点：盘点单的认知、盘点流程的熟悉、盘点准备工作、寻找分析差异
4、拣选货物：订单的熟悉、货品存储地点、单据的填写与管理、拣选设备的使用与维修
5、打包称重：纸箱规格的认知、配送线路的熟悉
6、客服的操作及学习
（二）、实训过程
刚进入仓库，经理为我讲解了有关东南项目的大体情况以及仓库的操作流程明细，包括东南仓库严格的管理规定，并为我讲解了仓库的布局，整个东南仓库货架编码分别从A到N，大概每二到四个编码为一个区，每个区都有一个组长统筹管理，而我刚开始被分配到AB区域工作。

组长带我认识货架整体的编码分区，AB区从A到D分为四个区，而A区
又从AA到AN，每个货架又分为AAA到AAF，而货架的每一层又从AAA01到AAA05，货架编码分区大概是这样的，其中也有些层
数比较多的。

每天我的工作就是入库操作，按单配货，货物打包称重。

对于这些事情，刚开始我还不熟悉，总是会拣错货物，打包的慢，整体效率不高，但是随着拣选打包次数的增多，自己也开始慢慢熟悉整个货品的分布，拣选的效率显著提高，因为有些货品拣选得多了一看就知道在哪里而不需要四处寻找，打包的工作也轻车熟路了。

对于称重则必须知道运输路线，同一路线的放一个托盘这样就方便出库操作，刚接触有些地方分不清省份，分配较慢，路线也不是很熟悉，经常弄错，但是经过组长的细心教导我进步了许多，如今已经快赶上正式员工的速度了。

到月末的时候仓库都必须进行一次盘点，而我由于是新手，组长将轻松的盘点工作交给我，只要按照盘点单将盘点的货物数量记录清楚就可以，但必须保证数目是正确的，不能粗心大意数错，于是我数了整整一天，眼睛都数模糊了，一次盘点完后组长将盘点单拿到信息组跟库存进行对比，如果有出入则必须进行二次盘点，折腾了一个晚上才将整个月盘的工作完成。

一个月下来，对于仓库的操作自己已经轻车熟路了，做起来也有模有样的，入库出库打包称重这些操作的重点都已经掌握，也小学习了一下叉车的使用，在信息组那一块也小有接触，大致的了解了一些物流记账明细。

在进行入库学习的同时，我还研究有关客服的知识，并且应用到实际操作中。

对于物流详情单的跟踪、汇总以及反馈的工作也渐渐轻车熟路，也懂得如何有效的通过电话进行沟通。

四·实训心得体会
一个月的实训，使我不仅学到了相关的实战经验，开阔了视野，拓宽了思路，提升了理念，更重要的是，通过实践，使我深入地了解了物流实训的现状、方法、和步骤；充分认识到了物流实训对我们的重要性和必要性，让我对物流有了新的认识。

因为在实践中反思，总会发现自己的不足，在实践中研究，再实践，不断循环，不断更新，不断提升和发展，从而达到追求完美的境界。

同时，在实训过程中，
我了解了工作往往不是一个人的事情，是一个团队在完成一个项目，在工作的过程中如何去保持和团队中其他同事的交流和沟通也是相当重要的。

这次的实训还使我深切了解到仓储管理的有关知识，对于操作流程的熟悉，对于操作设备的使用及维护，对于仓库的合理规划管理等等，这些实际操作上的东西是课本上所学不到的，自然就提高了我在仓储方面的实际技能，除此之外还明白了一些人际交往上的法则，为即将迈进社会的我做好了充分的铺垫。

五·实训总结
在整个实训过程中，我也发现汕头星辉物流公司东南仓库的一些不足之处，包括货架的维护不及时，货品的条码未及时更新，破损的货品未及时清理，有些货品未按指定位置存放，货架上的货品有些顺序错乱等等，这都为我以后的仓库管理工作奠定了丰富的经验，从而避免类似的错误发生。

仓储管理博大精深，其中的知识如大海般无穷尽，我也只是取当中一瓢饮而已，所以需要我学习的地方还有很多。

客服也是一项不小的工作，自己的水平还有待提高。