Распечатать msflexgrid с изображением в ячейке в VB6

Question

Как мне распечатать msflexgrid с изображением в некоторых его ячейках в VB6?

Answer 1

Я думаю, что вы должны сначала выбрать ячейку сетки, при необходимости установить выравнивание изображения ячейки, а затем загрузить изображение, используя либо LoadPicture (если вы используете путь к файлу с изображением на диске), либо предпочтительно LoadResPicture (если вы используете изображение в файле ресурсов) например

  With MSFlexGrid1
    .Row = 1
    .Col = 1
    .RowSel = 1
    .ColSel = 1
    .CellAlignment = flexAlignCenterCenter
    Set .CellPicture = LoadPicture("C:\My Pictures\Me.bmp")
    ' Alternatively:
    ' Set .CellPicture = LoadResPicture(MY_PROFILE_PIC_ID)
  End With