How do I go about getting my strValue set up to get the value of my table (arrays)
VB Code:
' Declare 4 parallel arrays for zones from this table: ' Weight Zone A Zone B Zone C Zone D ' 1 1.00 1.50 1.65 1.85 ' 3 1.58 2.00 2.40 3.05 ' 5 1.71 2.52 3.10 4.00 ' 10 2.04 3.12 4.00 5.01 ' >10 2.52 3.75 5.10 7.25 ' Calculate Click Event: ' 1. Based on weight selected get the rate associated from ' the correct parallel array ' 2. Display the results in a complete sentence in message box. Private Sub btnRate_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRate.Click Dim intRow, intColumn As Integer Dim dblArray1() As Double = {1.0, 1.58, 1.71, 2.04, 2.52} Dim dblArray2() As Single = {1.5, 2.0, 2.52, 3.12, 3.75} Dim dblArray3() As Double = {1.65, 2.4, 3.1, 4.0, 5.1} Dim dblArray4() As Double = {1.85, 3.05, 4.0, 5.01, 7.25} Dim strValue As String MessageBox.Show("The shipping rate is " & strValue, "Cost to Ship") End Sub End Class




Reply With Quote