怎样实现DataGrid的单元格合并？

Question

Sub SpanGrid()
        Dim i As Integer
        Dim j As Integer
        Dim intSpan As Integer,NowSpan As Integer = 0
        Dim strTemp As String
        For i = 0 To DGrid.Items.Count - 1
            intSpan = 1    '得到第一列（颜色）、第一行单元格中的内容。这里得到是“红色Red”。（datagrid里用了模版列）
            strTemp = CType(DGrid.Items(i).Cells(0).Controls(1), System.Web.UI.WebControls.Label).Text’循环判断。判断第一列中，和第一行相同的内容。相同做记号，intspan加一
            For j = i + 1 To DGrid.Items.Count - 1
                If String.Compare(strTemp, CType(DGrid.Items(j).Cells(1).Controls(1), System.Web.UI.WebControls.Label).Text) = 0 Then
                    intSpan += 1'利用datagrid的rowspan属性。（设置控件中单元格跨越的行数为intspan）
                    DGrid.Items(i).Cells(0).RowSpan = intSpan’把内容相同单元格隐藏
                    DGrid.Items(j).Cells(0).Visible = False
                Else
                    Exit For
                End If
            Next
            'i = j - 1 我原来的            NowSpan += intSpan  '修改后的可以节省循环次数.
            i = NowSpan - 1
        Next
    End Sub=======引用： Sub bindgrid()
        '把数据绑定到datagrid        
        ........
        SpanGrid()
End Sub

Answer 1

dgAgreeFull.Items[iAddUpTo].Cells[0].Text = dgAgreeFull.Items[iAddUpTo].Cells[1].Text.ToString().Trim();
dgAgreeFull.Items[iAddUpTo].Cells[0].ColumnSpan = 18;
dgAgreeFull.Items[iAddUpTo].Cells[0].HorizontalAlign = HorizontalAlign.Left;
dgAgreeFull.Items[iAddUpTo].Cells[0].BackColor = Color.FromArgb( 240, 228, 131 );
for( int jAddUpTo = 1; jAddUpTo < dgAgreeFull.Columns.Count; jAddUpTo ++ )
dgAgreeFull.Items[iAddUpTo].Cells[jAddUpTo].Visible = false;

Answer 2

//数据绑定
dr=myCommand.ExecuteReader(CommandBehavior.CloseConnection);
DataGrid1.DataSource=dr;
DataGrid1.DataBind();
dr.Close();
//合并单元格
DataGrid1.Items[1].Cells[2].ColumnSpan=4;
//让后边相应的单元格消失
DataGrid1.Items[1].Cells[3].Visible=false;
DataGrid1.Items[1].Cells[4].Visible=false;
DataGrid1.Items[1].Cells[5].Visible=false;

Answer 3

可以在DataGrid的ItemDataBound事件中实现：
if(e.Item.ItemType == ListItemType.Item || e.Item.ItemType == ListItemType.AlternatingItem)
{
String ContractName = DataBinder.Eval(e.Item.DataItem, "ContractName").ToString();
String ContractID = DataBinder.Eval(e.Item.DataItem, "ContractID").ToString();
e.Item.Cells[5].Text=ContractName+ContractID;
}

Answer 4

http://xml.sz.luohuedu.net/xml/ShowDetail.asp?id=0BF1E82C-A30A-4B5B-85B2-8DB339A41D37