刚写的一个合并纵向相同的行,常用

最新推荐文章于 2024-01-04 00:04:58 发布

原创最新推荐文章于 2024-01-04 00:04:58 发布 · 1.5k 阅读

0 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#javascript

收录于

javascript技术专栏收录该内容

9 篇文章

订阅专栏

本文介绍了一段VBScript代码，该代码用于将二维数组中的数据渲染到HTML表格中，并通过JavaScript实现特定单元格的行跨度调整。代码展示了如何根据不同条件使用Response.Write输出HTML和JavaScript，以实现动态表格布局。

Dim floatxishu
For i = 0 to ubound(arr_xishu,2)
        Response.Write " <tr>" & vbCrLf
        If floatxishu <> CDbl(arr_xishu(0,i)) Then
                floatxishu = CDbl(arr_xishu(0,i))
                Response.Write "    <td id='a"&arr_xishu(0,i)&"' align=""center"">"&arr_xishu(0,i)&"</td>" & vbCrLf
        Else
                Response.Write "<script language=javascript>" & vbCrLf
                Response.Write "a"& arr_xishu(0,i) &".rowSpan=a"& arr_xishu(0,i) &".rowSpan+1;" & vbCrLf
                Response.Write "</script>" & vbCrLf
        End If
        Response.Write "    <td>"&arr_xishu(1,i)&"</td>" & vbCrLf
        Response.Write "    <td>"&arr_xishu(2,i)&"</td>" & vbCrLf
        Response.Write " </tr>" & vbCrLf
Next