案例:ASP.NET案例     状态:不可编辑再运行    进入竖版
 运行结果 
x
 
1
2
<script  runat="server">
3
Sub submit(sender As Object, e As EventArgs)
4
dim i,j
5
table1.BGColor="yellow"
6
table1.BorderColor="red"
7
for i=0 To table1.Rows.Count-1
8
   for j=0 To table1.Rows(i).Cells.Count-1
9
     table1.Rows(i).Cells(j).InnerHtml="Row " & i
10
   next
11
next
12
End Sub
13
</script>
14
15
<html>
16
<body>
17
18
<form runat="server">
19
<table id="table1" border="1" runat="server">
20
   <tr>
21
     <td>Cell 1</td>
22
     <td>Cell 2</td>
23
   </tr>
24
   <tr>
25
     <td>Cell 3</td>
26
     <td>Cell 4</td>
27
   </tr>
28
</table>
29
<br />
30
<input type="button" value="改变内容" OnServerClick="submit" runat="server"/>
31
</form>
32
33
</body>
34
</html>
35