in my oppinion the easiest way would be to create an overloaded New and call it with parameter (byval caller as From)
example:
Public Sub New(ByVal caller As Form)
InitializeComponent()
Select Case caller.Name
Case "Form2"
Case "Form1"
Case Else
End Select
End Sub
and call the new form like
Dim formtest As New Form1(Me)
Reputation Points: 208
Solved Threads: 168
Practically a Master Poster
Offline 692 posts
since Jun 2009