从电子图书上拷贝的代码却编译通不过——真见鬼！

<Html>
<form runat=server>
<ASP:Table Id="Table1" BorderWidth="1px" GridLines="Both"
Cellspacing="0"
Cellpadding="1"
Runat="Server" />
</form>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object,e As Eventargs)
Dim I, J As Short
For I=0 To 4
Dim Row As New TableRow
For J=0 to 3
Dim Cell As New TableCell
Cell.Text=" Column=" & J
If J=3 Then
Dim btnA As New Button
btnA.Text ="Column=3"
Cell.Controls.Add(btnA)
End If
Row.Cells.Add(Cell)
Next
Table1.Rows.Add(Row)
Next
End Sub
</Script>
</Html>