[vb6] MshFlexGrid - visualizzare dati su più colonne

[stefania_baby]

Anche scrivendo così mi carica entrambe i campi nella colonna 1 come è possibile assegnare un campo ad una colonna?

MSHFlexGrid1.Cols = 4
Do While Not oGrigliaRecordset.EOF
        If Not IsNull(oGrigliaRecordset.Fields(1).Value) Then
            MSHFlexGrid1.Col = 1
            MSHFlexGrid1.AddItem oGrigliaRecordset.Fields(1).Value
        End If
        If Not IsNull(oGrigliaRecordset.Fields(2).Value) Then
            MSHFlexGrid1.Col = 2
            MSHFlexGrid1.AddItem oGrigliaRecordset.Fields(2).Value
        End If
          oGrigliaRecordset.MoveNext
Loop