RowProperties.Value Property

using DevExpress.XtraVerticalGrid;
using DevExpress.XtraVerticalGrid.Rows;
using DevExpress.Utils;
using DevExpress.XtraEditors.Repository;

//... 

// creating a new vertical grid control 
VGridControl vGrid = new VGridControl();
vGrid.Parent = this;
vGrid.Width = 300;
vGrid.RowHeaderWidth = 170;

// creating two editor rows with the specified captions 
EditorRow row1 = new EditorRow();
row1.Properties.Caption = "Treat Warnings as Errors";
EditorRow row2 = new EditorRow();
row2.Properties.Caption = "Warning Level";

// creating a new category row and adding it to the grid 
CategoryRow category = new CategoryRow("Errors and Warnings");
vGrid.Rows.Add(category);

// adding the editor rows as childs to the category 
EditorRow[] rows = {row1, row2};
category.ChildRows.AddRange(rows);

// creating a check editor for the first editor row 
RepositoryItemCheckEdit riCheck = vGrid.RepositoryItems.Add("CheckEdit") 
  as RepositoryItemCheckEdit;
row1.Properties.RowEdit = riCheck;
// specifying the row value to be displayed by the associated check editor 
row1.Properties.Value = true;

// creating a combobox editor for the second editor row 
RepositoryItemComboBox riCombo = vGrid.RepositoryItems.Add("ComboBox") 
  as RepositoryItemComboBox;
// populating the combo box with data 
for (int i = 0; i<=4; i++){
    riCombo.Properties.Items.Add("Warning Level " + i.ToString());
}
row2.Properties.RowEdit = riCombo;
// specifying the second row's value 
row2.Properties.Value = riCombo.Properties.Items[3];

Imports DevExpress.XtraVerticalGrid
Imports DevExpress.XtraVerticalGrid.Rows
Imports DevExpress.Utils
Imports DevExpress.XtraEditors.Repository

'... 

' creating a new vertical grid control 
Dim VGrid As New VGridControl()
VGrid.Parent = Me 
VGrid.Width = 300
VGrid.RowHeaderWidth = 170

' creating two editor rows with the specified captions 
Dim Row1 As New EditorRow()
Row1.Properties.Caption = "Treat Warnings as Errors" 
Dim Row2 As New EditorRow()
Row2.Properties.Caption = "Warning Level" 

' creating a new category row and adding it to the grid 
Dim Category As New CategoryRow("Errors and Warnings")
VGrid.Rows.Add(Category)

' adding the editor rows as childs to the category 
Dim Rows() As EditorRow = {Row1, Row2}
Category.ChildRows.AddRange(Rows)

' creating a check editor for the first editor row 
Dim RICheck As RepositoryItemCheckEdit = CType(VGrid.RepositoryItems.Add("CheckEdit"), _
  RepositoryItemCheckEdit)
Row1.Properties.RowEdit = RICheck
' specifying the row value to be displayed by the associated check editor 
Row1.Properties.Value = True 

' creating a combobox editor for the second editor row 
Dim RICombo As RepositoryItemComboBox = CType(VGrid.RepositoryItems.Add("ComboBox"), _
  RepositoryItemComboBox)
' populating the combo box with data 
Dim I As Integer 
For I = 0 To 4
    RICombo.Properties.Items.Add("Warning Level " + I.ToString())
Next 
Row2.Properties.RowEdit = RICombo
' specifying the second row's value 
Row2.Properties.Value = RICombo.Properties.Items(3)