查看: 3208|回复: 8
文本分割问题，将一串数字或者字母分割成数组。
阅读权限30
在线时间 小时
结帖率： (7/9)
比如我又一串数字和字母的混合的段“1as32d1f5s6f”
我想将这些数字和字母放到一个文本型的动态数组中，我不能确认有多少数字和字母.
要的结果就是
文本数组[1]=1
文本数组[2]=a
文本数组[3]=s
文本数组[4]=3
.支持库 spec
.子程序 子程序1
.局部变量 str, 文本型
.局部变量 strsz, 文本型, , "0"
.局部变量 i, 整数型
str ＝ “1as32d1f5s6f”
.计次循环首 (取文本长度 (str), i)
加入成员 (strsz, 取文本中间 (str, i, 1))
.计次循环尾 ()
调试输出 (strsz)
回答提醒：如果本帖被关闭无法回复，您有更好的答案帮助楼主解决，请发表至
可获得加分喔。友情提醒：本版被采纳的主题可在
帖子申请荣誉值，获得 1点 荣誉值,荣誉值可兑换终身vip用户组哦。快捷通道： →
阅读权限165
在线时间 小时
签到天数: 26 天结帖率： (4/4)
&&子程序1&&str文本型&&strsz文本型&0i整数型&&str ＝ “1as32d1f5s6f”计次循环首 (取文本长度 (str), i)加入成员 (strsz, 取文本中间 (str, i, 1))计次循环尾 ()调试输出 (strsz)spec特殊功能支持库
.版本 2
.支持库 spec
.子程序 子程序1
.局部变量 str, 文本型
.局部变量 strsz, 文本型, , &0&
.局部变量 i, 整数型
str ＝ “1as32d1f5s6f”
.计次循环首 (取文本长度 (str), i)
& & 加入成员 (strsz, 取文本中间 (str, i, 1))
.计次循环尾 ()
调试输出 (strsz)
热心帮助他人，荣誉+1，希望继续努力(*^__^*) 嘻嘻!
您可以选择打赏方式支持他
阅读权限50
在线时间 小时
签到天数: 7 天结帖率： (1/1)
你的意思是不是& &每个字符 就一个数组？
您可以选择打赏方式支持他
阅读权限30
在线时间 小时
结帖率： (7/9)
不知道咋实现啊，新人求助啊
您可以选择打赏方式支持他
阅读权限90
在线时间 小时
签到天数: 24 天结帖率： (11/11)
&&aaa整数型&&bbb文本型&&ccc文本型&0计次循环首 (取文本长度 (编辑框1.内容), aaa)bbb ＝ 取文本中间 (编辑框1.内容, aaa, 1)加入成员 (ccc, bbb)计次循环尾 ()输出调试文本 (取数组成员数 (ccc)).版本 2
.局部变量 aaa, 整数型
.局部变量 bbb, 文本型
.局部变量 ccc, 文本型, , &0&
.计次循环首 (取文本长度 (编辑框1.内容), aaa)
bbb ＝ 取文本中间 (编辑框1.内容, aaa, 1)
加入成员 (ccc, bbb)
.计次循环尾 ()
输出调试文本 (取数组成员数 (ccc))
您可以选择打赏方式支持他
阅读权限50
在线时间 小时
签到天数: 7 天结帖率： (1/1)
.支持库 spec
.程序集变量 sz, 文本型, , &0&
.程序集变量 nr, 文本型
.子程序 __启动窗口_创建完毕
.局部变量 i, 整数型
.计次循环首 (20, i)
& & .如果 (i ％ 2 ＝ 0)
& && &&&nr ＝ nr ＋ 到文本 (取随机数 (0, 9))
& && &&&nr ＝ nr ＋ 字符 (取随机数 (97, 122))
& & .如果结束
.计次循环尾 ()
调试输出 (nr)
.子程序 _按钮1_被单击
.局部变量 i, 整数型
.计次循环首 (取文本长度 (nr), i)
& & 加入成员 (sz, 取文本中间 (nr, i, 1))
.计次循环尾 ()
调试输出 (sz)
您可以选择打赏方式支持他
阅读权限30
在线时间 小时
结帖率： (7/9)
你的意思是不是& &每个字符 就一个数组？
不是的，是全在一个数组里边
您可以选择打赏方式支持他
阅读权限90
在线时间 小时
签到天数: 10 天结帖率： (115/115)
(144.33 KB, 下载次数: 54)
11:03 上传
点击文件名下载附件
用到了精易模块
您可以选择打赏方式支持他
阅读权限30
在线时间 小时
结帖率： (7/9)
[e=1].版本 2
.支持库 spec
好快啊，就是你了
您可以选择打赏方式支持他
精易论坛 - 有你更精彩 /1
<span style="color: #FF.4.27 20:00开课，开课前仍是1998优惠价，错过这一次就要再等半年再开课了。
用易语言接单、做项目、找工作、创业，不是梦！
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论，本站内容均为会员发表，并不代表精易立场!
揭阳精易科技有限公司申明:我公司所有的培训课程版权归精易所有，任何人以任何方式翻录、盗版、破解本站培训课程，我们必将通过法律途径解决！
公司简介：揭阳市揭东区精易科技有限公司致力于易语言教学培训/易语言学习交流社区的建设与软件开发，多年来为中小企业编写过许许多多各式软件，并把多年积累的开发经验逐步录制成视频课程供学员学习，让学员全面系统化学习易语言编程，少走弯路，减少对相关技术的研究与摸索时间，从而加快了学习进度！
防范网络诈骗，远离网络犯罪
违法和不良信息举报电话，企业QQ： ，邮箱：@
Powered by
粤公网安备 25查看: 836|回复: 6
取数组成员数
阅读权限10
在线时间 小时
结帖率： (2/2)
如图,编辑框1里面如果是3组数的话就不会出错,可是如果是2组数的话就会提示出错(如图),我要的是如果编辑框1里面没有固定的,可能是1组数,也可能是2组或3组数,请大家帮帮我,望提供源码,谢谢.
&&_按钮1_被单击&&i文本型&3如果 (编辑框1.内容 ≠ “”)i ＝ 分割文本 (编辑框1.内容, #换行符, 3)i [1] ＝ “”i [2] ＝ “”i [3] ＝ “”编辑框2.内容 ＝ i [1]编辑框3.内容 ＝ i [2]编辑框4.内容 ＝ i [3].版本 2
.子程序 _按钮1_被单击
.局部变量 i, 文本型, , &3&
.如果 (编辑框1.内容 ≠ “”)
& & i ＝ 分割文本 (编辑框1.内容, #换行符, 3)
& & i [1] ＝ “”
& & i [2] ＝ “”
& & i [3] ＝ “”
编辑框2.内容 ＝ i [1]
编辑框3.内容 ＝ i [2]
编辑框4.内容 ＝ i [3]
补充内容 ( 00:53):
如果真（取数组成员数（i）>= 1）
编辑框2.内容 ＝ i [1]
如果真（取数组成员数（i）>= 2）
编辑框3.内容 ＝ i [2]
如果真（取数组成员数（i）>= 3）
编辑框4.内容 ＝ i [3]
是大于等于，上面写错了
回答提醒：如果本帖被关闭无法回复，您有更好的答案帮助楼主解决，请发表至
可获得加分喔。友情提醒：本版被采纳的主题可在
帖子申请荣誉值，获得 1点 荣誉值,荣誉值可兑换终身vip用户组哦。快捷通道： →
阅读权限120
在线时间 小时
签到天数: 21 天结帖率： (11/11)
如果真（取数组成员数（i）&= 1）
编辑框2.内容 ＝ i [1]
如果真（取数组成员数（i）&= 2）
编辑框3.内容 ＝ i [2]
如果真（取数组成员数（i）&= 3）
编辑框4.内容 ＝ i [3]
是大于等于，上面写错了
热心帮助他人，荣誉+1，希望继续努力(*^__^*) 嘻嘻!
您可以选择打赏方式支持他
阅读权限165
在线时间 小时
取数组成员数，根据成员数的多少再判断是不是要加入编辑框
您可以选择打赏方式支持他
阅读权限120
在线时间 小时
签到天数: 21 天结帖率： (11/11)
如果真（取数组成员数（i）=1）
编辑框2.内容 ＝ i [1]
如果真（取数组成员数（i）=2）
编辑框3.内容 ＝ i [2]
如果真（取数组成员数（i）=3）
编辑框4.内容 ＝ i [3]
赋值前判断下，这样就不会报错了
您可以选择打赏方式支持他
在线时间 小时
头像被屏蔽
结帖率： (16/16)
先把 编辑框1.内容&&分割成数组&&然后计次循环首（取数组成员数（i））& &&&编辑框2.内容=i[计次-1]
您可以选择打赏方式支持他
阅读权限90
在线时间 小时
签到天数: 25 天结帖率： (53/61)
取数组成员然后计次循环即可
您可以选择打赏方式支持他
阅读权限70
在线时间 小时
结帖率： (1/1)
&&_按钮1_被单击&&i文本型&0编辑框数组编辑框&3编辑框数组 [1] ＝ 编辑框1编辑框数组[2]=编辑框2编辑框数组[3]=编辑框3如果真 (编辑框1.内容 ≠ “”)i ＝ 分割文本 (编辑框1.内容, #换行符, )计次循环首 (取数组成员数 (i), a)编辑框数组 [a] ＝ i [a]如果真 (a ＝ 3)跳出循环 ()计次循环尾 ().版本 2
.子程序 _按钮1_被单击
.局部变量 i, 文本型, , &0&
.局部变量 编辑框数组, 编辑框, , &3&
编辑框数组 [1] ＝ 编辑框1
编辑框数组[2]=编辑框2
编辑框数组[3]=编辑框3
.如果真 (编辑框1.内容 ≠ “”)
& & i ＝ 分割文本 (编辑框1.内容, #换行符, )
& & .计次循环首 (取数组成员数 (i), a)
& && &&&编辑框数组 [a] ＝ i [a]
& && &&&.如果真 (a ＝ 3)
& && && && &跳出循环 ()
& && &&&.如果真结束
& & .计次循环尾 ()
您可以选择打赏方式支持他
精易论坛 - 有你更精彩 /1
<span style="color: #FF.4.27 20:00开课，开课前仍是1998优惠价，错过这一次就要再等半年再开课了。
用易语言接单、做项目、找工作、创业，不是梦！
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论，本站内容均为会员发表，并不代表精易立场!
揭阳精易科技有限公司申明:我公司所有的培训课程版权归精易所有，任何人以任何方式翻录、盗版、破解本站培训课程，我们必将通过法律途径解决！
公司简介：揭阳市揭东区精易科技有限公司致力于易语言教学培训/易语言学习交流社区的建设与软件开发，多年来为中小企业编写过许许多多各式软件，并把多年积累的开发经验逐步录制成视频课程供学员学习，让学员全面系统化学习易语言编程，少走弯路，减少对相关技术的研究与摸索时间，从而加快了学习进度！
防范网络诈骗，远离网络犯罪
违法和不良信息举报电话，企业QQ： ，邮箱：@
Powered by
粤公网安备 25[求助]麻烦帮我改一下代码。这个功能我自己研究了一天多了还是没搞定！|易语言零起点 - 易语言俱乐部 - Powered by phpwind
查看完整版本: [--
[求助]麻烦帮我改一下代码。这个功能我自己研究了一天多了还是没搞定！
&附上源码:（已经重新上传了）[attachment=64470]麻烦高手或者懂的人帮我修改一下程序功能说明：利用选择列表框。动态添加项目比如添加一个项目叫名:易语言。同时也添加了该项目名称的路径。只要双击项目即可启动。添加项目后同时写入配置文件。下次启动的时候直接读取配置文件。请易友们有空的时候帮个忙写一个源码给我一下。在这里先谢过了！这个问题我搞了很多了都学没搞懂！麻烦高手或者懂的人帮我修改一下[此贴子已经被作者于 0:19:45编辑过]
.版本 2.局部变量 a, 文本型.局部变量 b, 文本型, , "0".局部变量 c, 整数型a ＝ 读配置项 (“配置文件名”, “节名”, “配置项名”, )b ＝ 分割文本 (a, “@”, ).计次循环首 (取数组成员数 (b), c)&&& 选择列表框1.加入项目 (b [c], ).计次循环尾 ().子程序 _按钮3_被单击运行 (选择列表框1.取项目文本 (选择列表框1.现行选中项), 假, )
只是个提纲另:你发的那个不叫源码
[attachment=64470]谢谢易友。我重新上传了。我想要的功能是这样的。利用选择列表框。动态添加项目比如添加一个项目叫名:易语言。同时也添加了该项目名称的路径。只要双击项目即可启动。添加项目后同时写入配置文件。下次启动的时候直接读取配置文件。请易友们有空的时候帮个忙写一个源码给我一下。在这里先谢过了！这个问题我搞了很多了都学没搞懂！
你这样做的结果：1、配置文件里始终只有最后一个程序名及程序位置；2、根本运行不了文件，因为你列表框中是程序名，不是路径；3、用运行命令，只对可执行文件有效。建议：不用配置文件，考虑用数据库方便些。因为如果用配置文件，你得把程序名和程序路径用符号连起来，加在一个项中，然后分割取出。麻烦些哦！[em01]&简易例程如下：（采用的配置文件，时间关系，只取了文件路径。如果要取文件名，则在写配置文件时用另外一个符号相加，读取时再次进行文本分割）[attachment=64480][此贴子已经被作者于 8:32:56编辑过]
以下是引用jglxxwangdong在 7:35:00的发言：你这样做的结果：1、配置文件里始终只有最后一个程序名及程序位置；2、根本运行不了文件，因为你列表框中是程序名，不是路径；3、用运行命令，只对可执行文件有效。建议：不用配置文件，考虑用数据库方便些。因为如果用配置文件，你得把程序名和程序路径用符号连起来，加在一个项中，然后分割取出。麻烦些哦！[em01]&简易例程如下：（采用的配置文件，时间关系，只取了文件路径。如果要取文件名，则在写配置文件时用另外一个符号相加，读取时再次进行文本分割）[attachment=64480]& 谢谢jglxxwangdong大哥的热心帮助！[em01]&简易例程如下：（采用的配置文件，时间关系，只取了文件路径。如果要取文件名，则在写配置文件时用另外一个符号相加，读取时再次进行文本分割）[em17][em17][em17]不知道能否写一份我上面说的功能给我了？如果只取路径名感觉比较乱。！网上也有类似的软件。一个项目一个名称，双击即可运行！&[em17][em17][em17]
以下是引用我的天空在 11:01:00的发言：& 谢谢jglxxwangdong大哥的热心帮助！[em01]&简易例程如下：（采用的配置文件，时间关系，只取了文件路径。如果要取文件名，则在写配置文件时用另外一个符号相加，读取时再次进行文本分割）[em17][em17][em17]不知道能否写一份我上面说的功能给我了？如果只取路径名感觉比较乱。！网上也有类似的软件。一个项目一个名称，双击即可运行！& [em17][em17][em17]搞定，查收：[attachment=64532]&[em07][em07][em07][em07][em07]
查看完整版本: [--
Powered by
Gzip enabled查看: 4216|回复: 15
【已解决】易语言数组成员问题，求助大牛！
阅读权限30
本帖最后由 不倒翁先生 于
16:11 编辑
QQ截图54.jpg (10.46 KB, 下载次数: 3)
15:50 上传
QQ截图26.jpg (62.39 KB, 下载次数: 3)
15:59 上传
.支持库 spec
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 进程ID, 整数型
.局部变量 DR进程ID, 整数型
.局部变量 线程信息, 线程信息型2, , &0&
.局部变量 计次, 整数型
.局部变量 线程模块名, 文本型
.局部变量 线程ID, 整数型
.局部变量 线程句柄, 整数型
进程_提升权限D2 ()&&' 提升权限否则无法对程序操作
进程ID ＝ 进程_取ID (“DrClient.exe”)&&' 获取进程ID
调试输出 (进程ID)
.如果真 (进程ID ＝ -1)&&' 判断是否存在
& & ' 只有在客户端存在的时候在执行以下代码
& & 信息框 (“请先登录Drcom并登陆!”, 0, )
& & 返回 ()
.如果真结束
DR进程ID ＝ 进程_取ID (“DrClient.exe”)&&' 获取进程ID
枚举线程2 (DR进程ID, 线程信息)&&' 查看的线程
线程模块名 ＝ 线程信息 [计次].线程模块&&' 查看线程模块的名字
.如果真 (寻找文本 (线程模块名, “ntdll.dll”, , 真) ≠ -1)&&' 判断是否找到的模块
& & ' 如果找到了模块就执行以下代码
& & 线程ID ＝ 线程信息 [计次].线程ID&&' 获取的线程ID
& & 线程句柄 ＝ 线程_打开线程 (线程ID)&&' 获取的线程句柄
& & 线程_暂停线程 (线程句柄)&&' 暂停掉
& & 调试输出 (线程ID)
.如果真结束
' 只会在没有找到模块就执行以下代码
信息框 (“请先登录Drcom并登陆!”, 0, )
信息框 (“共享限制已被解除！”, 0, )
按钮事件1点击了会提示这个数组的错误，找了很久没有找到问题！
还请指导！万分感谢~
扣扣牛我知道你E语言厉害 快帮帮我~
。。。好吧，其实我也看不下去了。。&
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限35
...这是什么东西啊
你竟然换头像了！
我早就看佐助不爽了！&
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
头像被屏蔽
提示: 作者被禁止或删除 内容自动屏蔽
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限30
吾爱扣扣 发表于
...这是什么东西啊
诶呀，我的校园网一个小小的限制~&&快帮我看看问题..你是易语言大牛 你要以身作则~！
。。。真机智。。&
我彩笔。。。&
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限35
不倒翁先生 发表于
诶呀，我的校园网一个小小的限制~&&快帮我看看问题..你是易语言大牛 你要以身作则~！
1.jpg (17.21 KB, 下载次数: 3)
16:06 上传
可以用的啊。。
我知道我的问题了 ，360没关，静态编译虽然成功但是有影响 我真是太聪明了！&
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限30
吾爱扣扣 发表于
可以用的啊。。
我就说真是奇怪了，半年前写的一直没问题&&今天打开就出了问题！..
擦。。解决了？&
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限35
夜的静night 发表于
大大&&是不是“计次”忘记赋值了啊&&不复制的话&&”计次=0“易语言的下标最少是“1”吧
不清楚&&等大牛
我写了个模拟器，的确是计次的问题，但不知道你这个计次用来干嘛，既没有用计次循环，也没赋初值！
3.jpg (32.79 KB, 下载次数: 0)
16:12 上传
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限25
不倒翁先生 发表于
我就说真是奇怪了，半年前写的一直没问题&&今天打开就出了问题！..
那到底是什么问题啊
怎么解决啊
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限25
大概就是找到进程里面的ntdll模块吧，个人感觉，用C++写比较简单，易语言写有点复杂了
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
阅读权限30
Victory.ms 发表于
大概就是找到进程里面的ntdll模块吧，个人感觉，用C++写比较简单，易语言写有点复杂了
不会C++ 还望大牛给一段例程~
发帖求助前要善用【】功能，那里可能会有你要找的答案；如果你在论坛求助问题，并且已经从坛友或者管理的回复中解决了问题，请把帖子标题加上【已解决】；如何回报帮助你解决问题的坛友，一个好办法就是给对方加【热心】和【CB】，加分不会扣除自己的积分，做一个热心并受欢迎的人！
免责声明：吾爱破解所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的；不得将上述内容用于商业或者非法用途，否则，一切后果请用户自负。本站信息来自网络，版权争议与本站无关。您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容。如果您喜欢该程序，请支持正版软件，购买注册，得到更好的正版服务。
( 京ICP备号 | 京公网安备 87号 )
Powered by Discuz!
Comsenz Inc.