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