using DevExpress.DataAccess.ConnectionParameters;
using DevExpress.DataAccess.Sql;
// ...
static SqlDataSource CreateSqlDataSource() {
    var connectionParameters = new SQLiteConnectionParameters("Data/nwind.db", null); 
    var sqlDataSource = new SqlDataSource(connectionParameters) { Name = "Sql_Categories" };
    var categoriesQuery = SelectQueryFluentBuilder.AddTable("Categories").SelectAllColumnsFromTable().Build("Categories");
    sqlDataSource.Queries.Add(categoriesQuery);
    sqlDataSource.RebuildResultSchema();
    return sqlDataSource;
}

Imports DevExpress.DataAccess.ConnectionParameters
Imports DevExpress.DataAccess.Sql
' ...
Private Shared Function CreateSqlDataSource() As SqlDataSource
    Dim connectionParameters = New SQLiteConnectionParameters("Data/nwind.db", Nothing)
    Dim sqlDataSource = New SqlDataSource(connectionParameters) With {.Name = "Sql_Categories"}
    Dim categoriesQuery = SelectQueryFluentBuilder.AddTable("Categories").SelectAllColumnsFromTable().Build("Categories")
    sqlDataSource.Queries.Add(categoriesQuery)
    sqlDataSource.RebuildResultSchema()
    Return sqlDataSource
End Function

using DevExpress.DataAccess.Excel;
// ...
static ExcelDataSource CreateExcelDataSource() {
    var excelDataSource = new ExcelDataSource() { Name = "Excel_Products" };
    excelDataSource.FileName = Path.Combine(Path.GetDirectoryName(typeof(Form1).Assembly.Location), "Data/Products.xlsx");
    excelDataSource.SourceOptions = new ExcelSourceOptions() {
        ImportSettings = new ExcelWorksheetSettings("Sheet"),
    };
    excelDataSource.RebuildResultSchema();
    return excelDataSource;
}

Imports DevExpress.DataAccess.Excel
' ...
Private Shared Function CreateExcelDataSource() As ExcelDataSource
    Dim excelDataSource = New ExcelDataSource() With {.Name = "Excel_Products"}
    excelDataSource.FileName = Path.Combine(Path.GetDirectoryName(GetType(Form1).Assembly.Location), "Data/Products.xlsx")
    excelDataSource.SourceOptions = New ExcelSourceOptions() With {.ImportSettings = New ExcelWorksheetSettings("Sheet")}
    excelDataSource.RebuildResultSchema()
    Return excelDataSource
End Function

using DevExpress.DataAccess.DataFederation;
// ...
static FederationDataSource CreateFederationDataSource(SqlDataSource sql, ExcelDataSource excel) {
    // Create a federated query's SQL and Excel sources.
    Source sqlSource = new Source(sql.Name, sql, "Categories");
    Source excelSource = new Source(excel.Name, excel, "");

    // Create a federated query.
    var selectNode = sqlSource.From()
        // Select the "CategoryName" column from the SQL source.
        .Select("CategoryName")
        // Join the SQL source with the Excel source based on the "CategoryID" key field.
        .Join(excelSource, "[Excel_Products.CategoryID] = [Sql_Categories.CategoryID]")
        // Select columns from the Excel source.
        .Select("CategoryID", "ProductName", "UnitPrice")
        // Specify the query's name and build it. 
        .Build("CategoriesProducts");

    // Create a federated data source and add the federated query to the collection.
    var federationDataSource = new FederationDataSource();
    federationDataSource.Queries.Add(selectNode);
    // Build the data source schema to display it in the Field List.
    federationDataSource.RebuildResultSchema();

    return federationDataSource;
}

