投稿日 | : 2006/12/27(Wed) 21:50 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: MSFlexGridでのソートを簡単操作で!! |
下記は何をしているのでしょうか?
Private Sub MSHFlexGrid1_Click()
With MSHFlexGrid1
If .Col = 0 And .Row = 1 And .MouseRow = 0 Then
If .TextMatrix(0, 0) = "名 前 ▲" Then
.TextMatrix(0, 0) = "名 前 ▼"
.Sort = flexSortGenericAscending
Else
.TextMatrix(0, 0) = "名 前 ▲"
.Sort = flexSortGenericDescending
End If
.Row = 1
End If