G
Grenier
Able to get the imagecombo + imagelist to work when put directly on a form
with the following syntax:
Set ImageCombo1.ImageList = ImageList1.Object
ImageCombo1.ComboItems.Add , , "aaaaaa", 1
ImageCombo1.ComboItems.Add , , "bbbbbb", 2
ImageCombo1.ComboItems.Add , , "cccccc", 3
ImageCombo1.ComboItems.Add , , "dddddd", 4
ImageCombo1.SelectedItem = ImageCombo1.ComboItems(4)
But the imagecombo does'nt work when I put it on the second page of a CtlTab
control ! Also tried with the syntax:
Form_Main.CtlTab11.Pages(1).Controls("ImageCombo1").ComboItems.Add , ,
"aaaaaa", 1
with no success
As a plan B... I tried to get an image control to work with the imagelist
with no success also
Dim IL As ImageList
Set IL = ImageList1.Object
Image1.Picture = IL.ListImages(1).Picture
Need advice !
Guess it's not my day
with the following syntax:
Set ImageCombo1.ImageList = ImageList1.Object
ImageCombo1.ComboItems.Add , , "aaaaaa", 1
ImageCombo1.ComboItems.Add , , "bbbbbb", 2
ImageCombo1.ComboItems.Add , , "cccccc", 3
ImageCombo1.ComboItems.Add , , "dddddd", 4
ImageCombo1.SelectedItem = ImageCombo1.ComboItems(4)
But the imagecombo does'nt work when I put it on the second page of a CtlTab
control ! Also tried with the syntax:
Form_Main.CtlTab11.Pages(1).Controls("ImageCombo1").ComboItems.Add , ,
"aaaaaa", 1
with no success
As a plan B... I tried to get an image control to work with the imagelist
with no success also
Dim IL As ImageList
Set IL = ImageList1.Object
Image1.Picture = IL.ListImages(1).Picture
Need advice !
Guess it's not my day