Dim strs() As String = {"货币资金","货币资金","应收piao据","应收piao据","应收账款","应收账款", _"预付款项","预付款项","其他应收款","其他应收款","库存","库存","工程施工","工程施工","工程结算","工程结算"}
http://www.foxtable.com/webhelp/scr/2489.htm