Imports DevExpress.DataAccess.DataFederation
' ...
Private Shared Function CreateFederationDataSource(ByVal sql As SqlDataSource, ByVal excel As ExcelDataSource) As FederationDataSource
    ' Create a federated query's SQL and Excel sources.
    Dim sqlSource As New Source(sql.Name, sql, "Categories")
    Dim excelSource As New Source(excel.Name, excel, "")

    ' Create a federated query.
    Dim selectNode = sqlSource.From().Select("CategoryName").Join(excelSource, "[Excel_Products.CategoryID] = [Sql_Categories.CategoryID]").Select("CategoryID", "ProductName", "UnitPrice").Build("CategoriesProducts")
        ' Select the "CategoryName" column from the SQL source.
        ' Join the SQL source with the Excel source based on the "CategoryID" key field.
        ' Select columns from the Excel source.
        ' Specify the query's name and build it. 

    ' Create a federated data source and add the federated query to the collection.
    Dim federationDataSource = New FederationDataSource()
    federationDataSource.Queries.Add(selectNode)
    ' Build the data source schema to display it in the Field List.
    federationDataSource.RebuildResultSchema()

    Return federationDataSource
End Function

using System.ComponentModel;
using System.Drawing;
using DevExpress.XtraReports.UI;
using System.IO;
// ...
public static XtraReport CreateReport() {
    // Create a new report.
    var report = new XtraReport();

    // Create data sources. 
    var sqlDataSource = CreateSqlDataSource();
    var excelDataSource = CreateExcelDataSource();
    var federationDataSource = CreateFederationDataSource(sqlDataSource, excelDataSource);
    // Add all data sources to the report to avoid serialization issues. 
    report.ComponentStorage.AddRange(new IComponent[] { sqlDataSource, excelDataSource, federationDataSource });
    // Assign a federated data source to the report.
    report.DataSource = federationDataSource;
    report.DataMember = "CategoriesProducts";

    // Add the Detail band and two labels bound to the federated data source's fields.
    var detailBand = new DetailBand() { HeightF = 50 };
    report.Bands.Add(detailBand);
    var categoryLabel = new XRLabel() { WidthF = 150 };
    var productLabel = new XRLabel() { WidthF = 300, LocationF = new PointF(200, 0) };
    categoryLabel.ExpressionBindings.Add(new ExpressionBinding("BeforePrint", "Text", "[CategoryName]"));
    productLabel.ExpressionBindings.Add(new ExpressionBinding("BeforePrint", "Text", "[ProductName]"));
    detailBand.Controls.AddRange(new[] { categoryLabel, productLabel });

    return report;
}

Imports System.ComponentModel
Imports System.Drawing
Imports DevExpress.XtraReports.UI
Imports System.IO
' ...
Public Shared Function CreateReport() As XtraReport
    ' Create a new report.
    Dim report = New XtraReport()

    ' Create data sources. 
    Dim sqlDataSource = CreateSqlDataSource()
    Dim excelDataSource = CreateExcelDataSource()
    Dim federationDataSource = CreateFederationDataSource(sqlDataSource, excelDataSource)
    ' Add all data sources to the report to avoid serialization issues. 
    report.ComponentStorage.AddRange(New IComponent() { sqlDataSource, excelDataSource, federationDataSource })
    ' Assign a federated data source to the report.
    report.DataSource = federationDataSource
    report.DataMember = "CategoriesProducts"

    ' Add the Detail band and two labels bound to the federated data source's fields.
    Dim detailBand = New DetailBand() With {.HeightF = 50}
    report.Bands.Add(detailBand)
    Dim categoryLabel = New XRLabel() With {.WidthF = 150}
    Dim productLabel = New XRLabel() With {.WidthF = 300, .LocationF = New PointF(200, 0)}
    categoryLabel.ExpressionBindings.Add(New ExpressionBinding("BeforePrint", "Text", "[CategoryName]"))
    productLabel.ExpressionBindings.Add(New ExpressionBinding("BeforePrint", "Text", "[ProductName]"))
    detailBand.Controls.AddRange( { categoryLabel, productLabel })

    Return report
End Function

ReportDesignTool designTool = new ReportDesignTool(CreateReport());
designTool.ShowRibbonDesignerDialog();

Dim designTool As New ReportDesignTool(CreateReport())
designTool.ShowRibbonDesignerDialog()