msflexgridのソートについて

ソートの設定で、customを設定すると、compareイベントによりカスタマイズが可能となっていたのですが、使用方法がわかりません。

どなたか教えてください

No.2 ベストアンサー 回答者： Hayashi_Trek 回答日時： 2002/05/27 23:56

＞比較するロジックはどこに記述すればいいのですか？

フレキシブルグリッドを張りつけたフォームの
コードウィンドゥでコントロール名とイベント名を選択すれば自動的に追加されます。

この回答へのお礼

ありがとうございました！
大変助かりました。

お礼日時：2002/05/28 08:23

No.1 回答者： Hayashi_Trek 回答日時： 2002/05/25 02:33

フレキシブルグリッドのCompareイベントの構文は、ヘルプより...

Private Sub object_Compare(row1 As Long, row2 As Long, cmp As Integer)

つまりフレキシブルグリッドのrow1行目とrow2行目を比較して（比較する自分で書くので自由なルール設定ができる）比較の結果をcmpに返せば良いのです。

例えば１列目と２列目の和で比較する場合
With MSFlex1
v1=CLng(.TextMatrix(row1,1))+CLng(.TextMatrix(row1,2))
v2=CLng(.TextMatrix(row2,1))+CLng(.TextMatrix(row2,2))
If v1<v2 Then
cmp = -1
ElseIF v1=v2 Then
cmp = 0
Else
cmp = 1
End If
End With
てな感じです

この回答への補足

すいません、比較するロジックはどこに記述すればいいのですか？
object_compareという関数を作る必要があるのですか？

補足日時：2002/05/27 08:28