ARTICLE

Merge Cells Columns in Row of GridView in VB.NET

Posted by Satyapriya Nayak Articles | ASP.NET using VB.NET August 19, 2011
In this article we will be able to merge gridview cells ,columns in gridview rows.
Reader Level:

In this article we will be able to merge gridview cells ,columns in gridview rows.

Here in DataBound Event of the gridview control we count total number of rows and then checking each cells value against value of same cell in previous row and then setting the RowSpan of cells.

Table structure

merge1.gif

Default.aspx code

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head runat="server">

    <title>Untitled Page</title>

</head>

<body>

    <form id="form1" runat="server">

    <div>

    <asp:GridView ID="GridView1" runat="server"

    AutoGenerateColumns="False" 

    BorderStyle="None" BorderWidth="1px" CellPadding="4" ForeColor="Black"

    Height="119px"

    OnDataBound="GridView1_DataBound1" BackColor="White">

            <Columns>

            <asp:BoundField DataField="Country"

                            HeaderText="Country"

                            SortExpression="Country" />

            <asp:BoundField DataField="State"

                            HeaderText="State"

                            SortExpression="State" />

            <asp:BoundField DataField="City"

                            HeaderText="City"

                            SortExpression="City" />

        </Columns>

            <HeaderStyle BackColor="#FF8040" />

            <EditRowStyle BackColor="#FFCC00" />

            <AlternatingRowStyle BackColor="White" ForeColor="Black" />

</asp:GridView>

    </div>

    </form>

</body>

</html>

Default.aspx.vb code

Imports System.Data

Imports System.Data.SqlClient

Partial Class _Default

    Inherits System.Web.UI.Page

    Dim strConnString As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item("ConnectionString").ToString()

    Dim con As New SqlConnection(strConnString)

    Dim str As String

    Dim com As SqlCommand

    Dim sqlda As SqlDataAdapter

    Dim ds As DataSet

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        con.Open()

        str = "select country,state,city from location order by state"

        com = New SqlCommand(str, con)

        Dim reader As SqlDataReader

        reader = com.ExecuteReader()

        GridView1.DataSource = reader

        GridView1.DataBind()

        con.Close()

    End Sub

End Class

    Protected Sub GridView1_DataBound1(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.DataBound

        For rowIndex As Integer = GridView1.Rows.Count - 2 To 0 Step -1

            Dim gviewRow As GridViewRow = GridView1.Rows(rowIndex)

            Dim gviewPreviousRow As GridViewRow = GridView1.Rows(rowIndex + 1)

            For cellCount As Integer = 0 To gviewRow.Cells.Count - 1

                If gviewRow.Cells(cellCount).Text = gviewPreviousRow.Cells(cellCount).Text Then

                    If gviewPreviousRow.Cells(cellCount).RowSpan < 2 Then

                        gviewRow.Cells(cellCount).RowSpan = 2

                    Else

                        gviewRow.Cells(cellCount).RowSpan = gviewPreviousRow.Cells(cellCount).RowSpan + 1

                    End If

                    gviewPreviousRow.Cells(cellCount).Visible = False

                End If

            Next

        Next

    End Sub  

Output

merge2.gif 

Thanks for reading

Login to add your contents and source code to this article
share this article :
post comment
 
Nevron Diagram
Become a Sponsor
PREMIUM SPONSORS
  • Finally – a virtual platform that delivers next-generation Windows Server 2008 Hyper-V virtualization technology from a managed hosting partner you can truly depend on. Visit www.maximumasp.com/max for a FREE 30 day trial. Hurry offer ends soon. Climb aboard the MaxV platform and take advantage of High Availability, Intelligent Monitoring, Recurrent Backups, and Scalability – with no hassle or hidden fees. As a managed hosting partner focused solely on Microsoft technologies since 2000, MaximumASP is uniquely qualified to provide the superior support that our business is built on. Unparalleled expertise with Microsoft technologies lead to working directly with Microsoft as first to offer IIS 7 and SQL 2008 betas in a hosted environment; partnering in the Go Live Program for Hyper-V; and product co-launches built on WS 2008 with Hyper-V technology.
    ceTE software specializes in components for dynamic PDF generation and manipulation. The DynamicPDF™ product line allows you to dynamically generate PDF documents, merge PDF documents and new content to existing PDF documents from within your applications. Visit DynamicPDF here
6 Months Free & No Setup Fees ASP.NET Hosting!
Become a Sponsor