Ciao a tutti ,
Vi ringrazio gia per l aiuto che mi darete:
Problema:
Nella mia Mshflexgrid, vorrei che, al momento in cui scrive la colonna della data, (nel mio caso, sql server 2005 (english version), la scrive nel formato americano, ovvero 2005-10-10 00:00:00, vorrei dirgli di formattarla cosi (10/10/2005)
La mia routine dove setto le colonne della mshflexgrid è:
codice:
Dim InnerLoopCount As Long, x As Long
Dim OuterLoopCount As Long
Dim lngLongestLen As Long
Dim sLongestString As String
Dim lngColWidth As Long
Dim szCellText As String
With grd
For OuterLoopCount = 0 To .Cols - 1
sLongestString = ""
lngLongestLen = 0
For InnerLoopCount = 0 To .Rows - 1
szCellText = .TextMatrix(InnerLoopCount, OuterLoopCount)
***********SZCELLTEXT, è la variabile in cui carica i dati da visualizzare, ed è qui che dovrei mettere una condizione, quando il campo è data scrivilo cosi.***********
If Len(szCellText) > lngLongestLen Then
lngLongestLen = Len(szCellText)
sLongestString = szCellText
End If
Next
lngColWidth = .Parent.TextWidth(sLongestString)
'add 100 for more readable spreadsheet
.ColWidth(OuterLoopCount) = lngColWidth + 200
Next
End With
Il mio PROBLEMA è che non so come dirgli e vb6 di formattarla nel formato europeo quando il campo che visualizza è data.
Dovrei fare
If ********......
Grazie a tutti in anticipo