Set color and font for an asp:Label (VB.net) : Label « Asp Control




<%@ Page Language="VB" %>

<script runat="server">

    Dim ColorList(6) as String

    Dim FontList as new ArrayList()

    

    Sub Page_Load

      ColorList(0) = "Red"

      ColorList(1) = "Orange"

      ColorList(2) = "Yellow"

      ColorList(3) = "Green"

      ColorList(4) = "Blue"

      ColorList(5) = "Indigo"

      ColorList(6) = "Violet"

    

      FontList.Add("Times New Roman")

      FontList.Add("Arial")

      FontList.Add("Verdana")

      FontList.Add("Comic Sans MS")

    

      If Not Page.IsPostback

        Dim ColorName as String

    

        For Each ColorName in ColorList

          ddlColorList.Items.Add(ColorName)

        Next

    

        ddlFontList.DataSource = FontList

        ddlFontList.DataBind()

    

      End If

    End Sub

    

    Sub btnSelectColor_Click(sender As Object, e As EventArgs)

      lblOutputMessage.Text = "You selected " & _

        ddlColorList.SelectedItem.Value & " text written in " & _

        ddlFontList.SelectedItem.Value

      lblOutputMessage.ForeColor = _

        System.Drawing.Color.FromName(ddlColorList.SelectedItem.Text)

      lblOutputMessage.Font.Name = _

        ddlFontList.SelectedItem.Text

    

    End Sub



</script>

<html>

<head>

</head>

<body>

    <form runat="server">

        <p>

            Select a color from the list:<asp:DropDownList id="ddlColorList" runat="server"></asp:DropDownList>

        </p>

        <p>

            Then select a font sytle from the list: 

            <asp:DropDownList id="ddlFontList" runat="server"></asp:DropDownList>

        </p>

        <p>

            &nbsp;<asp:Button id="btnSelectColor" onclick="btnSelectColor_Click" runat="server" Text="Click here!"></asp:Button>

        </p>

        <p>

            <asp:Label id="lblOutputMessage" runat="server"></asp:Label>

        </p>

    </form>

</body>

</html>
Set color and font for an asp:Label (VB.net) : Label « Asp Control « ASP.Net
