VB.Net後で使用するために、テキストボックスに行を変数として保存するにはどうすればよいですか？

Question

私はユーザーが製品を注文できるフォームを作成する必要があるソフトウェア開発評価を持っています。私は底に各ラインを設定することができるようにしたいhttps://i.imgur.com/OGzG8Jf.jpg

：https://i.imgur.com/48qrsIc.jpg

製品、製品名だけでなく、数量を追加して、以下のようにのようにテキストボックスに表示されます。このフォームはこのようになります私はデータベースに格納することができます変数としてテキストボックス。私はそれを配列やリストにする必要があるかどうかはわかりませんが、その方法もわかりません。

ご協力いただければ幸いです。どうもありがとうございました！！！

Answer 1

データを格納するコントロールを決して使用しないでください。あなたがしなければならないことは、アイテムオーダーのリストである「カート」オブジェクトを持つことです。品目発注は、発注コード、数量、および製品説明を含むオブジェクトでなければなりません。

あなたは「カートに入れる」ボタンをクリックすると、あなたがしてなり ComboBox.SelectedItemを使用することができます

Private Class Product 
    Property ProductCode As Integer 
    Property Description As String 
    Property StockQuantity As Integer 
    Property Price As Decimal 
End Class 

Dim products As New List(Of Product) 

Private Class OrderItem 
    Public Property ProductCode As Integer 
    Public Property Quantity As Integer 
End Class 

Dim cart As New List(Of OrderItem) 

そして、あなたのコンボボックスでは、あなたが.DisplayMember

としてDescriptionを使用して製品リストにバインドしなければなりません実際の製品オブジェクトを選択し、カートに直接追加します。

この時点で、データはRichTextBoxに格納されるのではなく、Cartオブジェクトに注文アイテムのリストとして格納されます。このリストを使用して、RichTextBoxにこのようなものを設定することができます。

Private Sub RefreshRtbOrders() 
    RtbOrders.SuspendLayout() 
    RtbOrders.Clear() 
    For Each item As OrderItem In cart 
     RtbOrders.AppendText(item.Quantity.ToString("0000 ") & products.Find(Function(x) x.ProductCode = item.ProductCode).Description & vbCrLf) 
    Next 
    CboProducts.ResumeLayout() 
End Sub 

Cartオブジェクトを使用してデータベースを更新できます。