计次循环首的用法

Lxt123

这个是我的代码。设置token是文本型的数组全局变量
我想让token 1 = 分割 1
token 2 = 分割 2
token 3 = 分割 3
这样写为啥执行的时候会强制关闭程序啊
小白一枚，求大神解答！！！！  

chenboss

1，先对token重定义数组
2，用加入成员（token,分割）
3，可以直接token=分割

补充内容 (2024-12-23 11:51):
4，如果用了多线程在对token读写，要加许可证

将来啊

楼上正解

阿素里戈沃里嘚

C:\Users\Huntkey\Desktop\捕获.JPG

阿素里戈沃里嘚

加上一行试试

走一回

可能问题出在延迟上，这个自带的指令极其吃内存的。换成精易的  程序_延时()   会好上很多的

白宝宝

写法问题

易股道

.版本 2

.子程序 _按钮1_被单击
.局部变量 Token内容, 文本型
.局部变量 分割, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 成员数, 整数型
.局部变量 Token, 文本型

分割 ＝ 分割文本 (编辑框1.内容, #换行符, )
成员数 ＝ 取数组成员数 (分割)
.如果 (成员数 ＞ 0)
    .计次循环首 (成员数, i)
        Token ＝ 分割 [i]
        信息框 (“成功取到Token” ＋ 到文本 (i) ＋ “: ” ＋ Token, 0, , )
        延时 (50)
    .计次循环尾 ()
.否则
    返回 ()
.如果结束

易股道

.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 Token内容, 文本型
.局部变量 分割, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 成员数, 整数型
.局部变量 Token, 文本型, , "0"

重定义数组 (Token, 假, )
分割 ＝ 分割文本 (编辑框1.内容, #换行符, )
成员数 ＝ 取数组成员数 (分割)
.如果 (成员数 ＞ 0)
    .计次循环首 (成员数, i)
        加入成员 (Token, 分割 [i])
        调试输出 (“成功取到Token” ＋ 到文本 (i) ＋ “: ” ＋ Token)
        延时 (50)
    .计次循环尾 ()
.否则
    返回 ()

易股道

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
Token内容	文本型
分割	文本型		0
i	整数型
成员数	整数型
Token	文本型		0

重定义数组 (Token, 假, )
分割 ＝ 分割文本 (编辑框1.内容, #换行符, )
成员数 ＝ 取数组成员数 (分割)
如果 (成员数 ＞ 0)
计次循环首 (成员数, i)
加入成员 (Token, 分割 [i])
调试输出 (“成功取到Token” ＋ 到文本 (i) ＋ “: ” ＋ Token)
延时 (50)
计次循环尾 ()
返回 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 Token内容, 文本型<br /> .局部变量 分割, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 成员数, 整数型<br /> .局部变量 Token, 文本型, , "0"<br /> <br /> 重定义数组 (Token, 假, )<br /> 分割 ＝ 分割文本 (编辑框1.内容, #换行符, )<br /> 成员数 ＝ 取数组成员数 (分割)<br /> .如果 (成员数 ＞ 0)<br />     .计次循环首 (成员数, i)<br />         加入成员 (Token, 分割 <i>)<br />         调试输出 (“成功取到Token” ＋ 到文本 (i) ＋ “: ” ＋ Token)<br />         延时 (50)<br />     .计次循环尾 ()<br /> .否则<br />     返回 ()