如何在VB 6.0中恢复为imagelist控件上传的图像

Question

我有一个VB 6.0应用程序,其中包含一个imagelist控件内的一些图像.我想知道这些图像存储在系统中的位置.(因为我想在另一个应用程序中使用这些图像而我在系统中没有单独的图像)所以,唯一的方法是从Visusal basic 6.0项目中获取图像.我们有类似.Net的资源文件夹吗？

请尽快告诉我.

谢谢Rupa

Answer 1

• 开始一个空项目.
• 添加引用(Ctrl + T) Microsoft Windows Common Controls 5.0 or 6.0
• 将图像列表控件复制/粘贴到 Form1
• 将图像列表控件重命名为 ImageList1

使用此代码

Dim lIdx As Long

For lIdx = 1 To ImageList1.ListImages.Count
    SavePicture ImageList1.ListImages(lIdx).Picture, "C:\TEMP\img" & lIdx & ".bmp"
Next