or



If e.Column.Name = "colResult" Then If e.Row.RowInfo.Index > -1 Then Dim dataItem As GetLastTestResultResult = DirectCast(e.Row.RowInfo.DataBoundItem, GetLastTestResultResult) Dim term? As Integer = dataItem.TCountIf term.HasValue AndAlso term > 0 Then Dim elem As New CustomDropdownCellElement(e.Column, e.Row) elem.SetComboboxValue(CInt(dataItem.Result)) e.CellType = GetType(CustomDropdownCellElement) e.CellElement = elemend ifend ifend if

