Help Coding Visual Basic 2010

Hi guys and gals,

I am new to this forum and new to Visual Basic. I am currently taking a online class introduction to Visual Basic. The class im in is using Visual Basic 2010, I am having problems coding a button to add up 3 textboxes and placing the sum in my toalprice label. Basicly I have a "CalculatePriceButton" when clicked it should put a value in my "Totalpricelabel" of the thee textboxes. Any helpwould be appriciated thnx.. Here is the code I alread have.

ublic Class MainForum1

Private Property FontStyle1 As Drawing.Font

Private Property Italicfont As Drawing.Font

Private Property donutLabel1 As Object

Private Property baglesLabel1 As Integer

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

End Sub

Private Sub ExitButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitButton1.Click
Me.Close()

End Sub

Private Sub ColorButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ColorButton.Click
TotalPriceLabel2.BackColor = Color.Cyan

End Sub

Private Sub FontButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FontButton1.Click
BagelsLabel1.Font = Italic.font
BagelsTextBox1.Font = Italic.font
DonutsLabel1.Font = Italic.font
DonutsTextBox2.Font = Italic.font
CoffeeLabel1.Font = Italic.font
CoffeeTextBox3.Font = Italic.font
ExitButton1.Font = Italic.font
Price1.Font = Italic.font
Price2.Font = Italic.font
CalcpriceButton.Font = Italic.font
TotalPriceLabel2.Font = Italic.font
ColorButton.Font = Italic.font
FontButton1.Font = Italic.font

End Sub

Private Sub TotalPriceLabel2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TotalPriceLabel2.Click

End Sub

Private Sub BagelsTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BagelsTextBox1.TextChanged

End Sub

Private Sub BagelsLabel1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BagelsLabel1.Click

End Sub

Private Sub CalcpriceButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CalcpriceButton.Click
End Sub

End Class