• Home
 · 
• Math/Dates
 · 
• Real Estate Commission Finder. Enter the selling price of a house and find out how much commission

Real Estate Commission Finder. Enter the selling price of a house and find out how much commission

Real Estate Commission Finder. Enter the selling price of a house and find out how much commission the real estate agent is getting.

Rate Real Estate Commission Finder. Enter the selling price of a house and find out how much commission

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

'displays the 3% commission if you're the listing
'agent but not the selling agent.
Txt2.Text = (Txt1.Text * 0.03)
Txt1.SetFocus
End Sub

Private Sub cmd_re2_Click()
'displays the 6% commission if you're the listing
'agent and the selling agent. (double bubble)
Txt3.Text = (Txt1.Text * 0.06)
Txt1.SetFocus
End Sub

Private Sub cmd_re3_Click()
'displays tdhe difference from 6%-3%
Txt4.Text = Val(Txt3.Text - Txt2.Text)
Txt1.SetFocus
End Sub

Private Sub cmd_re4_Click()
'yes. i actually made this. displays when last accessed.
MsgBox "Created by Prince Valiant. Copyright 2000. Last accessed at " & Time & Date
'displays timer
MsgBox Timer & " seconds left in the day."
End Sub