如何用VB做武器商店

在日常生活和工作中，会经常玩游戏，在网络游戏的时候，游戏人物主角都可以到商店里买武器，在VB中也可以做出这样的武器商店游戏窗口，选择不同的武器，每个武器的价值不同。如何做呢，参考以下几个步骤就可以做一个简单的武器商店窗口了。

工具/原料

1
在桌面上，双击程序，打开VB编程软件，在左边工具栏上，单击【Image】按钮，在Form1窗口上绘制出如图所示的大小，在其Picture属性值中，加载一副武器图，如下图所示。
2
接着，选取了一张有两把手枪的图，然后在左边工具栏上，单击【Label】按钮，在Form1窗口上绘制标签，并将其Caption改名为武器商店，如下图所示。
3
然后，在左边程序的工具栏上，单击【ListBox】按钮，在Form1窗口上绘制出列表框，并将其List属性里加入数据，如图所示，这里你也可以根据自己的喜好自己写，如下图所示。
4
接着，在左边程序的工具栏上，单击【Label】按钮，在Form1窗口上绘制出两个标签，一个是武器价格，另一个其Caption属性值清空，表示刚开没有价格，如下图所示。
5
然后，在窗口做好后，就要在代码窗口中输入代码了，如下：
Private Sub List1_Click()
Select Case List1.ListIndex
Case 0
Label3.Caption = "400元"
Case 1
Label3.Caption = "800元"
Case 2
Label3.Caption = "1600元"
Case 3
Label3.Caption = "3000元"
End Select
End Sub
这是选择开关语句，项目多其分支也跟着多，如下图所示。
6
最后，在代码输入好后，鼠标左键单击【运行】按钮，效果如图所示，可以在武器列表中选择不同的武器，其价格就会不一样。这样，简单的武器商店就做好了，如下图所示。