主题：[求助]临时表的行是不是没有RowState属性？

 嗯嗯，差不多那样子。你可以用数据表嘛。

Dim Builder As New ADOXBuilder
Builder.Open()
If DataTables.Contains("订单") Then
    With Builder
        .DeleteTable("订单")
    End With
    DataTables.Unload("订单")
End If

Dim tbl As ADOXTable
tbl = Builder.NewTable("订单") '创建表
With tbl
    .AddColumn("日期" ,ADOXType.DateTime)
    .AddColumn("产品" ,ADOXType.String, 12)
    .AddColumn("客户" ,ADOXType.String, 20)
    .AddColumn("数量" ,ADOXType.Integer)
    .AddColumn("备注" ,ADOXType.Text)
End With
Builder.AddTable(tbl) '增加表
Builder.Close()

DataTables.Load("订单")