L'errore è qui, credo:
[I]
Dim strListaCGrid As String
strListaCGrid = ""
strListaCGrid = strListaCGrid & Trim(NumPolizza)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib9)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib15)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib10)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib11)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib12)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib13)
'Modifica Elena - Aggiunta colonne - 20030622
strListaCGrid = strListaCGrid & Chr(9) & Trim(Col29)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Lib37)
strListaCGrid = strListaCGrid & Chr(9) & Trim(Col30)
'Fine Modifica Elena - Aggiunta colonne - 20030622
MSFlexGridContratti.AddItem strListaCGrid
[I]
Le colonne da 9 sono passate a 10.. quindi chr(9)deve diventare chr(10)
Sono unaora testo
![]()