blob: 52b7c00171424e5b7ce5ce2822856a78d288264b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
<%@ Register TagPrefix="Acme" TagName="Message" Src="userctrl2_vb.ascx" %>
<html>
<script language="VB" runat="server">
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
MyMessage.MessageText = "Message text changed!"
MyMessage.Color = "red"
End Sub
</script>
<body style="font: 10pt verdana">
<h3>A Simple User Control w/ Properties</h3>
<form runat="server">
<Acme:Message id="MyMessage" MessageText="This is a custom message!" Color="blue" runat="server"/>
<p>
<asp:button text="Change Properties" OnClick="SubmitBtn_Click" runat=server/>
</form>
</body>
</html>
|