Visual Basic - операторы If не отображают результат в метке

Question

Я работаю над заданием, в котором программе необходимо рассчитать и отобразить общую стоимость доставки посылки на основе веса и того, отправляется ли он в континентальную часть США, Аляску или Гавайи.Когда я нажимаю кнопку «Рассчитать», метка, которая должна отображать сумму, остается пустой.Я просмотрел это и попытался поместить вычисление в разные части / в конце операторов «Если».Вот то, что я имею до сих пор, любая помощь будет оценена:

Dim decWeight As Decimal
Dim decTotalCost As Decimal
Dim decDestination As Decimal
Dim decRate As Decimal

If IsNumeric(txtWeight.Text) Then

    decWeight = Convert.ToDecimal(txtWeight.Text)


    If decWeight <= 30 > 0 Then

        If radContinental.Checked Then
            decDestination = 1
        ElseIf radHawaii.Checked Then
            decDestination = 1.2
        ElseIf radAlaska.Checked Then
            decDestination = 1.26
        End If

        If decWeight <= 2 Then
            decRate = 3.69
        ElseIf decWeight <= 4 > 2 Then
            decRate = 4.86
        ElseIf decWeight <= 6 > 4 Then
            decRate = 5.63
        ElseIf decWeight <= 8 > 6 Then
            decRate = 5.98
        ElseIf decWeight <= 10 > 8 Then
            decRate = 6.28
        ElseIf decWeight <= 30 > 10 Then
            decRate = 15.72
        End If

        decTotalCost = decRate * decDestination
        lblTotalCost.Text = decTotalCost.ToString("C")

    ElseIf decWeight <= 0 Then
        MsgBox("Please Enter a Positive Weight.", , "Input Error")
    ElseIf decWeight > 30 Then
        MsgBox("You Have Entered " & decWeight.ToString() & ". Please Enter a Weight Under 30 Pounds", , "Input Error")
    End If


ElseIf txtWeight.Text = "" Then
    MsgBox("Please Enter the Weight", , "Input Error")

Else : MsgBox("Please Enter a Number", , "Input Error")
End If

Answer 1

Вы должны попробовать следующее утверждение if: If decWeight <= 30 и decWeight> 0 Then

Это проверит, равен ли decWeight меньше или равен 30, и удостоверится, что он 'ненулевой'. Надеюсь, это поможет: -)