gridView1.CustomColumnDisplayText += (sender, e) => {
    if (e.Column.FieldName == "UserName")
        if (e.Value == null || (string)e.Value == string.Empty)
            e.DisplayText = "User name not specified";
};

AddHandler gridView1.CustomColumnDisplayText, Sub(sender, e)
    If e.Column.FieldName = "UserName" Then
        If e.Value Is Nothing OrElse CStr(e.Value) = String.Empty Then
            e.DisplayText = "User name not specified"
        End If
    End If
End Sub

using DevExpress.Utils;
using System.Collections.Generic;
using System;

namespace DXApplication {
    public partial class Form1 : DevExpress.XtraEditors.XtraForm {
        List<DataItem> datasource;
        public Form1() {
            InitializeComponent();
            datasource = new List<DataItem>() {
                new DataItem(){ Text = "AAA", Number = 10, Date = DateTime.Now },
                new DataItem(){ Text = "BBB", Number = 20, Date = new DateTime(2024, 5, 5) },
                new DataItem(){ Text = "CCC", Number = -30, Date = new DateTime(2024, 10, 10) },
                new DataItem(){ Text = "DDD", Number = -40, Date = new DateTime(2024, 4, 4) },
            };
            gridControl1.DataSource = datasource;
            gridControl1.ForceInitialize();
            AlignCellValues();
        }
        void AlignCellValues(){
            gridView1.Columns["Text"].AppearanceCell.TextOptions.HAlignment = HorzAlignment.Center;
            gridView1.Columns["Date"].AppearanceCell.TextOptions.HAlignment = HorzAlignment.Far;
        }
    }

    public class DataItem {
        public string Text { get; set; }
        public int Number { get; set; }
        public DateTime Date { get; set; }
    }
}

Imports DevExpress.Utils
Imports System.Collections.Generic
Imports System

Namespace DXApplication
    Partial Public Class Form1
        Inherits DevExpress.XtraEditors.XtraForm

        Private datasource As List(Of DataItem)
        Public Sub New()
            InitializeComponent()
            datasource = New List(Of DataItem)() From {
                New DataItem() With {
                    .Text = "AAA",
                    .Number = 10,
                    .Date = Date.Now
                },
                New DataItem() With {
                    .Text = "BBB",
                    .Number = 20,
                    .Date = New Date(2024, 5, 5)
                },
                New DataItem() With {
                    .Text = "CCC",
                    .Number = -30,
                    .Date = New Date(2024, 10, 10)
                },
                New DataItem() With {
                    .Text = "DDD",
                    .Number = -40,
                    .Date = New Date(2024, 4, 4)
                }
            }
            gridControl1.DataSource = datasource
            gridControl1.ForceInitialize()
            AlignCellValues()
        End Sub
        Private Sub AlignCellValues()
            gridView1.Columns("Text").AppearanceCell.TextOptions.HAlignment = HorzAlignment.Center
            gridView1.Columns("Date").AppearanceCell.TextOptions.HAlignment = HorzAlignment.Far
        End Sub
    End Class

    Public Class DataItem
        Public Property Text() As String
        Public Property Number() As Integer
        Public Property Date As Date
    End Class
End Namespace

using DevExpress.Utils;

gridView.RowCellDefaultAlignment += (s, e) => {
    HorzAlignment alignment = HorzAlignment.Default;
    switch(e.RowHandle % 3) {
        case 0:
            alignment = HorzAlignment.Center;
            break;
        case 1:
            alignment = HorzAlignment.Far;
            break;
        case 2:
            alignment = HorzAlignment.Near;
            break;
    }
    e.HorzAlignment = alignment;
};

// Enable multiple selection.
gridView1.OptionsSelection.MultiSelect = true;
// Enable multiple cell selection.
gridView1.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect;

' Enable multiple selection.
gridView1.OptionsSelection.MultiSelect = True
' Enable multiple cell selection.
gridView1.OptionsSelection.MultiSelectMode = DevExpress.XtraGrid.Views.Grid.GridMultiSelectMode.CellSelect

// Create and initialize a DateEdit repository item.
RepositoryItemDateEdit riDateEdit = new RepositoryItemDateEdit() {
    Name = "repositoryItemDateEdit1"
};

/* Display an image (SVG) in the cell editor.
    * The SVG image is obtained from the SvgImageCollection.
    * The SVG image was added to the SvgImageCollection in Visual Studio at design time.
    */

riDateEdit.ContextImageOptions.SvgImage = svgImageCollection1["adateoccuring"];
riDateEdit.ContextImageOptions.SvgImageSize = new System.Drawing.Size(16, 16);
riDateEdit.ContextImageOptions.Alignment = DevExpress.XtraEditors.ContextImageAlignment.Far;

