如何在VB中实现动态GridView的格式化布局

针对你图中需要实现的带动态子表头、动态行的GridView布局，可按以下方案实现：

基础配置说明 #

你原本的思路是正确的，前端仅需声明基础GridView控件，动态逻辑完全在后端实现即可，前端基础代码参考：

<asp:GridView ID="gvDynamic" runat="server" AutoGenerateColumns="False" GridLines="Both">
</asp:GridView>

关闭AutoGenerateColumns避免自动生成的列和你手动创建的动态列冲突。

后端核心实现逻辑 #

动态列生成 #

动态列的创建逻辑必须放在Page_Init事件中执行，不要放在Page_Load中，避免页面回发后动态列丢失，示例代码：

Protected Sub Page_Init(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Init
    ' 读取数据库中存储的用户自定义子表头配置
    Dim headerDt As DataTable = GetUserDefineHeader()
    
    ' 先添加固定列（如果存在非动态的左侧固定列可在此处添加，无则跳过）
    Dim fixedCol As New BoundField()
    fixedCol.DataField = "fixed_field"
    fixedCol.HeaderText = "固定列名称"
    gvDynamic.Columns.Add(fixedCol)
    
    ' 循环生成动态子表头对应的列
    For Each headerRow As DataRow In headerDt.Rows
        Dim dynamicCol As New BoundField()
        ' 绑定数据源对应的字段名，和你后续查询行数据的字段保持一致
        dynamicCol.DataField = headerRow("data_field").ToString()
        ' 显示用户自定义的子表头文本
        dynamicCol.HeaderText = headerRow("header_name").ToString()
        ' 可自定义格式：对齐方式、宽度、数字格式化规则等
        dynamicCol.ItemStyle.HorizontalAlign = HorizontalAlign.Center
        dynamicCol.DataFormatString = "{0:F2}" ' 如需保留两位小数可加此配置
        gvDynamic.Columns.Add(dynamicCol)
    Next
    
    ' 首次加载绑定数据
    If Not IsPostBack Then
        BindGridData()
    End If
End Sub

动态数据绑定 #

Private Sub BindGridData()
    ' 读取和动态列匹配的行数据，确保数据源字段和前面动态列设置的DataField一一对应
    Dim gridDataDt As DataTable = GetUserDefineGridData()
    gvDynamic.DataSource = gridDataDt
    gvDynamic.DataBind()
End Sub

扩展需求处理 #

• 如果需要实现多级嵌套子表头，可在RowDataBound事件中判断当前行是表头行时，手动合并单元格实现层级效果
• 如果动态列需要添加按钮、输入框等交互控件，将BoundField替换为TemplateField，后端实现ITemplate接口自定义模板内容即可

内容的提问来源于stack exchange，提问作者Intan Nur Shafienaz