WinForms Data Grid - Drag-and-drop data rows from one grid to another

C#
using DevExpress.XtraGrid;
using DevExpress.XtraGrid.Views.Grid;
using System;
using System.Data;

namespace DragDropTwoGrids {
    public partial class Form1 : DevExpress.XtraEditors.XtraForm {
        public Form1() {
            InitializeComponent();
        }
        protected override void OnLoad(EventArgs e) {
            base.OnLoad(e);
            DataTable table = FillTable();
            SetUpGrid(gridControl1, table);
            SetUpGrid(gridControl2, table.Clone());
        }
        public DataTable FillTable() {
            DataTable table = new DataTable();
            table.Columns.Add("Column");
            for (int i = 1; i <= 5; i++)
                table.Rows.Add(new object[] { "Item " + i.ToString() });
            return table;
        }
        public void SetUpGrid(GridControl grid, DataTable table) {
            GridView view = grid.MainView as GridView;
            grid.DataSource = table;
            view.OptionsBehavior.Editable = false;
        }
    }
}

Visual Basic
Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Views.Grid
Imports System
Imports System.Data

Namespace DragDropTwoGrids

    Public Partial Class Form1
        Inherits DevExpress.XtraEditors.XtraForm

        Public Sub New()
            InitializeComponent()
        End Sub

        Protected Overrides Sub OnLoad(ByVal e As EventArgs)
            MyBase.OnLoad(e)
            Dim table As DataTable = FillTable()
            SetUpGrid(gridControl1, table)
            SetUpGrid(gridControl2, table.Clone())
        End Sub

        Public Function FillTable() As DataTable
            Dim table As DataTable = New DataTable()
            table.Columns.Add("Column")
            For i As Integer = 1 To 5
                table.Rows.Add(New Object() {"Item " & i.ToString()})
            Next

            Return table
        End Function

        Public Sub SetUpGrid(ByVal grid As GridControl, ByVal table As DataTable)
            Dim view As GridView = TryCast(grid.MainView, GridView)
            grid.DataSource = table
            view.OptionsBehavior.Editable = False
        End Sub
    End Class
End Namespace