MyBreadCrumb.BreadCrumbElement.Items(0).Text = ChrW(&HF015)
        MyBreadCrumb.BreadCrumbElement.Items(0).CustomFont = "Font Awesome 5 Free Solid"

var barcode = new RadBarcode();
barcode.Width = 900;
barcode.Height = 150;
barcode.Symbology = new Code39();
barcode.Value = "1890";
barcode.LoadElementTree();
var barcodeImage = barcode.ExportToImage(900, 150);
barcodeImage.Save(@"C:\test.png");

Me.IsMdiContainer = true

Imports Telerik.WinControls
Imports Telerik.WinControls.UI

Public Class xElement
    Inherits RadElement

    Private listElement As RadListViewElement

    Public Sub New()
        'Me.NotifyParentOnMouseInput = True
        'Me.ShouldHandleMouseInput = True
        'Me.Capture = True
        'Me.CaptureOnMouseDown = True
    End Sub

    Protected Overrides Sub OnLoaded()
        MyBase.OnLoaded()

        AddHandler listElement.ItemMouseUp, Sub(s, e)
                                                If e.OriginalEventArgs.Button = MouseButtons.Left Then
                                                    listElement.SelectedItem = e.Item
                                                End If
                                            End Sub
    End Sub

    Protected Overrides Sub CreateChildElements()
        MyBase.CreateChildElements()

        listElement = New RadListViewElement
        With listElement
            '.ShouldHandleMouseInput = True
            '.NotifyParentOnMouseInput = True
            '.Capture = True
            '.CaptureOnMouseDown = True
            .ViewType = ListViewType.ListView 
            .DataSource = New List(Of String)(New String() {"a", "b", "c"})
        End With
        Me.Children.Add(listElement)
    End Sub

End Class

Imports Telerik.WinControls

<ToolboxItem(True)>
Public Class xControl
    Inherits RadControl

    Private element As xElement

    Public Sub New()
        element = New xElement()
        RootElement.Children.Add(element)
    End Sub

End Class