如何在数组索引中添加项目

问题描述

以下是我的代码

Below is my code

Dim OrderItemsQty As New V2.orderItemIdQty

 OrderItemsQty.order_item_id = "545"
 OrderItemsQty.qty = 1

 Dim OrderItemsQty1 As New V2.orderItemIdQty
 OrderItemsQty1.order_item_id = "SHI054-Black-7"
 OrderItemsQty1.qty = 1

Dim ItemsQty() As V2.orderItemIdQty = {OrderItemsQty, OrderItemsQty1}

上面我已添加OrderItemsQty和OrderQty

现在我想要它在循环中动态添加多个orderitemsQty。 。

Above I have add OrderItemsQty and OrderQty
now i am want to it dynamically add multiple orderitemsQty in loop..

推荐答案

Dim list As New List(Of CMagentoOrder)
           list = salesOrderInfo(OrderIncrementedID)
           Dim Items(list.Count) As V2.orderItemIdQty
           Dim obj As New CMagentoOrder
           Dim i = 0
           For i = 0 To list.Count - 1
               For Each item As CMagentoOrder In list
                   Dim qty As New V2.orderItemIdQty
                   qty.order_item_id = item.ItemsQty_Order_item_id
                   qty.qty = item.ItemsQty_Qty
                   Items(i) = qty
                   i = i + 1
               Next
           Next

这篇关于如何在数组索引中添加项目的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！