Hejsan!
Sitter å knopar lite med en Datagrid som jag hämtar in värden till från en databas. Mitt problem är att jag vill kunna sortera dessa värden i nummerordning genom att klicka på Datagrid_Headen. Har kommit fram till den här koden, men det e lite som inte blir riktigt rätt. Någon som har något förslag på vad det är som är fel?

Private Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)

Dim sortField As String
Dim sortString As String
Dim rst As New Recordset

sortField = DataGrid1.Columns(ColIndex).Caption
If InStr(rst.Sort, "Asc") Then
sortString = sortField & " Desc"
Else
sortString = sortField & " Asc"
End If
rst.Sort = sortString

End Sub


Med hopp om positivt svar// Martin

Om du har textvärden. Kommer det att sorteras fel eftersom dessa sorteras från vänster och inte från höger som tal gör.

Text:
9 är större än 100

Tal:
100 Är större än 9