VB6.0编译的DLL是否不支持给EXCEL工作表的表名赋中文值？

VB6.0编译的DLL不支持给EXCEL工作表的表名赋中文值？给位大大遇到过吗？
SUB TEST()

'......
Dim xlApp as Application
Dim MySht as EXCEL.Worksheet
SET MySht = xlApp.sheets.add
MySht.Name="new" '正常
MySht.Name="新建" '失效

'.......

end sub