统计Word文档中的中文字符数的VB代码是什么?
2018-06-21 02:20:26来源：未知 阅读 ()
问题：统计 Word文档中的中文字符数的 VB 代码是什么？
假设一篇文档中既有中文又有英文，如何才能通过代码取得与以下操作获得的结果相同的数字：“工具－字数统计－中文字符和朝鲜语单词”？当然我知道，documentObj.words.count 求得的字数没用。
解答：
参考以下 VBA 程式碼：
N = 0
For Each szWord In ActiveDocument.Words
For I = 1 To Len(szWord)
r = LenB(StrConv(Mid(szWord, I, 1), vbFromUnicode))
If r = 2 Then N = N + 1
Next I
Next szWord
MsgBox "中文字共" & N & "个"
标签：
版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有
- 制表位怎么设置？Word排版不用制表符，只不过是瞎忙一场 2020-07-09
- 流程图怎么做？用Word制作流程图超方便！ 2020-07-07
- Word文档怎么让每一章设置不同页眉？书籍中惯用的排版技巧！ 2020-07-05
- 如何让一个Word文档同时拥有纵向和横向页面？ 2020-07-03
- Word公司专用文档模板这样做，一劳永逸！ 2020-06-05
IDC资讯： 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营： 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程： Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术： Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧： 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作： FrontPages Dreamweaver Javascript css photoshop fireworks Flash
