Form Text Boxes in VBScript

Go ahead, type something. I dare you: 
<BODY>

<SCRIPT LANGUAGE="VBSCRIPT">
<!--
	Sub AlGore_onfocus
		alert "Hey! Get out of my text box!"
	End Sub
	
	Sub AlGore_onblur
		alert "Where are you going? Did I offend you?"
	End Sub
	
	Sub AlGore_onchange
		alert "You dare change my text???"
	End Sub
	
	Sub AlGore_onselect
		alert "Sure, select it if you must!"
	End Sub
-->
</SCRIPT>

<FORM NAME="Form1">Go ahead, type something. I dare you:
	<BR><INPUT TYPE=TEXT NAME="AlGore" VALUE="<<<Please type something here>>>" SIZE=50 MAXLENGTH=50>
</FORM>