VB2005

フォームで発生するKeyDown,Resizeのイベントをフォームに貼り付けた
ユーザーコントロールの中で受信することはできないでしょうか。


下記をフォームでなくユーザーコントロールの中にして処理を共通化したいのです。


Private Sub Form_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
    '処理
End Sub

Private Sub Form_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
    '処理
End Sub

両方のイベントからユーザコントロールのメソッド呼べば済む話じゃないの？

> フォームで発生するKeyDown,Resizeのイベントをフォームに貼り付けた
> ユーザーコントロールの中で受信することはできないでしょうか。

WithEvents なり AddHandler なりで、親フォームのイベントを受け取れば良いかと。

Public Class UserControl1
    Private WithEvents Owner As Form
    Private Sub UserControl1_Load(……
        If DesignMode Then
            Label1.Text = "デザイン時"
        Else
            Me.Owner = Me.ParentForm
        End If
    End Sub
    Private Sub Owner_Resize(…
        'ここに記述
    End Sub
End Class

> > フォームで発生するKeyDown,Resizeのイベントをフォームに貼り付けた
> > ユーザーコントロールの中で受信することはできないでしょうか。

魔界の仮面弁士様

返事遅くなりました。

思った通りのことができました。
これでソースがすっきりしました。

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