




版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、会计学1脚本语言三脚本语言三2021-10-1822021-10-182语句语句nVBScript函数及子函数及子过程过程第1页/共27页第2页/共27页第3页/共27页第4页/共27页2021-10-186第5页/共27页7第6页/共27页第7页/共27页第8页/共27页10第9页/共27页第10页/共27页 要使计数器变量递减,可将 Step 设为负值。此时计数器变量的终止值必须小于起始值。在下面的示例中,计数器变量 myNum 每次减 2。循环结束后,total 的值为 16、14、12、10、8、6、4 和 2 的总和。Sub NewTotal() Dim myNum, total F
2、or myNum = 16 To 2 Step -2 total = total + myNum Next MsgBox 总和为 & total & 。 End Sub第11页/共27页2021-10-18132021-10-1813语句语句nSub 过程和过程和Function 过程过程第12页/共27页第13页/共27页2021-10-1815第14页/共27页没有参数的 VBScript Sub 过程代码示例sub myProc() msgbox “欢迎来到达内学习!end sub call myProc()VBScript Sub 过程不返回值。演示示例 第15页/共27页第16页/共27页lllVBScript Sub 过程代码示例ll Sub myMulti(no1, no2)l MsgBox (no1*no2)l End Sublllll myMulti 8,9lll演示示例 第17页/共27页19第18页/共27页20第19页/共27页llVBScript Sub 过程代码示例ll Sub myMulti(no1, no2)l MsgBox (no1*no2)lEnd Sublllll call myMulti(8,9)lll演示示例 第20页/共27页22第21页/共27页23第2
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 公司晨会活动策划方案
- 公司日常团建活动方案
- 公司秋游团建活动方案
- 公司日行万步策划方案
- 公司节日策划活动方案
- 2025年休闲体育管理师考试试卷及答案
- 2025年现代物流管理课程试题及答案
- 2025年手语翻译人才能力考试试卷及答案
- 2025年技术经济与管理专业综合考试试题及答案
- 幼儿园装修合同
- 留学机构合作协议书范本
- 太极拳教学合同协议
- 2024慢性鼻窦炎诊断和治疗指南解读课件
- 大国工匠精神课件
- 人工智能时代的教育评价体系构建
- 超星尔雅学习通《大学生创业基础(清华大学)》2025章节测试附答案
- 《内河运输船舶重大事故隐患判定标准》知识培训
- 路灯安全培训
- T-GDEIIA 56-2024 垂直起降低空航空器起降场基础设施配置技术要求
- 浙江省宁波市慈溪市2023年部编版小升初考试语文试卷(原卷版+解析)
- 《颈椎骨折的护理》课件
评论
0/150
提交评论