Public Type Bill
       BillID As String
       BillDate As Date
       Market As String
       List As String
End Type
Public Type GoodsList
       GoodsID As String
       GoodsName As String
       GoodsType As String
       GoodsUnit As String
       GoodsNum As Integer
       GoodsCur As Currency
End Type

解决方案 »

  1.   

    "是将商品列表定义成一个类
    在订单类中包括商品列表类的集合"按这个来说楼上的有点错,这样子就可以了:Const MAX=64Public Type GoodsList
           GoodsID As String
           GoodsName As String
           GoodsType As String
           GoodsUnit As String
           GoodsNum As Integer
           GoodsCur As Currency
    End TypePublic Type Bill
           BillID As String
           BillDate As Date
           Market As String
           List[MAX] As GoodsList
    End Type