Dim ts1 As New DataGridTableStyle
ts1.MappingName = datagrid.DataMember
datagrid.TableStyles.Add(ts1)
'隐藏某列，可以设其宽度为0，例子为隐藏第一列
grdResults.TableStyles(0).GridColumnStyles(0).Width = 0
'删除某列,例子为删除第一列
grdResults.TableStyles(0).GridColumnStyles.RemoveAt(0)