Couple of quick questions regarding combo boxes

[UberDan]

Sorry for not spending more time searching the forum for these answers, but I'm in a bit of a rush.

Firstly, I need the following list box to a) show all four of the decimal places even if they're 0 (so it should display 0.0200, 0.0225, 0.0250 as opposed to 0.02, 0.0225, 0.025) AND I need it to display the text "Select Rate" as the first list item (and displayed when the program starts):

Private Sub LoanPaymentCalculator_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
For i As Double = 0.02 To 0.1001 Step 0.0025
With listRate
.Items.Add(i)
End With
Next
End Sub

Suggestions?

 

[UberDan]

Oh, Oh, one more thing. I have a clear button which clears all text boxes. I also want this button to put my cursor in the txtLoanAmount.text text box. Any suggestions for this?

Private Sub btnClear_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClear.Click
txtLoanAmount.Text = ""
listRate.Text = "Select Rate"
txtMonths.Text = "60"
txtTotal.Text = ""
End Sub

 

[UberDan]

Ah, you guys took too long. Figured it all out. Thanks anyways.