タイトル | : メニューからの終了処理について |
記事No | : 6017 |
投稿日 | : 2007/08/06(Mon) 17:24 |
投稿者 | : 皐月 |
VB6.0からVB2005の移行をしています。いつもお世話になっています。
ツールのメニューエディターでから作成した終了項目をクリックすると プログラムを終了するかの選択ウィンドウがでて終了できるようにしたい と思い以下のソースをメニューがクリックされたときにコールしようと思っています。
************************************************************
Private Sub MainDisp_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
If MsgBox("ソフトを終了しますか?", MsgBoxStyle.YesNo + MsgBoxStyle.Exclamation) = MsgBoxResult.Yes Then library.PortClose() library = Nothing End Else e.Cancel = True End If
***********************************************************
コールしようとする文章は
Public Sub menu_file_end_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles menu_file_end.Click
Call MainDisp_FormClosing(Me, New System.Windows.Forms.FormClosedEventArgs) End Sub
としているのですが、コールしようとしている側の引数がおかしいらしく 上手く動いてくれません。終了確認のウィンドウがでて終了ができるのであれば 今書かれているソースにはこだわりません。 どうかご教授お願いいたします。
|