Dim a As Integer = 10, b As Integer = 3
        Dim result As String
        result = "a=" & a & "<br>" & _
        "b=" & b & "<br>" & _
        "a+b=" & a + b & "<br>" & _
        "a-b=" & a - b & "<br>" & _
        "a*b=" & a * b & "<br>" & _
        "a/b=" & a / b & "<br>" & _
        "a\b=" & a \ b & "<br>" & _
        "a^b=" & a ^ b & "<br>" & _
        "a&b=" & a & b & "<br>" & _
        "a Mod b=" & a Mod b & "<br>"
        result = result & "<hr>"
        result = result & "15 > 12 and 40 > 30 =" & (15 > 12 And 40 > 30) & "<br>" & _
                          "15 > 12 and 40 < 30 =" & (15 > 12 And 40 < 30) & "<br>" & _
                          "15 > 12 or 40 > 30 =" & (15 > 12 Or 40 > 30) & "<br>" & _
                          "15 > 12 xor 40 > 30 =" & (15 > 12 Xor 40 > 30) & "<br>" & _
                          "not 15 > 12 =" & (Not 15 > 12) & "<br>"
        Label1.Text = result