直接写啊
Dim q As new OuterTableBuilder q.TableName = "查询表"q.TableCaption = "查询表"q.SelectString = "Select 物料编码,物料描述,结存,移动日期,移动单元,移动类型,用户名 FR OM {库存} Where " & fitq.Build