Calculation of Compound Interest

Public Class Form1
    Dim p, r, t, am, ci As Single

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        p = TextBox1.Text
        r = TextBox2.Text
        t = TextBox3.Text
        am = p * ((1 + (r / 100)) ^ t)
        ci = am - p
        TextBox4.Text = am
        TextBox5.Text = ci

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class