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
for example, the plaza that i was about to click on (in the pic)
it is in combobox1, it is plaza, and its starting price is 1000000 dollars.
it has a starting price, but depending on how many somebody already owns it has a current price. you can find out the current price by plugging what you know into the equation:
newPrice = (current) + (toBuy) * (0.1 * startPrice)
you then plug the rest of these into some more code(not shown yet) to get the hours to save up.
my question is, how do i make an array that has the name and starting price associated with the combobox1.
so when i click the plaza it plugs the startPrice into the equation and it plugs the name into the msgbox output string.
please help, ive been struggling with this for a couple weeks now.