java新手代码大全 VB小游戏石头剪刀布设置代码？
VB小游戏石头剪刀布设置代码？
没有图片，用文字代替！很简单。创建三个命令按钮来复制代码“1 stone”2 scissors“3 cloth private sub form_uuLoad（）command1。Caption=“stone”“更改每个按钮命令的名称2。Caption=“剪刀”命令3。Caption=“cloth”End Sub Private Sub command1 Click（）“stone dim CPU as Integer dim a as string CPU=int（RND*3）1”RND生成大于0小于1的随机数。这是1-3的随机数。如果CPU=1，则a=“石头，画”如果CPU=2，则a=“剪刀，玩家赢”如果CPU=3，则a=“布，计算机赢”msgbox“石头，计算机出”&a End Sub Private Sub命令2uClick（）“剪刀，将CPU变暗为整数，将a变暗为字符串CPU=int（RND*3）1如果CPU=1，则a=”石头，电脑赢“如果CPU=2那么a=”剪刀，画“如果CPU=3那么a=”布，玩家赢“msgbox”，玩家给剪刀，电脑给“&a End Sub Private Sub command3”uuuClick（）”布调CPU为整数调a为字符串CPU=int（RND*3）1如果CPU=1那么a=”石头，玩家赢“如果CPU=2那么a=”剪刀，电脑赢“如果CPU=3那么a=”cloth，draw“msgbox”玩家给布，电脑给“&a end”石头、剪刀和布是孩子们经常玩的游戏，在这里赢或输。输了的人就得给对方一些东西，或者给对方一些补偿。我们的方言叫锤击。
现在，成人在宴会上玩这个游戏很常见。他们更有可能有好朋友一起玩。他们将通过敲打决定胜负。他们会和他们一起喝酒，输了的人会喝一杯或更多的酒。
版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。
