
- 您所在的用户组无法下载或查看附件
您好,我安装了懒人插件,运行以下脚本,在记事本里得到很多问号,与原文不符。
Dim LazyExcel,path,Index
path="C:\Users\haier\Desktop\1.xls"
Set LazyExcel= CreateObject("Lazy.LxjExcel")
Index = LazyExcel.ExcelOpen(path, 1)
Delay 3000
For i = 1 To 20
Call Plugin.LazyOffice.ExcelRead(3, i, 1,Index)
Str=LazyExcel.ExcelRead(3,i,1,Index)
SayString Str
Delay 1000
KeyPress "Enter", 1
Delay 500
Next
原文是:
[ˈɔridʒin]
[pəˈræbələ]
[ˈpærəlel]
[ˌpærəˈleləˌgræm]
[ˈpærɪti:]
[ˈpentəˌgɔn]
[pə: ˈkeɪpətə]
[pəˈsent]
[pəˈsentidʒ]
[pəˈsentail]
[pəˈrɪmɪtə]
[ˈpiəriəd]
[ˌpɪri:əˈdɪsɪti:]
[ˌpɜ:mjʊˈteɪʃən]
[feiz]
[plein]
[plʌs]
[pɔint]
[ˈpɔli:ˌgɔn]
[pɔliˈhedrən]
打开记事本,运行脚本,变成:
[??rid?in]
[p??r?b?l?]
[?p?r?lel]
[?p?r??lel??gr?m]
[?p?r?ti:]
[?pent??g?n]
[p?: ?ke?p?t?]
[p??sent]
[p??sentid?]
[p??sentail]
[p??r?m?t?]
[?pi?ri?d]
[?p?ri:??d?s?ti:]
[?p?:mj??te???n]
[feiz]
[plein]
[pl?s]
[p?int]
[?p?li:?g?n]
[p?li?hedr?n]
怎么会变成这样?
附件:
您需要登录才可以下载或查看附件。没有帐号? 注册