[ツリー表示へ] [ワード検索] [Home]
タイトル ： Re: 別のフォームのコントロールのKeyPressイベントを発生させたい 投稿日 ： 2009/09/14(Mon) 18:48 投稿者 ： 魔界の仮面弁士
| > FORM2から FORM1にあるテキストボックスに 文字を送ることは出来ましたが > ENTERキーを押下する（KeyPressイベントを発生させたい） とゆう事は出来るのでしょうか その意図にもよりますが、Form2 上で ENTER 押下されたことを Form1 で受け取りたいという意味であれば、キー押下を受け取るために ≪Form1 側≫ Private WithEvents GuideForm As Form Private Sub Form_Load() 'Set GuideForm = New Form2 Set GuideForm = Form2 GuideForm.Show vbModeless, MDIForm1 End Sub Private Sub GuideForm_KeyPress(ByRef KeyAscii As Integer) 何かの処理 End Sub のようにすれば良いかと思います。 また、別に Enter 押下に拘らず、単にイベント発生時の処理を行わせたいだけであれば、 ≪Form1 側≫ Public Sub EnterKeyPressed() 何かの処理 End Sub Private Sib Form_KeyPress(ByRef KeyAscii As Integer) If KeyAscii = vbKeyReturn Then EnterKeyPressed(KeyAscii) End If End Sub のようにしておき、この EnterKeyPressed メソッドを Form2 側から呼び出すとか。 |
をクリックするとツリー全体を一括表示します） - MDI内においてフォームを常に手前に表示する - けいま 09/09/14-13:25No.14034