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
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
在订单类中包括商品列表类的集合"按这个来说楼上的有点错,这样子就可以了: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