Question

vb编程 制作一个简单的图片浏览器

要求：
1、窗体上的标题为“ 图片浏览器”，固定边框。
2、窗体上有驱动列表（drive1）、目录列表框（dir1）和文件列表框（file1）三个控件，要求三个控件能够联动。
3、窗体的下半部有一个图像框image1，将它的stretch属性设置为true。
4、设置文件列表框只显示*.bmp和*.jpg类型的图片文件。
5、单击文件列表框上的图片文件名时，图片显示在图像框中。

Answer 1

上学期的作业，现在在电脑里，我把代码复制下

Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive
End Sub

Private Sub File1_Click()
image1.Picture = LoadPicture(File1.Path & "/" & File1.FileName)
End Sub

然后把file1的pattern设为*.jpg;*.bmp