Form1側
Dim AA As New UCNT1.UserControl1(Me)
としてＡＡに自分のインスタンスを送ります。
UserControl1側
Private F1 As Form1
Private Sub New(ByVal _F1 As Form1)
' この呼び出しは、Windows フォーム デザイナで必要です。
InitializeComponent()
' InitializeComponent() 呼び出しの後で初期化を追加します。
F1 = _F1
End Sub
