1；分隔符，2；以分隔符为标签计算数量。

108937101 · 发表于 2019-10-16 10:15:16

Desktop.zip (17.06 KB, 下载次数: 4)

寒潮 · 发表于 2019-10-16 10:15:17

1.e (3.01 KB, 下载次数: 2)

列明 · 发表于 2019-10-16 10:24:08

分割得到的文本組=分割文本（待分割的文本，拿什麽分割）

分割文本命令操作系统支持：Windows、Linux 所属类别：文本操作

将指定文本进行分割，返回分割后的一维文本数组。

语法：文本型数组分割文本（待分割文本，［用作分割的文本］，［要返回的子文本数目］）

参数名描述
待分割文本必需的；文本型。如果参数值是一个长度为零的文本，则返回一个空数组，即没有任何成员的数组。
用作分割的文本可选的；文本型。参数值用于标识子文本边界。如果被省略，则默认使用半角逗号字符作为分隔符。如果是一个长度为零的文本，则返回的数组仅包含一个成员，即完整的“待分割文本”。
要返回的子文本数目可选的；整数型。如果被省略，则默认返回所有的子文本。

linqing4 · 发表于 2019-10-16 10:32:46

.版本 2

.子程序 _按钮1_被单击
.局部变量局_临时, 文本型
.局部变量局_分割, 文本型, , "0"

局_临时＝文本_替换 (编辑框1.内容, , , , “，”, “,”, , , , , , , , )
局_分割＝分割文本 (局_临时, “,”, )
编辑框2.内容＝到文本 (取数组成员数 (局_分割))

linqing4 · 发表于 2019-10-16 10:33:22

调用了精易模块

wlsk888 · 发表于 2019-10-16 10:41:51

.版本 2

.程序集窗口程序集_启动窗口

.子程序 _编辑框1_失去焦点
.局部变量逗号数量, 整数型

.如果真 (寻找文本 (编辑框1.内容, “,”, , 假) ＜ 1)
编辑框1.内容＝ “”
.如果真结束
编辑框2.内容＝到文本 (取逗号次数 (编辑框1.内容, “,”))

.子程序取逗号次数, 整数型
.参数原字符串, 文本型
.参数要统计字符串, 文本型
.局部变量 b, 整数型
.局部变量 a, 整数型

a ＝ 0
b ＝ 0
.判断循环首 (a ≠ -1)

a ＝寻找文本 (原字符串, 要统计字符串, a ＋ 1, 假)

b ＝ b ＋ 1

.判断循环尾 ()
返回 (b － 1)

108937101 · 发表于 2019-10-16 11:00:46

寒潮发表于 2019-10-16 10:33
补充内容 (2019-10-16 10:34):
[e=0].版本 2

计数是可以的，
但在编辑框1中有没有输入逗号时没有提示。我是想编辑框1中必须以逗号（作为分隔符）来要求输入分隔。

寒潮 · 发表于 2019-10-16 11:06:30

108937101 发表于 2019-10-16 11:00
计数是可以的，
但在编辑框1中有没有输入逗号时没有提示。我是想编辑框1中必须以逗号（作为分隔符）来要 ...

你说多少位进行分割啊？按回车后就自动按照会计计数，3位一分了。

		自动登录	找回密码
密码			注册

[已解决] 1；分隔符，2；以分隔符为标签计算数量。

最佳答案

评分