tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^3: ListBoxの表示について。
投稿日: 2004/02/28(Sat) 14:55
投稿者タツヒコ
[OSのVer]:Windows    [VBのVer]:VB.NET  
以前のご回答で、下記のような回答でした。  

> > フォントサイズは 9 Or 12  の MS ゴシックで
> > 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へ、表示させる方法があれば、教えてください。
お願い申し上げます。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。