当前位置:编程学习 > C#/ASP.NET >>

请各位大虾,看一下我的程序错在哪儿? 不能运行呀,急呀, 我刚自学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
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,