Jobs
Author: Chirantan Bhattacharjee Date Submitted: 4/11/2006 Category: Forms Compatibility: VB 6 This code has been accessed 7721 times.
Email Yourself this snippet:
Included in the code
Code
Private Sub Form_Load() Me.ImageCombo1.ImageList = ImageList1 Me.ImageCombo1.Text = "VBCODES" Me.ImageCombo1.ImageList = ImageList1 Me.ImageCombo1.ComboItems.Add 1, , "VBCODES", 1 Me.ImageCombo1.ComboItems.Add 2, , "VB.NETCODES", 2 Me.ImageCombo1.ComboItems.Add 3, , "ASPCODES", 3 Me.ImageCombo1.ComboItems.Add 4, , "ASP.NETCODES", 4 Me.ImageCombo1.ComboItems.Add 5, , "XMLCODES", 5 Me.ImageCombo1.ComboItems.Add 6, , "C#CODES", 6 'Me.ImageCombo1.ComboItems.Add.Image = ImageList1.ListImages.Item.Index End Sub 'make sure all the controls are taken in the form. 'Please reply how you like our service 'Please reply to monty_cb@sify.com
