1、 在桌面上，鼠标双击，打开VB编程软件，在左边工具栏上，单击【DriveListBox】按钮，在Form1窗口上绘制出一硬盘驱动器的控件来，如下图所示。
2、 接着，在程序左边工具栏上，单击【DirListBox】按钮，在Form1窗口上绘制出一文件目录的控件来。单击【FileListBox】按钮，在Form1窗口上绘制出一显示文件的控件来，如下图所示。
3、 然后，在程序左边工具栏上，单击【PictureBox】按钮，在Form1窗口上绘制出如图所示大小的图片控件框来。用它来加载图片，如下图所示。
4、 接着，在程序左边工具栏上，单击【Label】按钮，在Form1窗口上绘制出一个标签，并在其Caption属性值上修改为：浏览重武器图片，如下图所示。
5、然后，在窗口做好后，就要在代码窗口中输入代码了，如下：
Private Sub Dir1_Change()
Form1.File1.Path = Form1.Dir1.Path
End Sub
Private Sub Drive1_Change()
Form1.Dir1.Path = Form1.Drive1.Drive
End Sub
Private Sub File1_Click()
Form1.Picture1.Picture = LoadPicture(Form1.File1.Path + "\" + Form1.File1.FileName)
End Sub
此三个过程表示驱动器、文件夹选择的改变，单击文件加载到图片框中。
如下图所示。
6、 最后，在代码输入好后，单击【运行】按钮，效果就可以看到了，可以在本地进行图片的选择和浏览了，这里选取了浏览重武器图片来进行测试，如下图所示。
