欢迎来到天天文库
浏览记录
ID:46949804
大小:648.00 KB
页数:11页
时间:2019-12-01
《《VB中的IF语句》PPT课件》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、VB编程授课对象:高一学生授课人:黄小君VB中的选择语句——IF语句用来解决有关选择结构的问题。选择结构单分支结构双分支结构嵌套分支结构If条件Then语句AEndIfIf条件Then语句AElse语句BEndIf(本节课的重点)选择结构与选择语句If条件Then语句AEndIfIf条件Then语句AElse语句BEndIfIf和endif要成对出现是否为真?语句块单分支结构退出是否退出为真?PrivateSubCommand1_Click()IfMsgBox("你真的要退出吗?",vbOKCancel,"退出")=vbOKThenEndEndIf
2、EndSub流程图单分支结构你赢了是否电脑出剪刀,你出石头PrivateSubOption1_Click()DimcAsString,dAsString,eAsStringDimaAsIntegerc=App.Path&"/1.jpg"d=App.Path&"/2.jpg"e=App.Path&"/3.jpg"a=Int((3*Rnd)+1)Picture1(1).Picture=LoadPicture(App.Path&""&a&".jpg")流程图调取图片的路径电脑随机出数(1,2,3)显示电脑所出的图片‘石头用数字“1”表示,剪刀用“2”表
3、示,布用“3”表示单分支结构Picture1(0).Picture=LoadPicture(c)Ifc=App.Path&"/1.jpg"Anda=2ThenLabel4.Caption="赢了"EndIfIfc=App.Path&"/1.jpg"Anda=3ThenLabel4.Caption="输了"EndIfIfc=App.Path&"/1.jpg"Anda=1ThenLabel4.Caption="打平"EndIfEndSub电脑出剪刀,你出石头电脑出布,你出石头电脑出石头,你出石头‘石头用数字“1”表示,剪刀用“2”表示,布用“3”表示计
4、算机编程解决问题的过程分析问题设计算法编写程序调试运行检测结果选择结构单分支结构双分支结构嵌套分支结构if条件then语句Aendifif条件then语句Aelse语句Bendif小结计算机编程解决问题的过程:分析问题,设计算法,编写程序,调试运行,检测结果课后作业将“石头剪刀布”这个小游戏补充完整,要求用VB的IF条件句来实现。Thankyou!
此文档下载收益归作者所有