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