pb word 文字个数统计
主要代码
stringls_filename,ls_path
integerli_value
oleobjectole_word
longll_cnt
ole_word=createoleobject
li_value=ole_word.connecttonewobject("word.application")
ifli_value0then
messagebox("info","连接word失败，请检查")
return-1
endif
ifGetFileOpenName("选择文件",ls_filename,ls_path,
下载地址
用户评论
