一種方式是直接Write出來,但這樣會頂置....
且這種方法不會產生在form中,
如果使用第二種元件新增的方式就可以產生在form中,
'第一種方式
Page.Response.Write("<table>")
Page.Response.Write("<tr>")
Page.Response.Write("<td>左上</td><td>右上</td>")
Page.Response.Write("</tr>")
Page.Response.Write("<tr>")
Page.Response.Write("<td>左下</td><td>右下</td>")
Page.Response.Write("</tr>")
Page.Response.Write("</table>")
'第二種方式 (會在form中)
Dim pTable As New Table
Me.Form.Controls.Add(pTable)
Dim pRow_1 As New TableRow
pTable.Rows.Add(pRow_1)
Dim pCell_1 As New TableCell
pCell_1.Text = "左上"
pRow_1.Cells.Add(pCell_1)
Dim pCell_2 As New TableCell
pCell_2.Text = "右上"
pRow_1.Cells.Add(pCell_2)
Dim pRow_2 As New TableRow
pTable.Rows.Add(pRow_2)
Dim pCell_3 As New TableCell
pCell_3.Text = "左下"
pRow_2.Cells.Add(pCell_3)
Dim pCell_4 As New TableCell
pCell_4.Text = "右下"
pRow_2.Cells.Add(pCell_4)
~Shael
留言列表