タイトル : 大変ありがとうございます。だけど不思議。。。 投稿日 : 2005/04/27(Wed) 11:11 投稿者 : はせどん
[OSのVer]:Windows [VBのVer]:VB.NET > Me.DialogResult = DialogResult.None > …かな? 大変早いレスポンスありがとうございます。 下記のように変更したところCLOSEしなくなりました。 多少違和感(Cancel処理でないところが)を感じますが実現できました。 しかし、一度Me.DialogResult = DialogResult.Noneをセットした後に、 Me.DialogResult = DialogResult.Okをしなくても親PGでOkが取得できるのはなぜでしょうか? DialogResult.NoneはCancel処理であるが、以前のDialogResult.Okを覚えているということでしょうか ? Private Sub cmdOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdOk.Click If MessageBox.Show("Closeしますか?", "Which", MessageBoxButtons. OKCancel, MessageBoxIcon.Exclamation) = DialogResult.OK Then 'Me.DialogResult = DialogResult.OK Me.Close() Else ' Closeしたくないのに勝手にClose処理がされてしまう。 Me.DialogResult = DialogResult.None ← 追加 End If End Sub |