StringBuilderを使用してリストボックスの内容をテキストファイルに追加する

Question

ビジュアルスタジオでボタンを押すと、ListBoxの内容がテキストファイルに追加されるプログラムを作成しようとしています。

私は現在、StringBuilderを使用しています。私の教授がこれが最も簡単で簡単な方法だと教えてくれたからです。私はStreamWriterも使用できることを知っています。

Dim CreateReciept As New System.Text.StringBuilder 

CreateReciet.Append(lstOrderForm.Text & vbCrLf) 

System.IO.File.WriteAllText("order_receipt.txt", Text.ToString()) 

Process.Start("order_receipt.txt") 

これは現在のコードです。しかし、私はそれを実行すると、それはリストボックスの内容ではなく空白のフォームを生成します。

Answer 1

あなたは間違って見ていますもの。このプロパティの値は、文字列値に設定されている場合、指定されたテキストに一致する項目を選択し、リストボックス内の項目のために、リストボックスの検索を

：ListBox.Textは現在選択されている項目のテキストを提供します。また、このプロパティを使用して、ListBoxで現在選択されている項目を判断することもできます。 ListBoxのSelectionModeプロパティがSelectionMode.MultiExtendedに設定されている場合、このプロパティは最初に選択されたアイテムのテキストを返します。 ListBoxのSelectionModeプロパティがSelectionMode.Noneに設定されていない場合、このプロパティは最初に選択した項目のテキストを返します。 ListBox.Itemsコレクションを

代わりにループ：

このプロパティは、現在のListBoxに格納されている項目のリストへの参照を取得することができます。このリファレンスでは、アイテムを追加したり、アイテムを削除したり、コレクション内のアイテムの数を取得したりすることができます。アイテムコレクションで実行できるタスクの詳細については、ListBox.ObjectCollectionクラスの参照トピックを参照してください。

最後にText.ToStringを使用しないと動作しません。代わりにあなたのStringBuilderを使用します。

Dim sb As New StringBuilder 

For Each item In lstOrderForm.Items 
    sb.Append(item.ToString() & vbCrLf) 
Next 

System.IO.File.WriteAllText("order_receipt.txt", sb.ToString()) 

Process.Start("order_receipt.txt") 

コードは、私のために次の出力を生成します。

Answer 2

代わりに以下のことを試してみてください。

Dim CreateReciet As New System.Text.StringBuilder 

CreateReciet.Append(lstOrderForm.Text & vbCrLf) 

System.IO.File.WriteAllText("order_receipt.txt", CreateReciet.ToString()) 

Process.Start("order_receipt.txt") 

私も、あなたのStringBuilderが有用何もしていないので、あなただけ書くことができる上に述べたよう：

System.IO.File.WriteAllText("order_receipt.txt", lstOrderForm.Text & vbCrLf) 
Process.Start("order_receipt.txt")