' Loop through the rows to obtain some of the column values
Dim i As Integer Dim OrderNum As Integer Dim OrderStatus As String Dim TotalDollars As Decimal For i = 0 To WS_OrderDetails.Length - 1 OrderNum = WS_OrderDetails(i).OrderNum OrderStatus = WS_OrderDetails(i).OrderStatus TotalDollars = WS_OrderDetails(i).TotalDollars Next i |