Visual Basic

Open the Shipping Solution (Shipping Solution.sln) file contained in the VB2015\ Chap09\Shipping Solution-Two-Dimensional folder. The btnDisplay_Click procedure should display a shipping charge that is based on the number of items a customer orders. The order amounts and shipping charges are listed in Figure 9-57. Store the minimum order amounts and shipping charges in a two-dimensional array. Display the appropriate shipping charge with a dollar sign and two decimal places. Test the application appropriately.

This is what i have how do i make it two dim array.

Public Class frmMain Private Sub btnExit_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnExit.Click Me.Close() End Sub Private Sub txtPoints_Enter(ByVal sender As Object, ByVal e As EventArgs) Handles txtPoints.Enter txtPoints.SelectAll() End Sub Private Sub txtPoints_KeyPress(ByVal sender As Object, ByVal e As KeyPressEventArgs) Handles txtPoints.KeyPress ' accepts only numbers and the Backspace key If (e.KeyChar "9") AndAlso e.KeyChar ControlChars.Back Then e.Handled = True End If End Sub Private Sub txtPoints_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles txtPoints.TextChanged lblGrade.Text = String.Empty End Sub Private Sub btnDisplay_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDisplay.Click

' Display the letter grade associated with a students total points earned.

Dim intGrade As Integer Dim searchForPoints As Integer

Dim intPoints() As Integer = {450, 400, 350, 300, 0}

Dim strGrades() As String = {"A", "B", "C", "D", "F"}

' Assign a letter grade to a variable.

searchForPoints = Integer.Parse(txtPoints.Text)

For intGrade = 0 To 4

If searchForPoints

lblGrade.Text = strGrades(intGrade + 1)

ElseIf searchForPoints = intPoints(intGrade) Or searchForPoints

lblGrade.Text = strGrades(intGrade)

ElseIf searchForPoints > 450 Then

searchForPoints = intPoints(intGrade)

lblGrade.Text = strGrades(intGrade)

End If

Next

End Sub

End Class

Minimum points Maximum points Grade 299 300 349 414 350 415 464 500 465 Minimum points Maximum points Grade 299 300 349 414 350 415 464 500 465