how to add many selected items from checkboxes to listbox at same time in vb.net

I want to be able to add many selected items from a checkbox to a listbox at the same time. This is a sample of the code

If CheckBox1.Checked Then
choice = "Potato soup"
quantity = Val(txtapp1.Text)
price = "80"
If CheckBox2.Checked Then
choice = "Mini tacos"
quantity = Val(txtapp2.Text)
price = "95"

I want to be able to add choice, quantity, and price for each checkbox to the listbox at the same time.