Partial Class IfStatements3
    Inherits System.Web.UI.Page

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        'get input from user and store in variable
        Dim Cost As Decimal = input.Text

        'instantiate a string
        Dim Message As String = "BUG IN PROGRAM!! THIS STATEMENT SHOULD NOT DISPLAY!"

        'multiple if-else statements
        If (Cost < 0.0) Then
            Message = "They paid you - were you in an experiment!?"
        ElseIf (Cost = 0.0) Then
            Message = "Free is good!"
        ElseIf ((Cost < 1.0) And (Cost > 0.0)) Then
            Message = "Wow! Sooooo cheap!"
        ElseIf ((Cost < 2.0) And (Cost >= 1.0)) Then
            Message = "That is the regular price."
        ElseIf ((Cost < 3.0) And (Cost >= 2.0)) Then
            Message = "Was that a super-duper deluxe spam musubi?"
        Else
            Message = "You got ripped off!"
        End If

        'send message back to user
        output.Text = Message

    End Sub
End Class