×
[PR]上記の広告は3ヶ月以上新規記事投稿のないブログに表示されています。新しい記事を書く事で広告が消えます。
・DataGridView で小数点のある数字のソート
Private Sub Grid1_SortCompare(sender As Object, e As DataGridViewSortCompareEventArgs) Handles Grid1.SortCompare
If Grid1.Rows.Count > 0 Then
Select Case e.Column.Index
Case 5, 6
e.SortResult = Val(e.CellValue1) * 1000 - Val(e.CellValue2) * 1000
e.Handled = True
End Select
End If
Private Sub Grid1_SortCompare(sender As Object, e As DataGridViewSortCompareEventArgs) Handles Grid1.SortCompare
If Grid1.Rows.Count > 0 Then
Select Case e.Column.Index
Case 5, 6
e.SortResult = Val(e.CellValue1) * 1000 - Val(e.CellValue2) * 1000
e.Handled = True
End Select
End If
End Sub
PR