// Add the repository item (cell editor) to the grid control's RepositoryItems collection.
gridControl1.RepositoryItems.Add(riDateEdit);

// Assign the repository item to the 'Date' column.
gridView1.Columns["Date"].ColumnEdit = riDateEdit;

' Create and initialize a DateEdit repository item.
Dim riDateEdit As New RepositoryItemDateEdit() With {.Name = "repositoryItemDateEdit1"}

' Display an image (SVG) in the cell editor.
' * The SVG image is obtained from the SvgImageCollection.
' * The SVG image was added to the SvgImageCollection in Visual Studio at design time.
'    

riDateEdit.ContextImageOptions.SvgImage = svgImageCollection1("adateoccuring")
riDateEdit.ContextImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
riDateEdit.ContextImageOptions.Alignment = DevExpress.XtraEditors.ContextImageAlignment.Far

' Add the repository item (cell editor) to the grid control's RepositoryItems collection.
gridControl1.RepositoryItems.Add(riDateEdit)

' Assign the repository item to the 'Date' column.
gridView1.Columns("Date").ColumnEdit = riDateEdit

private void GridView1_CustomRowCellEdit1(object sender, CustomRowCellEditEventArgs e) {
    if (e.RowHandle != GridControl.NewItemRowHandle && e.Column.FieldName == "ShipCountry"
        && e.CellValue.ToString() == "Denmark") {
            e.RepositoryItem = repositoryItemTextEdit2;
    }
}

Private Sub GridView1_CustomRowCellEdit1(ByVal sender As Object, ByVal e As CustomRowCellEditEventArgs)
    If e.RowHandle <> GridControl.NewItemRowHandle AndAlso e.Column.FieldName = "ShipCountry"
        AndAlso e.CellValue.ToString() = "Denmark" Then
            e.RepositoryItem = repositoryItemTextEdit2
    End If
End Sub

using DevExpress.XtraEditors.Repository;

// Create and initialize a CheckEdit repository item.
RepositoryItemCheckEdit riCheckEdit = new RepositoryItemCheckEdit()
{
    Name = "repositoryItemCheckEdit1",
    AllowGrayed = true
};
riCheckEdit.CheckBoxOptions.Style = DevExpress.XtraEditors.Controls.CheckBoxStyle.Custom;
/* Associate SVG images to check states.
    * SVG images are obtained from the SvgImageCollection.
    * SVG images were added to the SvgImageCollection in Visual Studio at design time.
    */
riCheckEdit.ImageOptions.SvgImageChecked = svgImageCollection1["weather_sunny"];
riCheckEdit.ImageOptions.SvgImageUnchecked = svgImageCollection1["weather_rainheavy"];
riCheckEdit.ImageOptions.SvgImageGrayed = svgImageCollection1["weather_cloudy"];
riCheckEdit.ImageOptions.SvgImageSize = new System.Drawing.Size (16, 16);

// Add the repository item (cell editor) to the grid control's RepositoryItems collection.
gridControl1.RepositoryItems.Add(riCheckEdit);

// Assign the repository item to the Boolean 'Check' column.
gridView1.Columns["Check"].ColumnEdit = riCheckEdit;

Imports DevExpress.XtraEditors.Repository

' Create and initialize a CheckEdit repository item.
Dim riCheckEdit As New RepositoryItemCheckEdit() With {
    .Name = "repositoryItemCheckEdit1",
    .AllowGrayed = True
}
riCheckEdit.CheckBoxOptions.Style = DevExpress.XtraEditors.Controls.CheckBoxStyle.Custom
' Associate SVG images with check states.
' * SVG images are obtained from the SvgImageCollection.
' * SVG images were added to the SvgImageCollection in Visual Studio at design time.
'    
riCheckEdit.ImageOptions.SvgImageChecked = svgImageCollection1("weather_sunny")
riCheckEdit.ImageOptions.SvgImageUnchecked = svgImageCollection1("weather_rainheavy")
riCheckEdit.ImageOptions.SvgImageGrayed = svgImageCollection1("weather_cloudy")
riCheckEdit.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)

' Add the repository item (cell editor) to the grid control's RepositoryItems collection.
gridControl1.RepositoryItems.Add(riCheckEdit)

' Assign the repository item to the Boolean 'Check' column.
gridView1.Columns("Check").ColumnEdit = riCheckEdit

RepositoryItemImageComboBox imageCombo = 
    gridControl1.RepositoryItems.Add("ImageComboBoxEdit") as RepositoryItemImageComboBox;  
DevExpress.Utils.ImageCollection images = new DevExpress.Utils.ImageCollection();  
images.AddImage(Image.FromFile("..\\..\\Minor.png"));  
images.AddImage(Image.FromFile("..\\..\\Moderate.png"));  
images.AddImage(Image.FromFile("..\\..\\Severe.png"));  
imageCombo.SmallImages = images;  
    // The first argument is the item description, visible to end users
    // The second argument is the cell (data source) value
    // The third argument is the index of an image inside the "SmallImages" collection
