タイトル : Re^3: 習得したデータをリストボックス内で、列を揃えて表示させるにはどうすればよいでしょうか 投稿日 : 2004/05/03(Mon) 23:03 投稿者 : 花ちゃん
Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click With ListBox1 .Font = New Font("MS ゴシック", 12) .Items.Add(Microsoft.VisualBasic.Strings.Left("1" & " ", 7) & _ Microsoft.VisualBasic.Strings.Left("りんご" & " ", 7) & _ Microsoft.VisualBasic.Strings.Right(" " & "30円" & " ", 10) & _ Microsoft.VisualBasic.Strings.Left("山田商店" & " ", 7)) .Items.Add(Microsoft.VisualBasic.Strings.Left("02" & " ", 7) & _ Microsoft.VisualBasic.Strings.Left("みかん" & " ", 7) & _ Microsoft.VisualBasic.Strings.Right(" " & "50円" & " ", 10) & _ Microsoft.VisualBasic.Strings.Left("佐々木商店" & " ", 7)) .Items.Add(Microsoft.VisualBasic.Strings.Left("003" & " ", 7) & _ Microsoft.VisualBasic.Strings.Left("パイナップル" & " ", 7) & _ Microsoft.VisualBasic.Strings.Right(" " & "150円" & " ", 10) & _ Microsoft.VisualBasic.Strings.Left("岬商店" & " ", 7)) End With End Sub 後はご自分で工夫してください。 |