mshflexgrid上如何放置复选框,谢谢了!

Question

With MSHFlexGrid1
.row = 0
.Col = 0
.CellAlignment = flexAlignCenterCenter
.ColWidth(0) = 1350
.Text = "型号".row = 0
.Col = 1
 Check4.Visible = True
 Check4.Top = .Top + .CellTop
 Check4.Left = .Left + .CellLeft
 Check4.Width = .CellWidth
end with这样怎么不行了

Answer 1

Private Sub Form_Load()
Me.ScaleMode = 1
With MSHFlexGrid1
.Row = 0
.Col = 0
.CellAlignment = flexAlignCenterCenter
.ColWidth(0) = 1350
.Text = "型号".Row = 0
.Col = 1
 Check4.Top = .Top + .CellTop
 Check4.Left = .Left + .CellLeft
 Check4.Width = .CellWidth - 10
 Check4.Height = .CellHeight - 10
 Check4.ZOrder 0
 Check4.Visible = True
End With
End Sub