dgrdtest.Columns(8).Visible = False
dgrdtest.Columns(8).Visible = true