おせわになっております。
「Visual Basic中学校」のデータベース講座　第5回データの一覧表示にあります「参考：複数列のコンボボックス」を参考にして、複数列のリストボックスのカスタムコントロールを作成してみました。
しかし、出来上がったカスタムコントロールをフォームに貼り付けると次のようなエラーが表示されて使用することができません。
エラーの示す行を見ると、データを取得するところで誤りが生じているようです。
コンボボックスとリストボックスでは、前者が任意の文字列を入力できるという機能が備わっている点が相違点であり、発生しているエラーはその点が関係しているとは思うのですが、具体的にどのようにしたらよいのかがわかりません。

どのようにコードを修正すればよいのか、何方様かご教示おねがいします。

エラー表示のメッセージ
--------------------------------------------------------------------------
コントロール WindowsApplication1.ListBoxEx がデザイナーでハンドルされていない例外をスローして、無効になりました。

例外：
‘0’のInvalidArgument=Valueは‘index’に対して有効ではありません。
パラメータ名：index

スタック トレース：
　場所 WindowsApplication1.ListBoxEx.OnDrawItem(DrawItemEventArgs e) 場所 d:\mydoc\visual studio2010\Projects\list1\list1\Class1.vb:行 26
--------------------------------------------------------------------------

関係しているコード

' ▼データの内容を取得
        Dim Row As DataRowView
        Dim ItemString1 As String
        Dim ItemString2 As String

        Row = DirectCast(Me.Items(e.Index), DataRowView)
        ItemString1 = Row(ListMember1)
        ItemString2 = Row(ListMember2)