The ability to set cell icons on-the-fly can be helpful in many cases. For instance, you uploaded your data to the grid using the FillFromRS method, and one of your columns contains image indices. They were loaded as cell values and are displayed as text, but you can turn them into cell icons using the CellDynamicIcons event:

Private Sub iGrid1_CellDynamicIcons( _
      ByVal lRow As Long, ByVal lCol As Long, ByVal vValue As Variant, _
      btImageList As Byte, iIcon As Integer, btExtraImageList As Byte, iExtraIcon As Integer)

   If lCol = 1 Then iIcon = CInt(vValue)

End Sub

Pay attention to the fact that the icon indices still remain visible as cell texts. To suppress the output of these cell icon indices, use the CellDynamicText event:

Private Sub iGrid1_CellDynamicText( _
      ByVal lRow As Long, ByVal lCol As Long, _
      ByVal vValue As Variant, sText As String)
   
   If lCol = 1 Then sText = ""

End Sub