.版本 2.常量 字數統計js, "<文本長度: 269>"

.版本 2.支持庫 spec.程序集 窗口程序集_啟動窗口.子程序 文本_字數統計, 整數型, 公開, 用word方式計算正文字數,返回文本字數,漢字算一個,單詞算一個,換行符和空格不算..參數 文本, 文本型, , 需要統計的文本.局部變量 c, 整數型.局部變量 n, 整數型.局部變量 z, 整數型.局部變量 返回文本, 文本型.局部變量 臨時字節集, 字節集.局部變量 i, 整數型.局部變量 跳, 邏輯型臨時字節集 ＝ 到字節集 (文本)c ＝ 取字節集長度 (臨時字節集)n ＝ 1.判斷循環首 (n ≤ c)  .如果 (n ＋ 1 ＞ c)    z ＝ 1  .否則    .如果 (臨時字節集 [n] ＞ 128)      z ＝ 2      i ＝ i ＋ 1      跳 ＝ 假    .否則      .如果 (臨時字節集 [n] ≠ 13)        z ＝ 1        .如果 (臨時字節集 [n] ＝ 32)          跳 ＝ 假        .否則          .如果真 (跳 ＝ 假)            i ＝ i ＋ 1          .如果真結束          跳 ＝ 真        .如果結束      .否則        .如果 (臨時字節集 [n ＋ 1] ＝ 10)          z ＝ 2        .否則          z ＝ 1        .如果結束        跳 ＝ 假      .如果結束    .如果結束  .如果結束  n ＝ n ＋ z.判斷循環尾 ()返回 (i).子程序 _統計按鈕_被單擊調試輸出 (“開始”)線程_啟動 (&子程序2, , )線程_啟動 (&子程序1, , ).子程序 子程序1.局部變量 t, 整數型.局部變量 i, 整數型.局部變量 d, 整數型.局部變量 內容, 文本型t ＝ 取啟動時間 ()內容 ＝ 編輯框1.內容.計次循環首 (100, i)  d ＝ 文本_字數統計 (內容).計次循環尾 ()t ＝ 取啟動時間 () － t調試輸出 (2, t, d)總字數標簽.標題 ＝ 到文本 (d).子程序 子程序2.局部變量 t, 整數型.局部變量 i, 整數型.局部變量 d, 整數型.局部變量 內容, 文本型t ＝ 取啟動時間 ()內容 ＝ 編輯框1.內容.計次循環首 (100, i)  d ＝ 字數統計js (內容).計次循環尾 ()t ＝ 取啟動時間 () － t調試輸出 (1, t, d).子程序 字數統計js, 整數型, , 此代碼由精易網頁調試助手生成代碼，配合精易模塊使用。.參數 文本, 文本型.局部變量 結果, 文本型線程_初始化COM庫 ()結果 ＝ 編碼_運行JS代碼 (#字數統計js, “fnGetCpmisWords”, 文本, , , )線程_取消COM庫 ()返回 (到整數 (結果))