rivate Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim intQuantityO As Integer (17, 22, 3,4, 51,27) ListBox.Items.Add(intQuantity(3)) ListBox.Items.Add(intQuantity(1)+ intQuantity(3)) ListBox.Items.Add(intQuantity(2 +3) End Sub