dim sql as string="select a.*,b.* from table1 a,table2 b where a.id=b.id "
With Tables(window_table)
.Fill(sql,"c2",True)
.SetColVisibleWidth("a.id|78") '这个地方怎么写ID,a.id? table.id? id
.Cols("detail_id").visible=False '这个地方怎么写ID,a.id? table.id? id
End With
With DataTables(window_table)
.DataCols("id").Caption = "标记" '这个地方怎么写ID,a.id? table.id? id
.MultiRowHeader = False
.BuildHeader()
End With