版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、 Microsoft Accsee插入模块运行子过程/用户窗体设计模式中断重新设计 工程资源管理器 对象浏览器属性窗口工程窗口工程窗口选择对象选择对象属性窗口属性窗口选择对象选择对象的属性的属性代码代码窗口窗口选择选择事件事件 73 x 语句组语句组2语句组语句组1TF语句组语句组2条件条件语句组语句组1FT条件条件语句组语句组TF条件条件语句组语句组TF语句语句2条件条件语句语句1TF条件条件语句语句1Private Sub p1( )Private Sub p1( ) Dim x As Integer, y As Integer Dim x As Integer, y As Integer
2、 x = InputBox(“ x = InputBox(“请输入请输入x x值值”) ) IfIf x = 0 x = 0 ThenThen y = 2 y = 2 * * x + 1 x + 1 ElseElse y = 1 y = 1 MsgBox y: & y MsgBox y: & yEnd SubEnd Subyxxxxxxxsincos231030 T x yT z 为最小数T 使得 x yFFF x yzx y x 与 y 交换y z y 与 z 交换x y x 与 y 交换 If xy Then t=x: x=y: y=t . 例:例:计算累加程序计算累加程序 S=1+2+3+4.+x,S=1+2+3+4.+x,并输出结果。并输出结果。例:计算累乘程序例:计算累乘程序 S=1S=1* *2 2* *3 3* *4X4X 4) 1(3213Int 表 达 式 列 表 1 F T F T E x it D o 语 句 块 语 句 块 E x it D o 语 句 块 语 句 块 表 达 式 列 表 1 图
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 英语演讲稿题目
- 请给自己设计一份英语寒假一天的时间计划表
- 红楼梦人物介绍大全
- 高二文科班政治哲学周考卷(五)
- 1 例胸壁完全植入式输液港针头滑脱致长春瑞滨药物外渗患者
- 部编版道德与法治二年级上册第6课《班级生活有规则》教学课件
- 江西省南昌市重点中学2021-2022学年高考考前提分物理仿真卷含解析
- 苏教版四年级下册数学分课时练习作业
- 江西省吉安市新干中学2021-2022学年高三六校第一次联考物理试卷含解析
- 新苏教版五年级数学下册教案(二)
- 《趣味语文》PPT课件(优秀)
- 水泥混凝土拌和楼的计量标定
- ppt精选模板:热烈欢迎领导莅临指导工作PPT课件
- 霍兰德自我探索量表
- 各电压等级供电半径要求
- 金属间化合物要点
- 小小牙医讲座
- 环境工程原理知识点总结
- 热水系统温降设计计算
- THETDD-1型电工电子技术实训装置实训指导书电工部分
- 无火回送提示卡
评论
0/150
提交评论