请各位大虾,看一下我的程序错在哪儿? 不能运行呀,急呀, 我刚自学asp.net
<% @ Page Language = "VB" Debug = "true" %><script runat="server">
sub page_load(sender as object,e as eventargs)
dim row as integer =0
dim rownum as integer = convert.toint32(rows.value)
dim cellnum as integer = convert.toint32(cols.value)
dim i,j as integer
for j=0 to rownum-1
dim newrow as new htmltablerow()
if row mod 2 =1 then
newrow.bgcolor = "yellow"
end if
row = row +1
for i=0 to cellnum -1
dim newcell as new htmltablecell()
newcell.controls.add(new literalcontrol("第 " & (j+1).tostring() & "行第" & (i+1).tostring() & "列 "))
newrow.cells.add(newcell)
next i
thetable.rows.add(newrow)
next j
end sub
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p align="center">
<font color="#ff0080">htmltable控件的使用</font>
</p>
<hr />
<p align="center">
动态创建表格:行数<input id="rows" style="WIDTH: 24px; HEIGHT: 21px" type="text" size="3" runat="server" /> 列数
<input id="cols" style="WIDTH: 26px; HEIGHT: 21px" type="text" size="2" runat="server" />
<input style="WIDTH: 36px; HEIGHT: 24px" type="submit" size="11" value="创建" runat="server" />
</p>
<p align="center">
<table id="thetable" style="WIDTH: 354px; HEIGHT: 154px" bordercolor="lime" cellspacing="0" cellpadding="5" runat="server">
<tbody>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
</tbody>
</table>
</p>
<!-- Insert content here -->
</form>
</body>
</html>
--------------------编程问答-------------------- 出错情况说一下,看代码费劲 --------------------编程问答-------------------- Exception Details: System.FormatException: Input string was not in a correct format.
Line 5: dim rownum as integer = convert.toint32(rows.value) '有错不知怎么回事
--------------------编程问答-------------------- rows.value确保是数字么? --------------------编程问答-------------------- 我改好了:
--------------------编程问答-------------------- 因为事件的原因,你需要点击按钮后才能创建表格,而不是在页面一加载就创建,
<%@ Page Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
sub page_load(sender as object,e as eventargs)
end sub
Protected Sub Submit1_ServerClick(ByVal sender As Object, ByVal e As System.EventArgs)
Dim row As Integer = 0
Dim rownum As Integer = Convert.ToInt32(rows.Value)
Dim cellnum As Integer = Convert.ToInt32(cols.Value)
Dim i, j As Integer
For j = 0 To rownum - 1
Dim newrow As New HtmlTableRow()
If row Mod 2 = 1 Then
newrow.BgColor = "yellow"
End If
row = row + 1
For i = 0 To cellnum - 1
Dim newcell As New HtmlTableCell()
newcell.Controls.Add(New LiteralControl("第 " & (j + 1).ToString() & "行第" & (i + 1).ToString() & "列 "))
newrow.Cells.Add(newcell)
Next i
thetable.Rows.Add(newrow)
Next j
End Sub
</script>
<html>
<head>
</head>
<body>
<form id="Form1" runat="server">
<p align="center">
<font color="#ff0080">htmltable控件的使用 </font>
</p>
<hr />
<p align="center">
动态创建表格:行数 <input id="rows" style="WIDTH: 24px; HEIGHT: 21px" type="text" size="3" runat="server" /> 列数
<input id="cols" style="WIDTH: 26px; HEIGHT: 21px" type="text" size="2" runat="server" />
<input id="Submit1" style="WIDTH: 36px; HEIGHT: 24px" type="submit" size="11" value="创建" runat="server" onserverclick="Submit1_ServerClick" />
</p>
<p align="center">
<table id="thetable" style="WIDTH: 354px; HEIGHT: 154px" bordercolor="lime" cellspacing="0" cellpadding="5" runat="server">
<tbody>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td>
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
</tbody>
</table>
</p>
<!-- Insert content here -->
</form>
</body>
</html>
那样是取不到值的 --------------------编程问答-------------------- dim rownum as integer = convert.toint32(rows.value)
dim cellnum as integer = convert.toint32(cols.value)
输入的时候要确保是数字,要不转换的时候会出错。 --------------------编程问答-------------------- 楼上的skyaspnet朋友,你改的语句:
<input id="Submit1" style="WIDTH: 36px; HEIGHT: 24px" type="submit" size="11" value="创建" runat="server" onserverclick="Submit1_ServerClick" />
在点击按钮后才能创建表格.
我要实现的是在页面加载时建表.
我上面的程序不用改,输入数据后,在点击创建按钮后也能创建表格.
不信的话,你运行一下.
补充:.NET技术 , ASP.NET