DOCUMENT:Q138537 20-FEB-2002 [vbwin] TITLE :HOWTO: Print the Contents of an ImageList Control to a Form PRODUCT :Microsoft Visual Basic for Windows PROD/VER::4.0 OPER/SYS: KEYWORDS:kbGrpDSVB ====================================================================== ------------------------------------------------------------------------------- The information in this article applies to: - Microsoft Visual Basic Standard Edition, 32-bit, for Windows, version 4.0 - Microsoft Visual Basic Professional Edition, 32-bit, for Windows, version 4.0 - Microsoft Visual Basic Enterprise Edition, 32-bit, for Windows, version 4.0 ------------------------------------------------------------------------------- SUMMARY ======= Visual Basic 4.0 introduces a new control called the ImageList control that holds an array of pictures or icons. Although this control is primarily used by other controls, such as the TreeView and Toolbar control, that require an image list control, it can be used to simply store pictures for your graphics methods. PaintPicture can be used with the image list control to paint a picture onto a picture box or form. The example in this article demonstrates how to use the image list control as a stand-alone image repository. MORE INFORMATION ================ Step-by-Step Example -------------------- To create a new application that prints all of the pictures in an image list control to the form, follow these steps: 1. Place a command button and image list control on a form. 2. Load the image list control with several images. 3. Add the following code to the Click event of the command button: Private Sub Command1_Click() Dim i As Integer AutoRedraw = True ScaleMode = vbPixels With ImageList1 For i = 1 To .ListImages.Count PaintPicture .ListImages(i).Picture, 0, i * .ImageHeight Next i End With End Sub 4. Run the project, and click the command button. Additional query words: kbVBp400 imagelist paintpicture listimages kbCtrl kbVBp kbDSupport kbdsd ====================================================================== Keywords : kbGrpDSVB Technology : kbVBSearch kbAudDeveloper kbVB400Search kbVB400 Version : :4.0 Issue type : kbhowto ============================================================================= THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY. Copyright Microsoft Corporation 2002.