Dim rdg As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")Dim brdg = rdg.basecontrolbrdg.styles.Normal.Border.Color = Color.Redbrdg.styles.Normal.Border.Style = 1brdg.styles.Normal.Border.width = 5 brdg.styles.Normal.Border.Direction = 2 '0-2