研究VB记单词课设论文报告格式.docVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
研究VB记单词课设论文报告格式.doc

  研究VB记单词课设论文报告格式 研究VB记单词课设论文报告格式_打印稿 —张春源 导读:VB记单词课设论文报告格式-打印稿 —张春源 课程设计(论文)任务 机电工程 学 院 物流管理 专 业 一 班 一、课程设计(论文)题目 背单词 二、课程设计(论文)工作自 2014 年 6月10日起至 2014 年 6 月 16 日止。 三、课程设计(论文) 地点: 8-605、606 四、课程设计(论文)内容要求: 1.本课程设计的目的 1. 综合Visual Basic相关知识制作简单的可视化应用程序 2. 灵活对程序代码进行利用,修改和编写; 3. 熟练将Visual Basic所学知识和其它知识相结合 2.课程设计的任务及要求 1)基本要求: 1、目的是进一步培养学生综合应用VB的各种编程知识和技巧进行程序设计的能力。 通过课程设计,学生能达到具备设计功能较为复杂的Windows应用程序的能力。 2、至少多窗体界面(3-5个窗体) 3、使用循环、菜单、数组、文件操作、图形操作等知识点。; 4、对运算结果的正、误分析原因。 2)课程设计论文编写要求 (1)要按照书稿的规格打印誊写毕业论文 (2)论文包括目录、绪论、正文、小结、 研究VB记单词课设论文报告格式_打印稿 —张春源 导读:VB记单词课设论文报告格式-打印稿 —张春源.......... 1 2.1设计思路 ....................................... 3 2.2 属性的设置 .................................... 4 第4章 运行结果及分析 .............................. 12 4.1 运行结果 ..................................... 12 4.2程序分析 ...................................... 13 4.3运行程序使用说明 .............................. 14 研究VB记单词课设论文报告格式_打印稿 —张春源 导读:VB记单词课设论文报告格式-打印稿 —张春源abel12.caption=er计时器的interval值相对应,就能使计时器触发事件的时间间隔发生改变。 8. 改变picture1的背景色:也是通过滚动条来实现的。是RGB三原色改变。RGB(a,b;c) 其中abc是0~255的整数,返回颜色。 9.以上大多数都是写在命令控件中的,所以点击mand时,就能发生相应的事件。单击 mand1,就能打开文件,并且找到符合范围的单词,mand2可以使单词暂停流动, 或继续流动。mand3使程序停止。 3 2.2 属性的设置 4 5 第3章 源程序代码 Option Explicit Option Base 1 Dim n%, j%, k% Dim i% Dim hb%, tb%, xn% Private Sub chkRand_Click() If chkRand.Value = 1 Then chkLoop.Value = 0 chkLoop.Enabled = False Else chkLoop.Enabled = True End If End Sub Private Sub mand1_Click() Label12.Left = Picture1.Left + Picture1.p; ;\grade4.txt; For Input As #1 Else Open App.Path ;\grade6.txt; For Input As #1 End If n = 0 Do Until EOF(1) n = n + 1 6 ReDim Preserve words(n) Line Input #1, words(n) Loop Close #1 tb = 1 3 4 5 6 7 研究VB记单词课设论文报告格式_打印稿 —张春源 导读:VB记单词课设论文报告格式-打印稿 —张春源 Do Until Chr(Asc(er1.Enabled = True Timer2.Enabled = True mand2.Enabled = True mand2.Caption = ;暂停; End Sub Private Sub mand2_Click() If mand2.Caption = ;暂停; Then mand2.Caption = ;继续; Timer

文档评论(0)

ggkkppp + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档