Qualcuno sa dirmi per cortesia dove è l'errore in questo script?

----------------------------------------------------------

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

sub Page_Load(obj as object, e as eventargs)

dim objTB as TextBox

objTB.ID="tbOne"
objTB.Text="Hello there!"

Page.Controls.Add(objTB)

end sub

</script>
<html>
<head>
</head>
<body>
<form runat="server">

</form>
</body>
</html>

----------------------------------------------------

Sono alle prime armi con ASP.NET e questo codice è stato copiato pari pari dal libro in cui studio ma non capisco dove si l'errore.

C'è qualcuno che mi può aiutare? grazie ciao ciao