多个数相同怎么找出来？高手帮帮忙！必采纳

fsfsgdg

比如有5个随机数，15342， 我怎么找出123？
还有545466，我又怎么找出2个55，2个4？  3个5又怎么找出？
必采纳

cjxdn

fsfsgdg 发表于 2017-7-29 22:25
找到了，但是只能找到一个，，123就找不到了，还要分割出来再查找就会，但是这样要很长的代码 ...

1. //变量 内容=辅助.随机数(0,9)&辅助.随机数(0,9)&辅助.随机数(0,9)&辅助.随机数(0,9)&辅助.随机数(0,9)
   
2.     变量 内容="55512"
   
3.    
   
4.     变量 源串="1|2|3|55|44|555",分隔符="|",返回值,字符总数
   
5.     变量 是否成功=字符串.分割(源串,分隔符,返回值)
   
6.     数组空间.大小(返回值,字符总数)
   
7.     如果(是否成功==-1)//分割成功
   
8.         遍历(i = 0; i < 字符总数; i++)
   
9.             如果(字符串.查找字符串(内容,返回值[i])!=-1)
   
10.                 调试输出("原内容  "&内容&"  找到字符  "&返回值[i])//找到字符
    
11.             如果结束
    
12.         遍历结束
    
13.     如果结束

复制代码

cjxdn

字符串查找("cOandroIdcamera","and")
这个不行?

fsfsgdg

cjxdn 发表于 2017-7-29 16:23
字符串查找("cOandroIdcamera","and")
这个不行?

行呀！但是我不会，老是出错

cjxdn

fsfsgdg 发表于 2017-7-29 17:00
行呀！但是我不会，老是出错

1. //变量 内容=随机数(0,9)&随机数(0,9)&随机数(0,9)&随机数(0,9)&随机数(0,9)
   
2.     变量 内容="55512"
   
3.     变量 查找字符=数组("1","2","3","55","44","555")
   
4.     遍历(变量 i = 0; i < 数组大小(查找字符); i++)
   
5.         如果(字符串查找(内容,查找字符[i])!=-1)
   
6.             调试输出("原内容  "&内容&"  找到字符  "&查找字符[i])
   
7.         结束
   
8.     结束

复制代码

fsfsgdg

cjxdn 发表于 2017-7-29 17:16

可以给4.0的代码吗

cjxdn

如果(字符串.查找字符串("15342","1")!=-1)
      调试输出("找到了")
如果结束

fsfsgdg

cjxdn 发表于 2017-7-29 20:35
如果(字符串.查找字符串("15342","1")!=-1)
      调试输出("找到了")
如果结束

找到了，但是只能找到一个，，123就找不到了，还要分割出来再查找就会，但是这样要很长的代码

fsfsgdg

cjxdn 发表于 2017-7-31 12:30

//变量 内容=辅助.随机数(0,9)&辅助.随机数(0,9)&辅助.随机数(0,9)&辅助.随机数(0,9)&辅助.随机数(0,9)
    变量 内容="54512"
   
    变量 源串="1|2|3|55|44|554",分隔符="|",返回值,字符总数
    变量 是否成功=字符串.分割(源串,分隔符,返回值)
    数组空间.大小(返回值,字符总数)
    如果(是否成功==-1)//分割成功
        遍历(i = 0; i < 字符总数; i++)
            如果(字符串.查找字符串(内容,返回值)!=-1)
                调试输出("原内容  "&内容&"  找到字符  "&返回值)//找到字符
            如果结束
        遍历结束
    如果结束
改为找554，就找不到了。。。真是辛苦哥了，虽然不理想，但是都要谢谢下

输出>>"原内容  54512  找到字符  1"          行号:36 文件:d:\tc综合开发工具\学数组\学数组\学数组.t
输出>>"原内容  54512  找到字符  2"          行号:36 文件:d:\tc综合开发工具\学数组\学数组\学数组.t

cjxdn

你"54512"
里根本就不存在554的连体字符
你要找单个就改为
""5|4""