Problems - Correcting Logic and Code Errors
The following sample of code contains errors. Rewrite the incorrect statements to correct all errors.
An application allows the user to enter a salary amount. The application should then calculate and display the possible bonuses based on that salary, using bonus rates of 3-6% in increments of .5%.
' displays bonus amounts using rates
' of 3% - 6% in increments of .5%
Dim dblSalary As Decimal
Dim decBonus As Decimal
TryParse(txtSalary.Text, decSalary)
lblBonus.Text = String.Empty
For decRate As Decimal = 0.03 To 0.06 Step 0.5
decBonus = decSalary + decRate
lblBonus.Text = lblBonus.Text & decRate.ToString("P1") & " " & decBonus.ToString("C2") & ControlChars.NewLine
Next decRate

Question

Problems - Correcting Logic and Code Errors 
The following sample of code contains errors. Rewrite the incorrect statements to correct all errors. 
An application allows the user to enter a salary amount. The application should then calculate and display the possible bonuses based on that salary, using bonus rates of 3-6% in increments of .5%. 
' displays bonus amounts using rates 
' of 3% - 6% in increments of .5% 
Dim dblSalary As Decimal 
Dim decBonus As Decimal 
TryParse(txtSalary.Text, decSalary) 
lblBonus.Text = String.Empty 
For decRate As Decimal = 0.03 To 0.06 Step 0.5 
decBonus = decSalary + decRate 
lblBonus.Text = lblBonus.Text & decRate.ToString("P1") & " " & decBonus.ToString("C2") & ControlChars.NewLine 
Next decRate

Quizplus · Accepted Answer

The Answer of Problems - Correcting Logic and Code Errors 
The following sample of code contains errors. Rewrite the incorrect statements to correct all errors. 
An application allows the user to enter a salary amount. The application should then calculate and display the possible bonuses based on that salary, using bonus rates of 3-6% in increments of .5%. 
' displays bonus amounts using rates 
' of 3% - 6% in increments of .5% 
Dim dblSalary As Decimal 
Dim decBonus As Decimal 
TryParse(txtSalary.Text, decSalary) 
lblBonus.Text = String.Empty 
For decRate As Decimal = 0.03 To 0.06 Step 0.5 
decBonus = decSalary + decRate 
lblBonus.Text = lblBonus.Text & decRate.ToString("P1") & " " & decBonus.ToString("C2") & ControlChars.NewLine 
Next decRate