<script language="vb" runat="server">
sub page_load(obj as object,e as eventargs)
try
dim objtb as textbox
objtb.id="tbone"
objtb.text="hello swords"
page.controls.add(objtb)
Catch ex As Exception
lblmessage.text =ex.Message
End Try
end sub
</script>
<html>
<body>
<form runat="server">
<asp:panel id="panel1" runat="server" />
</form><p>
<asp:label id="lblmessage" runat="server" />
</body>
</html>
sub page_load(obj as object,e as eventargs)
try
dim objtb as textbox
objtb.id="tbone"
objtb.text="hello swords"
page.controls.add(objtb)
Catch ex As Exception
lblmessage.text =ex.Message
End Try
end sub
</script>
<html>
<body>
<form runat="server">
<asp:panel id="panel1" runat="server" />
</form><p>
<asp:label id="lblmessage" runat="server" />
</body>
</html>
浙公网安备 33010602011771号