imageCombo.Items.Add(new ImageComboBoxItem("Minor", (short)1, 0));  
imageCombo.Items.Add(new ImageComboBoxItem("Moderate", (short)2, 1));  
imageCombo.Items.Add(new ImageComboBoxItem("Severe", (short)3, 2));  
imageCombo.GlyphAlignment = DevExpress.Utils.HorzAlignment.Center;  
gridView1.Columns["Severity"].ColumnEdit = imageCombo;  
gridControl1.RepositoryItems.Add(imageCombo);

Dim imageCombo As RepositoryItemImageComboBox = TryCast(gridControl1.RepositoryItems.Add("ImageComboBoxEdit"), RepositoryItemImageComboBox)
Dim images As New DevExpress.Utils.ImageCollection()
images.AddImage(Image.FromFile("..\..\Minor.png"))
images.AddImage(Image.FromFile("..\..\Moderate.png"))
images.AddImage(Image.FromFile("..\..\Severe.png"))
imageCombo.SmallImages = images
    ' The first argument is the item description, visible to end users
    ' The second argument is the cell (data source) value
    ' The third argument is the index of an image inside the "SmallImages" collection
imageCombo.Items.Add(New ImageComboBoxItem("Minor", CShort(1), 0))
imageCombo.Items.Add(New ImageComboBoxItem("Moderate", CShort(2), 1))
imageCombo.Items.Add(New ImageComboBoxItem("Severe", CShort(3), 2))
imageCombo.GlyphAlignment = DevExpress.Utils.HorzAlignment.Center
gridView1.Columns("Severity").ColumnEdit = imageCombo
gridControl1.RepositoryItems.Add(imageCombo)

RepositoryItemPictureEdit pictureEdit = 
    gridControl1.RepositoryItems.Add("PictureEdit") as RepositoryItemPictureEdit;  
pictureEdit.SizeMode = PictureSizeMode.Zoom;  
pictureEdit.NullText = " ";  
gridView1.Columns["Picture"].ColumnEdit = pictureEdit;  
gridControl1.RepositoryItems.Add(pictureEdit);

Dim pictureEdit As RepositoryItemPictureEdit =
    TryCast(gridControl1.RepositoryItems.Add("PictureEdit"), RepositoryItemPictureEdit)  
pictureEdit.SizeMode = PictureSizeMode.Zoom  
pictureEdit.NullText = " "  
column = gridView1.Columns("Picture")  
column.ColumnEdit = pictureEdit  
gridControl1.RepositoryItems.Add(pictureEdit)

private void GridView1_CustomDrawCell(object sender, RowCellCustomDrawEventArgs e) {
    if (e.RowHandle != GridControl.NewItemRowHandle && e.Column.FieldName == "ShipCountry"
        && e.CellValue.ToString() == "Denmark") {
            e.DefaultDraw();
            //TODO: specify required offsets
            e.Cache.DrawImage(img, e.Bounds.X + offsetX, e.Bounds.Y + offsetY);
    }
}

Private Sub GridView1_CustomDrawCell(ByVal sender As Object, ByVal e As RowCellCustomDrawEventArgs)
    If e.RowHandle <> GridControl.NewItemRowHandle AndAlso e.Column.FieldName = "ShipCountry"
        AndAlso e.CellValue.ToString() = "Denmark" Then
            e.DefaultDraw()
            'TODO: specify required offsets
            e.Cache.DrawImage(img, e.Bounds.X + offsetX, e.Bounds.Y + offsetY)
    End If
End Sub

gridView1.HtmlImages = imageCollection1;
gridView1.RowHeight = 60;
// Create an unbound column
GridColumn unbound = new GridColumn();
unbound.UnboundDataType = typeof(string);
unbound.FieldName = "unboundImageColumn";
unbound.Visible = true;
unbound.Caption = "Icon";
gridView1.Columns.Add(unbound);
// Assign a RepositoryItemHypertextLabel as the unbound column editor
RepositoryItemHypertextLabel htLabel = new RepositoryItemHypertextLabel();
htLabel.HtmlImages = imageCollection1;
gridControl1.RepositoryItems.Add(htLabel);
unbound.ColumnEdit = htLabel;
// Set custom cell text
gridView1.CustomUnboundColumnData += GridView1_CustomUnboundColumnData;

private void GridView1_CustomUnboundColumnData(object sender, CustomColumnDataEventArgs e)
{
    if (e.Column.Caption == "Icon")
    {
        // Image from HtmlImages collection
        e.Value = "<image=add_32x32.png>";
        // Image from resources
        //e.Value = "<image=#_589812_200>";
    }
}

