调用统计字数js此功能由精易网页调试助手生成代码,配合精易模块使用。
常量数据表
1
2
|
.版本 2 .常量 字数统计js, "<文本长度: 269>" |
统计文本字数的代码
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
.版本 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库 () 返回 (到整数 (结果)) |
运行结果:
总结
以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对服务器之家的支持。如果你想了解更多相关内容请查看下面相关链接