投稿日 | : 2003/07/02(Wed) 19:18 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: MSHFlexGridの固定行座標の取得 |
> Private Sub MSHFlexGrid1_Click()
> If MSHFlexGrid1.Row > 0 Then '←必ずここでMSHFlexGrid1.Rowが
> Exit Sub '1以上の値を返してしまうのです。(悲)
> End If
>
> MSHFlexGrid1.Sort = 1 '昇順ソート
> End Sub
下記ではどうですか?
Private Sub MSHFlexGrid1_Click()
If MSHFlexGrid1.MouseRow > 0 Then '←必ずここでMSHFlexGrid1.Rowが
Exit Sub '1以上の値を返してしまうのです。(悲)
End If
MSHFlexGrid1.Sort = 1 '昇順ソート
End Sub