投稿日 | : 2003/07/28(Mon) 14:17 |
投稿者 | : まな |
Eメール | : |
URL | : |
タイトル | : Re^4: MSFlexGrid選択時のPopupMenu |
ロジックは、過去ログをそのまま使用しています。
下記のように、Topで宣言しても表示されませんでした。
ステップ実行を行っても処理自体入ってくるのですが表示はされません。
どうしてでしょうか?
Private Sub MSFlexGrid1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
If Button = vbRightButton Then
PopupMenu Mnu_XXXX
End If
With MSFlexGrid1
If .MouseRow < .FixedRows Then
If .MouseCol < .FixedCols Then
.Row = .FixedRows
.ColSel = .Cols - 1
End If
Else
.Row = .MouseRow
.ColSel = .Cols - 1
End If
If Button = vbLeftButton Then
g_blnMusDwn = True
End If
End With
end Sub