VBでのdialog制御について

質問

OS : WindowsXP SP2
言語 : Visual Studio2005(vb.net)

お世話になっております。

ダイアログ画面の制御で質問がございます。
自作したform1をダイアログとして呼び出し、結果を
DialogResultとして返却したいと思っています。

まず現状のコードですが、ダイアログとして呼び出される
フォームを以下のように設定しています。

AcceptButton = command1
CancelButton = command2

次に以下のような形でform1を呼び出しています。

---------------------------------------------

Dim frmDlg As New form1
Dim frmResult As DialogResult

Try

' ダイアログを表示し、戻り値が [OK] の場合は戻り値を取得
frmResult = frmDlg.ShowDialog()
If frmResult = DialogResult.OK Then
Msgbox "OK"
End If

Catch ex As Exception
End Try

---------------------------------------------

これでform1のcommand1をクリックした場合は戻り値に"OK"が、
返却されているのですが、例えばリストボックスのダブルクリックなど他のイベント
が発生した場合でも戻り値にOKを返却できるような方法はあるのでしょうか？

ご存知の方いらっしゃいましたら教えて頂けませんでしょうか？

回答No.1

noname#259269 · ベストアンサー

form1 の DialogResult プロパティに対して好きなタイミングで、
OK等の値を設定できますよ。ですので、
リストボックスのダブルクリックイベント内で

Me.DialogResult = DialogResult.OK

といったコーディングをしてください。

お礼

さっそくのご返信ありがとうございます。
ご指示いただきました方法でなんと希望する処理が実行できました。
ここの値は随時指定できたのですね。
大変勉強になりました。

ありがとうございました。