You can play around with this...
Private Sub FormatDataGridX(dgv as DataGridView)
For i As Integer = 0 To dgv.Columns.Count - 1
Select Case dgv.Columns(i).HeaderText
Case "Id"
dgv.Columns(i).Visible = False
Case "Comments"
dgv.Columns(i).Visible = False
Case "...."
....
End Select
Next
End Sub