欢迎来到天天文库
浏览记录
ID:50029039
大小:200.51 KB
页数:16页
时间:2020-03-01
《vb中的if语句应用.ppt》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、VB中的IF语句应用——用VB编程实现锤子、剪刀、布游戏计算机解决问题和人解决问题一样需要有清晰的解题步骤。而对于计算机而言,这种解题步骤就称为算法。计算机编程解决问题的过程分析问题设计界面编写代码调试运行检测结果这个程序中人和计算机每次都有3种出牌的可能,那么如何编写程序最方便呢?(引导学生思考?)我们就把这3个图片形象的用3个数字来代替,这样就使我们的编程更容易实现。我们这样进行约定:(这个约定一定要唯一吗?)这个程序我们要用到哪些呢?随机函数Randomize‘随机函数初始化Int(3*Rnd)+1电脑随机出数(1,2,3任选其
2、一)If语句格式(一)1、单语句:if <条件>then<一条语句>必须写在同一行里2、块语句if <条件>then <多条语句>endif程序剖析实例:‘定义变量,sum表示总局数,w表示你赢的局数,d表示平局数,L表示你输的局数DimsumAsInteger,wAsInteger,dAsInteger,LAsIntegerPrivateSubImage1_Click()‘定义变量,x表示电脑出的数字,y表示你出的数字DimxAsInteger,yAsInteger‘总局数+1sum=sum+1‘随机函数初始化Random
3、ize电脑随机出数(1,2,3任选其一)x=Int(3*Rnd)+1‘我出的数字(锤子)y=1‘在左边的框架里显示出你出的图片Image4.Picture=Image1.Picture‘计算机出的和你相同Ifx=yThen‘label1显示平局Label1.Caption="平局“‘在右边的框架上显示出电脑出的图片Image5.Picture=Image1.Picture’累加平局次数d=d+1‘结束if语句EndIf'你出锤子,计算机出剪刀Ifx=2Then‘label1显示你赢了Label1.Caption=“你赢了“‘在右边的框
4、架上显示出电脑出的图片Image5.Picture=Image2.Picture’累加你赢了的次数w=w+1‘结束if语句EndIf‘你出锤子,计算机出布Ifx=3Then‘label1显示你输了Label1.Caption="你输了“‘在右边的框架上显示出电脑出的图片Image5.Picture=Image3.Picture’累加你输了的次数L=L+1‘结束if语句EndIf其他两个应该怎么编呢???小结计算机解决问题和人解决问题一样需要有清晰的解题步骤。而对于计算机而言,这种解题步骤就称为算法。计算机编程解决问题的过程分析问题设计
5、算法编写程序调试运行检测结果思考11、不用统计按钮,直接显示思考2用了三个if语句,可不可以用一个if语句就可以完成呢?
此文档下载收益归作者所有