Code: Select all
Private Sub MSFlexGrid1_Click()
With Me.MSFlexGrid1
COLONNA = .Col
RIGA = .Row
.TextMatrix(RIGA, COLONNA) = "1 "
.CellAlignment = flexAlignCenterCenter
Set .CellPicture = LoadPicture(App.Path & "\IMG\" & "OMBRELLONE_ROSSO.jpg")
Me.LCOLONNA.Caption = COLONNA
Me.LRIGA.Caption = RIGA
End With
End Sub
for example 1 icon
is this correct?
and instead to call the icon from dir i just have in imagelist with index =1, how tom use imagelist?