タイトル : Re^20: モードレスの終了 投稿日 : 2009/02/07(Sat) 09:47 投稿者 : 金本
その後の経過です。 Private Sub Form2_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Activated If commontable.form1state = Module1.State.reactivated Then TextBox2.Text = "abcd" TextBox2.Focus() Else TextBox2.Text = "" TextBox1.Focus() End If Application.DoEvents commontable.form1state = Module1.State.activated End Sub という風に、TextBox2に文字"abcd"を入れる処理を追加してみましたら それは動きます、が、フォーカスだけされませんでした。 不思議です、また経過を報告します。 |