<%@ Page Language="VB" %>
<script runat="server">

    ' Insert page code here
    '

    Sub Button1_Click(sender As Object, e As EventArgs)
    
    if lblLicht1.forecolor.equals (System.Drawing.Color.Green)
            lblLicht1.forecolor = System.Drawing.Color.black
            lblLicht2.forecolor = System.Drawing.Color.orange
            lblLicht3.forecolor = System.Drawing.Color.black

    else if lblLicht2.forecolor.equals (System.Drawing.Color.orange)
            lblLicht1.forecolor = System.Drawing.Color.black
            lblLicht2.forecolor = System.Drawing.Color.black
            lblLicht3.forecolor = System.Drawing.Color.red

    else  lblLicht3.equals (System.Drawing.Color.red)
            lblLicht1.forecolor = System.Drawing.Color.Green
            lblLicht2.forecolor = System.Drawing.Color.black
            lblLicht3.forecolor = System.Drawing.Color.black
    end if


    End Sub

</script>
<html>
<head>
</head>
<body>
    <form runat="server">
        <p>
            <asp:Label id="lblLicht1" runat="server" font-size="Large" forecolor="Green" font-names="Arial Black"> O </asp:Label>
            <asp:Label id="lblLicht2" runat="server" font-size="Large" forecolor="black" font-names="Arial Black"> O </asp:Label>
            <asp:Label id="lblLicht3" runat="server" font-size="Large" forecolor="black" font-names="Arial Black"> O </asp:Label>
        </p>
        <p>
            <asp:Button id="Button1" onclick="Button1_Click" runat="server" Text="Verander kleur"></asp:Button>
        </p>
        <!-- Insert content here -->
    </form>
</body>
</html>
