分支结构程序_第1页
分支结构程序_第2页
分支结构程序_第3页
分支结构程序_第4页
分支结构程序_第5页
已阅读5页，还剩7页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、第二册第二章分支结构程序例题一Private Sub Form_Click()guess = InputBox(请输入一个整数密码：, 密码)password = 123456If guess = password ThenPrint yes!your are winEnd IfIf guess password ThenPrint again please!End IfEnd Sub 分支结构程序例题二Dim x As Integerx = InputBox(“请你输入一个正整数, 输入一个正整数)If x 0 ThenPrint 你真聪明！ElsePrint “ 你动动脑筋啦，连什么是正整

2、数都不懂！End If条件语句的格式If 条件 thenElseEnd if说明：如果条件成立说明：如果条件成立(true)(true)，则执行语句块；，则执行语句块；否则，执行语句块；否则，执行语句块；条件的设置必须根据具体的问题而立。条件的设置必须根据具体的问题而立。条件成立条件成立语句块语句块语句块语句块条件语句的下一语句条件语句的下一语句否否是是练习写出程序的运行结果：X=1Y=2If xy then Print x,yElsePrint y,xEnd iffalse语句块语句块语句块语句块结果结果: X=2Y=2If x2 thenY=X*XEndifPrint x,y2 4分析程序

3、:true学生体验密码程序(任务一)Private Sub Form_Click()guess = InputBox(请输入一个整数密码：, 密码)password = 123456If guess = password ThenPrint yes!your are winEnd IfIf guess password ThenPrint again please!End IfEnd Sub学生(任务二)x=inputbox(“请输入一个数”,”输入一个数”)If x=0 ThenPrint “你动动脑筋！正数的绝对值是它本身Print”y=”;xElsePrint 正确，你真聪明！负数的绝对值是它的相反数Print “y=”;-xEnd If修改程序(任务三)修改程序，当r2500和R200 thenPrint “超出范围”ElseCircle(2500,2500),rEnd if学生任务(四)上机练习（p46,2,3)作业下列程序实现什么功能？写出程序的结果：x=5 y=2 if xy then x=x+yprint x,y else y=x+yprint y,x end if 小结If 条件 thenE

人人文库> 全部分类> 教育资料 > 中学教育

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论