With Tables("测试_Table1").DataTable .LoadFilter = "" .LoadTop = 20 .LoadPage = 0
Tables("测试_table1").Fill("Select Top 20 简称,交易币种,结款条件,税率,简介,联系人,职务,{供应商联络人}.电话
As [联系方式] From {供应商资料表} Inner JOIN {供应商联络人} ON {供应商联络人}.[代码] =
{供应商资料表}.[代码]","ERP",True) '.Load() End With