Public Class Form1


    Private Sub TextBox1_MouseHover(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.MouseHover
        ToolTip1.SetToolTip(TextBox1, "Cash Flow")
    End Sub
    Private Sub TextBox2_MouseHover(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.MouseHover
        ToolTip1.SetToolTip(TextBox2, "Account Balance")
    End Sub


    Private Sub TextBox1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox1.MouseDown
        TextBox1.Clear()
    End Sub

    Private Sub TextBox2_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles TextBox2.MouseDown
        TextBox2.Clear()
    End Sub


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

        'these variable need to plug into an equation
        dim name as string
        Dim current As Decimal
        Dim toBuy As Integer
        Dim startPrice As Decimal
        Dim newPrice As Decimal
        Dim totalNeed As Decimal
        Dim quantity As Integer
        Dim subNeed As Decimal
        Dim account As Decimal
        Dim flow As Decimal
        Dim hours As Decimal

        'this is the equation
        newPrice = current + (toBuy) * (0.1 * startPrice)

        totalNeed = newPrice * quantity

        subNeed = totalNeed - account

        hours = subNeed / flow

        MsgBox("it will take you " & hours & " hours to save up for " & quantity & name & "'s. ")
    End Sub
End Class

        'Declare Array
        Dim properties(3, 1) As String
 
        'Set values of Array
        properties(0, 0) = "Plaza"
        properties(0, 1) = "1000000"
 
        properties(0, 0) = "Seaside Lot"
        properties(0, 1) = "1500000"
 
        properties(0, 0) = "Restaurant"
        properties(0, 1) = "3000000"
 
        'Retreive values of Array
        Dim newPrice, current, toBuy As Double
        newPrice = current + toBuy * (0.1 * properties(0, 1))