Public Class FormHandling
    Dim thisForm As Form
 
    Public Sub FormInit(ByVal newForm)
        thisForm = newForm
    End Sub
 
    Public Sub ChangeColor()
        thisForm.BackColor = Color.Green
    End Sub
End Class

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles Button1.Click
    Formhandling.FormInit(Me)
    Formhandling.ChangeColor()
    End Sub