hello all,

been working on this assignment with the VB 2005 book for about a week now and i don't really understand where to go next. it's under lesson C exercise 3 where i have to calculate the amount of change and how many dollars, then quarters (dimes, nicks, pennies) that i have to give the customer.

i know that i need some type of if then statement but i'm not sure where to go with it and my program now is just locking up my PC. Help please.

oh and when you show me. tell me why i do it this way because it will really help me understand more.

thanx guys/gals

Public Class MainForm

    Dim TotalChange As Double

    Private Sub xButtonExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles xButtonExit.Click

    End Sub

    Private Sub xButtonClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles xButtonClear.Click
        'clear all fields and focus back to amount owed
        Me.xAmountOwedText.Text = String.Empty
        Me.xAmountPaidText.Text = String.Empty
        Me.xDollarsCalc.Text = String.Empty
        Me.xQuartCalc.Text = String.Empty
        Me.xDimeCalc.Text = String.Empty
        Me.xNickCalc.Text = String.Empty
        Me.xPennyCalc.Text = String.Empty


    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles xCalculateButton.Click
        Dim Dolla As Integer
        Dim Quart As Integer

        'calculate the total change and assign to the correct text boxes
        TotalChange = Val(Me.xAmountPaidText.Text) - Val(Me.xAmountOwedText.Text)

        Integer.TryParse(Me.xDollarsCalc.Text, Dolla)
        If Dolla >= 1 Then
            Dolla = Dolla / 1
        End If

        Integer.TryParse(Me.xQuartCalc.Text, Quart)
        If TotalChange > 0.25 Then
            Quart = Me.xDollarsCalc.Text / 0.25
        End If

        'display message, tax and name
        Me.xMessageLabel.Text = "The change owed to the customer is " & Format(TotalChange, "currency")

    End Sub
End Class