大家好,今天小编关注到一个比较有意思的话题,就是关于vb设计猜价格游戏的问题,于是小编就整理了3个相关介绍vb设计猜价格游戏的解答,让我们一起看看吧。
你想编什么只要你够技术都能编出来。visual basic 确实很强大,但已经落后了,编游戏有很大难度。但是编一些计算器、ie浏览器、音乐播放器、简单的文字处理软件(类似word)等小东西还是可以的,而且简单易学(只要你懂英语,vb语法就不难学了)。至于游戏,就很难。现在都用c了,谁还用vb呢?
目前vb已经没有了商业价值,只是一些电脑爱好者还使用着罢了!
VB做游戏用DirectX是首选了,DirectX的体系很庞大,几乎Windows平台下的游戏都是基于DirectX开发的。 可以说开发游戏DirectX必学,推荐先看以下《Windows游戏开发大师技巧》等有了2D基础再看《3D游戏编程大师技巧》
没有图 全用字代替吧! 很简单。 创键三个command按钮就行了 复制代码 '1石头 '2剪刀 '3布 Private Sub Form_Load() Command1.Caption = "石头"'改各个按钮的名字 Command2.Caption = "剪刀" Command3.Caption = "布" End Sub Private Sub Command1_Click() '石头 Dim CPU As Integer Dim a As String CPU = Int(Rnd * 3) + 1 'Rnd生成 大于0 小于1 之间的随机数 ,这里是生成1-3的随机数 If CPU = 1 Then a = "石头,平局" If CPU = 2 Then a = "剪刀,玩家赢" If CPU = 3 Then a = "布,电脑赢" MsgBox "玩家出石头,电脑出" & a End Sub Private Sub Command2_Click() '剪刀 Dim CPU As Integer Dim a As String CPU = Int(Rnd * 3) + 1 If CPU = 1 Then a = "石头,电脑赢" If CPU = 2 Then a = "剪刀,平局" If CPU = 3 Then a = "布,玩家赢" MsgBox "玩家出剪刀,电脑出" & a End Sub Private Sub Command3_Click() '布 Dim CPU As Integer Dim a As String CPU = Int(Rnd * 3) + 1 If CPU = 1 Then a = "石头,玩家赢" If CPU = 2 Then a = "剪刀,电脑赢" If CPU = 3 Then a = "布,平局" MsgBox "玩家出布,电脑出" & a End Sub
到此,以上就是小编对于vb设计猜价格游戏的问题就介绍到这了,希望介绍关于vb设计猜价格游戏的3点解答对大家有用。