Asp.net hata

Asp.net programlamaya yeni başladım sayılır.Yaptığım bir çalışmada hata ile karşılaştım ve hatamı bulamadım arkadaşlar yardımcı olursanız sevinirim.
Hatam nerde?

 <script language="vb" runat="server">
 sub tmm(obj as object, e as eventargs)
    dim i, k, j, n(7) as integer
    n(1)= convert.toInt32(s1.text)
    n(2)= convert.toInt32(s2.text)
    n(3)= convert.toInt32(s3.text)
    n(4)= convert.toInt32(s4.text)
    n(5)= convert.toInt32(s5.text)
    n(6)= convert.toInt32(s6.text)
    n(7)= convert.toInt32(s7.text)
    for i=1 to 6
        for j=i+1 to 7
            if n(i) < n(j) then
            n(i)=k
            n(j) = n(i)
            n(j) = k
            end if
        next
    response.write(n(i) & " > ")
    next
    end sub
 </script>
 <html>
 <body>
 <form runat="server">
 <asp:textbox id="s1" runat="server" /><br>
 <asp:textbox id="s2" runat="server" /><br>
 <asp:textbox id="s3" runat="server" /><br>
 <asp:textbox id="s4" runat="server" /><br>
 <asp:textbox id="s5" runat="server" /><br>
 <asp:textbox id="s6" runat="server" /><br>
 <asp:textbox id="s7" runat="server" /><br>
 <asp:button  text="tikla" onclick="tmm" runat="server">
</form>
</body>
</html>