gridView1.HtmlImages = imageCollection1
gridView1.RowHeight = 60
' Create an unbound column
Dim unbound As New GridColumn()
unbound.UnboundDataType = GetType(String)
unbound.FieldName = "unboundImageColumn"
unbound.Visible = True
unbound.Caption = "Icon"
gridView1.Columns.Add(unbound)
' Assign a RepositoryItemHypertextLabel as the unbound column editor
Dim htLabel As New RepositoryItemHypertextLabel()
htLabel.HtmlImages = imageCollection1
gridControl1.RepositoryItems.Add(htLabel)
unbound.ColumnEdit = htLabel
' Set custom cell text
AddHandler gridView1.CustomUnboundColumnData, AddressOf GridView1_CustomUnboundColumnData

private void GridView1_CustomUnboundColumnData(Object sender, CustomColumnDataEventArgs e)
    If e.Column.Caption = "Icon" Then
        ' Image from HtmlImages collection
        e.Value = "<image=add_32x32.png>"
        ' Image from resources
        'e.Value = "<image=#_589812_200>";
    End If

using System.IO;
using System.Drawing;
using System.Collections.Generic;
using DevExpress.XtraGrid.Views.Base;
using DevExpress.XtraGrid.Views.Card;

Dictionary<string, Image> imageCache = new Dictionary<string, Image>();
private void CardView1_CustomUnboundColumnData(object sender, CustomColumnDataEventArgs e) {
    if (e.IsSetData)
        return;
    CardView view = sender as CardView;
    var path = (string)view.GetListSourceRowCellValue(e.ListSourceRowIndex, "Path");
    if (string.IsNullOrEmpty(path))
        return;
    try {
        e.Value = LoadImage(path);
    }
    catch { }
}

Image LoadImage(string path) {
    Image img;
    if(!imageCache.TryGetValue(path, out img)) {
        if(File.Exists(path))
            img = Image.FromFile(path);
        imageCache.Add(path, img);
    }
    return img;
}

Imports System.IO
Imports System.Drawing
Imports System.Collections.Generic
Imports DevExpress.XtraGrid.Views.Base
Imports DevExpress.XtraGrid.Views.Card

Private imageCache As New Dictionary(Of String, Image)()
Private Sub CardView1_CustomUnboundColumnData(ByVal sender As Object, ByVal e As CustomColumnDataEventArgs)
    If e.IsSetData Then
        Return
    End If
    Dim view As CardView = TryCast(sender, CardView)
    Dim path = CStr(view.GetListSourceRowCellValue(e.ListSourceRowIndex, "Path"))
    If String.IsNullOrEmpty(path) Then
        Return
    End If
    Try
        e.Value = LoadImage(path)
    Catch
    End Try
End Sub

Private Function LoadImage(ByVal path As String) As Image
    Dim img As Image = Nothing
    If Not imageCache.TryGetValue(path, img) Then
        If File.Exists(path) Then
            img = Image.FromFile(path)
        End If
        imageCache.Add(path, img)
    End If
    Return img
End Function

// Trim e-mail addresses
private void gridView1_CustomColumnDisplayText(object sender, DevExpress.XtraGrid.Views.Base.CustomColumnDisplayTextEventArgs e) {
    if (e.Column == colCreatorID) {
        string email = e.DisplayText;
        string domain = email.Substring(email.IndexOf('@') + 1);
        e.DisplayText = domain;
    }
}

// Custom cell merge
private void gridView1_CellMerge(object sender, DevExpress.XtraGrid.Views.Grid.CellMergeEventArgs e) {
    GridView view = sender as GridView;
    if(view == null) return;
    if (e.Column == colCreatorID) {
        string text1 = view.GetRowCellDisplayText(e.RowHandle1, colCreatorID);
        string text2 = view.GetRowCellDisplayText(e.RowHandle2, colCreatorID);
        e.Merge = (text1 == text2);
        e.Handled = true;
    }
}

'trimming e-mail addresses
Private Sub gridView1_CustomColumnDisplayText(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Base.CustomColumnDisplayTextEventArgs)
  If e.Column = colCreatorID Then
      Dim email As String = e.DisplayText
      Dim domain As String = email.Substring(email.IndexOf("@"c) + 1)
      e.DisplayText = domain
  End If
End Sub

'custom cell merging
Private Sub gridView1_CellMerge(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.CellMergeEventArgs)
  Dim view As GridView = TryCast(sender, GridView)
  If view Is Nothing Then
      Return
  End If
  If e.Column = colCreatorID Then
      Dim text1 As String = view.GetRowCellDisplayText(e.RowHandle1, colCreatorID)
      Dim text2 As String = view.GetRowCellDisplayText(e.RowHandle2, colCreatorID)
      e.Merge = (text1 = text2)
      e.Handled = True
  End If
End Sub