Public Class Form1

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Me.Close()

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        UserControl11.principle = Convert.ToDouble(Me.TextBox1.Text)

        UserControl11.intRate = Convert.ToDouble(Me.TextBox2.Text)

        UserControl11.years = Convert.ToDouble(Me.TextBox3.Text)

        UserControl11.CalculateInterest()

        Label4.Text = Convert.ToString(UserControl11.Interest)

End Sub

End Class