VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日： 2002/12/20(Fri) 14:42
投稿者： Lantern
Ｅメール：
ＵＲＬ：
タイトル： Re: ポップアップで行削除について

>フォームで作成した画面があって、それはエクセルシートのような感じなんです。
>でも今範囲を指定して、右クリックしても、ポップアップはでてきません。
Microsoft Office Web Components を使用しているのではないのですか？
使用していないとしたら何を使用していますか？（MSFlexGrid等？）

１．Microsoft Office Web Components を使用の場合
　　右クリックから行削除・挿入できますね＾＾

２．グリッド等を使用している場合（こっちかな？）
　　ポップアップの作成方法
　　・メニューエディタでメニュー作成し、表示のチェックを外す(名前を仮に"mnuPopup"とします)
　　・mnuPopupの次の段にインデントしたメニュー("mnuPopup1")を挿入します。こりは表示にチェック

　　グリッドのマウスイベント
　　Private Sub grdPopup_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
　　　　Select Case Button
            Case vbRightButton　　　　　　'右クリック
                PopupMenu mnuPopup　　　　'mnuPopup1が表示される
            Case vbLeftButton　　　　　　 '左クリック
　　　　　　　　 '
　　　　End Select
　　End Sub
　　
　　mnuPopup1のクリックイベントに行削除のコードを書く

- 関連一覧ツリー （★ をクリックするとツリー全体を一括表示します）
- 返信フォーム （この記事に返信する場合は下記フォームから投稿して下さい）

- Web Forum -