Try this method.
Private Sub HideBlankColumns()
Dim bHasValue As Boolean
Dim sValue As String
For iCol As Integer = 0 To GridView1.ColumnCount - 1
bHasValue = False
For iRow As Integer = 0 To GridView1.RowCount - 1
sValue = (GridView1.Rows(iRow).FindControl("LableID") As Label).Text
If GridView1.Rows(iRow).Cells(iCol).Text != String.Empty && sValue != String.Empty Then
bHasValue = True
Exit For
End If
Next
'To Hide the column
If bHasValue = False Then
GridView1.Columns(iCol).Visible = False
End If
' ''To Remove the Column
''If bHasValue = False Then
'' GridView1.Columns.RemoveAt(iCol)
'' iCol -= 1
''End If
Next
End Sub