投稿日 | : 2005/11/23(Wed) 15:51 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re^3: Msfelxgridでの右クリック(追記) |
失礼しました。
私の勘違いでした。
ヘルプを見る限り仕様のようですね。
ショートカットメニューを閉じるまで他のイベントが発生しないので.....。
フレームにラベルでも貼り付けて代用する位しか思いつきません。
Private Sub Label1_Click()
Frame1.Visible = False
End Sub
Private Sub MSFlexGrid1_MouseDown(Button As Integer, _
Shift As Integer, x As Single, y As Single)
Frame1.Visible = False
If Button = vbRightButton Then
Frame1.Move x + 500, y, 1800, 1000
Frame1.Visible = True
End If
End Sub
ひょっとして、APIを使えば実現できるかも知れません。
(これも難しそう)