調(diào)用統(tǒng)計字?jǐn)?shù)js此功能由精易網(wǎng)頁調(diào)試助手生成代碼,配合精易模塊使用。
常量數(shù)據(jù)表
.版本 2.常量 字?jǐn)?shù)統(tǒng)計js, "<文本長度: 269>"
統(tǒng)計文本字?jǐn)?shù)的代碼
.版本 2.支持庫 spec.程序集 窗口程序集_啟動窗口.子程序 文本_字?jǐn)?shù)統(tǒng)計, 整數(shù)型, 公開, 用word方式計算正文字?jǐn)?shù),返回文本字?jǐn)?shù),漢字算一個,單詞算一個,換行符和空格不算..參數(shù) 文本, 文本型, , 需要統(tǒng)計的文本.局部變量 c, 整數(shù)型.局部變量 n, 整數(shù)型.局部變量 z, 整數(shù)型.局部變量 返回文本, 文本型.局部變量 臨時字節(jié)集, 字節(jié)集.局部變量 i, 整數(shù)型.局部變量 跳, 邏輯型臨時字節(jié)集 = 到字節(jié)集 (文本)c = 取字節(jié)集長度 (臨時字節(jié)集)n = 1.判斷循環(huán)首 (n ≤ c) .如果 (n + 1 > c) z = 1 .否則 .如果 (臨時字節(jié)集 [n] > 128) z = 2 i = i + 1 跳 = 假 .否則 .如果 (臨時字節(jié)集 [n] ≠ 13) z = 1 .如果 (臨時字節(jié)集 [n] = 32) 跳 = 假 .否則 .如果真 (跳 = 假) i = i + 1 .如果真結(jié)束 跳 = 真 .如果結(jié)束 .否則 .如果 (臨時字節(jié)集 [n + 1] = 10) z = 2 .否則 z = 1 .如果結(jié)束 跳 = 假 .如果結(jié)束 .如果結(jié)束 .如果結(jié)束 n = n + z.判斷循環(huán)尾 ()返回 (i).子程序 _統(tǒng)計按鈕_被單擊調(diào)試輸出 (“開始”)線程_啟動 (&子程序2, , )線程_啟動 (&子程序1, , ).子程序 子程序1.局部變量 t, 整數(shù)型.局部變量 i, 整數(shù)型.局部變量 d, 整數(shù)型.局部變量 內(nèi)容, 文本型t = 取啟動時間 ()內(nèi)容 = 編輯框1.內(nèi)容.計次循環(huán)首 (100, i) d = 文本_字?jǐn)?shù)統(tǒng)計 (內(nèi)容).計次循環(huán)尾 ()t = 取啟動時間 () - t調(diào)試輸出 (2, t, d)總字?jǐn)?shù)標(biāo)簽.標(biāo)題 = 到文本 (d).子程序 子程序2.局部變量 t, 整數(shù)型.局部變量 i, 整數(shù)型.局部變量 d, 整數(shù)型.局部變量 內(nèi)容, 文本型t = 取啟動時間 ()內(nèi)容 = 編輯框1.內(nèi)容.計次循環(huán)首 (100, i) d = 字?jǐn)?shù)統(tǒng)計js (內(nèi)容).計次循環(huán)尾 ()t = 取啟動時間 () - t調(diào)試輸出 (1, t, d).子程序 字?jǐn)?shù)統(tǒng)計js, 整數(shù)型, , 此代碼由精易網(wǎng)頁調(diào)試助手生成代碼,配合精易模塊使用。.參數(shù) 文本, 文本型.局部變量 結(jié)果, 文本型線程_初始化COM庫 ()結(jié)果 = 編碼_運行JS代碼 (#字?jǐn)?shù)統(tǒng)計js, “fnGetCpmisWords”, 文本, , , )線程_取消COM庫 ()返回 (到整數(shù) (結(jié)果))
運行結(jié)果:
總結(jié)
以上就是這篇文章的全部內(nèi)容了,希望本文的內(nèi)容對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價值,謝謝大家對VeVb武林網(wǎng)的支持。
新聞熱點
疑難解答