[OSのVer]：WindowsXp　　　　[VBのVer]：VB.NET　　
花さん、よねKENさん、それと皆様ありがとうございました。花さんから紹介して頂きましたサンプル
を利用して、Accessのmdbから、ListBoxへ、データを表示できるようになりました。コードの意味が
わかってませんが、少しずつ、進んでいます。ListBox1.Items.Clear()を使うと、重複されず、表示
できます。そこで、ListBoxへの表示ですが、データの列を揃えて表示したいのですが、何か良い方法
はありませんでしょうか？以前のVB４では、ListBoxのItemの列の位置を数字で把握できていたような
気がします。1番目のレコードが TestId 1 TestName Enterkey 2番目のレコードが TestId 20
TestName Bskey 3番目のレコードが TestId 300 TestName Spacekeyで、そのまま表示すると
1　Enterkey
20　Bskey
300　Spacekey
となりますけど（スペースを一個間に入れて）
1　　Enterkey
20　 Bskey
300  Spacekey
のようにしたいのです。
答えが複雑になると思いますが、できるだけ理解するよう頑張って見ます。
お願い申し上げます。

フォントサイズは　9 Or 12  の ＭＳ ゴシックで
ListBox1.Items.Add (Microsoft.VisualBasic.Strings.Left("1" & "    ", 4) & "Enterkey")

[OSのVer]：Windows　　　　[VBのVer]：VB.NET　　
> フォントサイズは　9 Or 12  の ＭＳ ゴシックで
> ListBox1.Items.Add (Microsoft.VisualBasic.Strings.Left("1" & "    &qu
ot;, 4) & "Enterkey")
ありがとうございました。できました。
フォントサイズ、フォント名はプロパティーで、設定しました。

[OSのVer]：Windows　　　　[VBのVer]：VB.NET　　
以前のご回答で、下記のような回答でした。　　

> > フォントサイズは　9 Or 12  の ＭＳ ゴシックで
> > ListBox1.Items.Add (Microsoft.VisualBasic.Strings.Left("1" & "  
  &qu
> ot;, 4) & "Enterkey")

書き直して、Button1クリック時に、
        Dim oOleConn As New OleDbConnection
        Dim oOleCmd As New OleDbCommand
        Dim oOleReader As OleDbDataReader
        Dim A As String
        Dim B As String
        Dim C As String
        Dim D As String
        oOleConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data 　　　　　　
Source=C:\Vbmdb\test.mdb"
        oOleConn.Open()
        oOleCmd.Connection = oOleConn
        oOleCmd.CommandText = "SELECT testcd, testname, testno, koment FROM test"
        oOleReader = oOleCmd.ExecuteReader()
        ListBox1.Items.Clear()
       While (oOleReader.Read)

            A = oOleReader.Item("testcd")
            B = oOleReader.Item("testname")
            C = oOleReader.Item("testno")
            D = oOleReader.Item("koment")
             With ListBox1
                .Items.Add(Microsoft.VisualBasic.Strings.Left(A & "    ", 6) &a
mp; 　　　　　　　
　　　　　　　　　Microsoft.VisualBasic.Strings.Left(B & "            ", 20) &a
mp; 　　　　　　　
　　　　　　　　　_Microsoft.VisualBasic.Strings.Left(C & "    ", 8) & 　　
　　　　　　　　　
　　　　　　　　　_Microsoft.VisualBasic.Strings.Left(D & "    ", 8))

            End With
        End While
のように記述してみましたが、AとBはうまく揃いますが、C,Dは、ずれてしまいます。
VBレスキュー（花ちゃん）の「他のコントロール関係」の項目のListBoxのStrCutのところを見たのです
が、StrCutは、ヘルプの検索にはかかりませんでした。
うまく、A,B,C,Dを揃えて、ListBoxへ、表示させる方法があれば、教えてください。
お願い申し上げます。