ASP.NET HtmlTable 控件

ASP.NET HtmlTable 控件

定义和用法

HtmlSelect 控件用于控制 <select> 元素。在 HTML 中，<select> 元素用于创建下拉列表。

属性

属性	描述
Align	规定此表格的对齐方式。
Attributes	返回该元素的所有属性名称和值对。
BGColor	规定表格的背景颜色。
Border	规定边框的宽度。提示：设置 border="0" 可显示不带边框的表格。
BorderColor	规定边框的颜色。
CellPadding	规定单元格边框与内容之间的空白。
CellSpacing	规定单元格之间的空白。
Disabled	布尔值，指示是否禁用该控件。默认是 false。
Height	规定表格的高度。
id	控件的唯一 id。
InnerHtml	设置或返回该 HTML 元素的开始标签和结束标签之间的内容。特殊字符不会被自动转换为 HTML 实体。
InnerText	设置或返回该 HTML 元素的开始标签和结束标签之间的所有文本。特殊字符会被自动转换为 HTML 实体。
Rows	返回表示表格中所有行的 HtmlRowCollection 对象。
runat	规定该控件是一个服务器控件。必须被设置为 "server"。
Style	设置或返回被应用到该控件的 CSS 属性。
TagName	返回元素的标签名。
Visible	布尔值，指示该控件是否可见。
Width	规定表格的宽度。

实例

HTMLTable

在本例中,我们在 .aspx 文件中声明了两个 HtmlSelect 控件,一个 HtmlInputButton 控件,以及一个 HtmlTable 控件。用户可选择单元和行的数目。当提交按钮被触发时，会执行 submit 子例程。submit 子例程会根据用户的输入来生成表格。

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
Dim row,numrows,numcells,j,i
row=0
numrows=cint(rows1.Value)
numcells=cint(cells1.Value)
for j=1 to numrows
   Dim r As New HtmlTableRow()
   row=row+1
   for i=1 to numcells
     Dim c As New HtmlTableCell()
     c.Controls.Add(New LiteralControl("row " & j & ", cell " & i))
     r.Cells.Add(c)
   next
   t1.Rows.Add(r)
   t1.Visible=true
next
End Sub
</script>
<html>
<body>
<form runat="server">
<p>表格行：
<select id="rows1" runat="server">
   <option value="1">1</option>
   <option value="2">2</option>
   <option value="3">3</option>
</select>
<br />表格列：
<select id="cells1" runat="server">
   <option value="1">1</option>
   <option value="2">2</option>
   <option value="3">3</option>
</select>
<br /><br />
<input type="submit" value="显示表格" runat="server" OnServerClick="submit">
</p>
<table id="t1" border="1" runat="server" visible="false"/>
</form>
</body>
</html>

HTMLTable 2

在本例中，我们在 .aspx 文件中声明了一个 HtmlTable 控件以及一个 HtmlInputButton 控件。当触发提交按钮时，会执行 submit 子例程。submit 子例程会修改表格的背景颜色和边框颜色，它也会修改单元格的内容。

<script  runat="server">
Sub submit(sender As Object, e As EventArgs)
dim i,j
table1.BGColor="yellow"
table1.BorderColor="red"
for i=0 To table1.Rows.Count-1
   for j=0 To table1.Rows(i).Cells.Count-1
     table1.Rows(i).Cells(j).InnerHtml="Row " & i
   next
next
End Sub
</script>
<html>
<body>
<form runat="server">
<table id="table1" border="1" runat="server">
   <tr>
     <td>Cell 1</td>
     <td>Cell 2</td>
   </tr>
   <tr>
     <td>Cell 3</td>
     <td>Cell 4</td>
   </tr>
</table>
<br />
<input type="button" value="改变内容" OnServerClick="submit" runat="server"/>
</form>
</body>
</html>