销售信息统计.doc

  1. 1、本文档共16页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
PAGE 沈 阳 航 空 航 天 大 学 课程设计 学 号 2009040603042 班 级 9406030302 姓 名 张婕姝 指导教师 刘学平 2011年 7 沈航设计用纸 第 PAGE 16页,共 NUMPAGES 16页 沈阳航空航天大学 课程设计任务书 学院:机电工程学院 专业:车辆工程 班级学号:2009040603042 题目:销售信息统计 一、课程设计时间 2011年6月27日~7月1日 二、课程设计内容 沈阳的某家建材商店去年7月的销售业绩清单存储在文件“file22_销售信息统 计.txt”中,格式为:售货员编号,售货员姓名,销售日期,销售额。写程序,对文件中的数据具有如下的统计分析功能: ①能够按照所指定的售货员的编号,或者姓名,统计出他在7月的销售总额。 ②能够按照所指定的日期,统计出当日的销售总额。 三、课程设计要求 程序质量: 贯彻事件驱动的程序设计思想。 用户界面友好,功能明确,操作方便;可以加以其它功能或修饰。 用户界面中的菜单至少应包括“读取数据”、“统计某售货员的销售总额”、“统计某天的销售总额”、“退出”4项。 代码应适当缩进,并给出必要的注释,以增强程序的可读性。 课程设计说明书: 课设结束后,上交课程设计说明书和源程序。课程设计说明书的内容参见提供的模板。 四、指导教师和学生签字 指导教师:刘学平 学生签名:张婕姝 五、成绩 六、教师评语 目录 目 录 TOC \o 1-3 \h \z \u HYPERLINK \l _Toc287424534 一、需求分析 4 HYPERLINK \l _Toc287424535 二、设计分析 4 HYPERLINK \l _Toc287424536 三、关键技术 8 HYPERLINK \l _Toc287424537 四、总结 12 HYPERLINK \l _Toc287424538 五、完整的源程序 13 HYPERLINK \l _Toc287424539 六、参考文献 16 一、需求分析 销售信息统计,主要内容包括写程序,对文件中的数据具有如下的统计分析功能: ①能够按照所指定的售货员的编号,或者姓名,统计出他在7月的销售总额。 ②能够按照所指定的日期,统计出当日的销售总额。 二、设计分析 (1)基本原理: 建立程序设计与文本文档的连接,将文本文档中信息进行分类统计,定义动态数组解决对指定信息的读取 (2)总体设计: 提取所需信息 提取所需信息 文本文档 打开 图1 总体设计 (3)详细设计: 开始 开始 打开文件 查询数据 提取指定信息 统计文本文档中的信息 显示全部销售信息 按售货员编号或姓名统计销售总额 按日期统计当天的销售总额 图2 详细设计 (4)界面设计: 要求用户界面友好,功能明确,操作方便;可以增加其它功能或修饰。 图3 主界面 图4 统计某销售员的销售总额 图5 统计某天的销售总额 三、关键技术 1读取文本文档 程序段如下: Private Sub Command1_Click() Dim i As Integer i = 1 Open D:\file22_销售信息统计.txt For Input As #1 打开文件 Do While Not EOF(1) 判断文件是否结束 ReDim Preserve rows1(i) 读取第i行全部信息 Input #1, rows1(i).no, rows1(i).name, rows1(i).date, rows1(i).money 分别读取 第i行信息 i = i + 1 循环 Loop Close #1 关闭文件 For i = 1 To UBound(rows1) Form4.Print Tab(1); rows1(i).no; 打印文件 Form4.Print Tab(8); rows1(i).name; Form4.Print Tab(16); rows1(i).date; Form4.Print Tab(34); rows1(i).money; Next I

您可能关注的文档

文档评论(0)

a13355589 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档