编辑框里不能连续出现运算符

概率尽头

新人问，这个还有其他更简单的方法吗？


补充内容 (2020-1-18 22:17):
用模块就算了

Cplusplus

1. .版本 2
   
2. 
   
3. .子程序 _编辑框1_字符输入, 整数型
   
4. .参数 字符代码, 整数型
   
5. .局部变量 光标位置, 整数型
   
6. .局部变量 选择字符数, 整数型
   
7. .局部变量 原文本, 文本型
   
8. .局部变量 文本1, 文本型
   
9. .局部变量 文本2, 文本型
   
10. 
    
11. 光标位置 ＝ 编辑框1.起始选择位置
    
12. 选择字符数 ＝ 编辑框1.被选择字符数
    
13. 原文本 ＝ 编辑框1.内容
    
14. 文本1 ＝ 取文本左边 (原文本, 编辑框1.起始选择位置)
    
15. 文本2 ＝ 取文本右边 (原文本, 取文本长度 (原文本) － 光标位置 － 选择字符数)
    
16. .如果真 (字符代码 ＝ 8)
    
17.     .如果真 (是否是符号 (取文本右边 (文本1, 1)) 且 是否是符号 (取文本左边 (文本2, 1)))
    
18.         返回 (0)
    
19.     .如果真结束
    
20. 
    
21. .如果真结束
    
22. .如果真 (字符代码 ＝ 取代码 (“+”, 1) 或 字符代码 ＝ 取代码 (“-”, 1) 或 字符代码 ＝ 取代码 (“*”, 1) 或 字符代码 ＝ 取代码 (“/”, 1))
    
23.     .如果真 (是否是符号 (取文本右边 (文本1, 1)) 或 是否是符号 (取文本左边 (文本2, 1)))
    
24.         返回 (0)
    
25.     .如果真结束
    
26. 
    
27. .如果真结束
    
28. 
    
29. 
    
30. .子程序 是否是符号, 逻辑型
    
31. .参数 文本, 文本型
    
32. .局部变量 符号, 文本型
    
33. 
    
34. 符号 ＝ “+-*/”
    
35. 返回 (文本_寻找文本 (符号, 文本, , ) ＞ -1)
    

复制代码

无言对上

限制一个编辑框内只能有+-*/其中一个运算符？

概率尽头

无言对上 发表于 2020-1-17 09:44
限制一个编辑框内只能有+-*/其中一个运算符？

限制编辑框里》不能连续《出现运算符

概率尽头

此贴终结，我已经找到方法了

概率尽头

概率尽头 发表于 2020-1-17 13:52
此贴终结，我已经找到方法了

里面有个符号数组【a】这里要改为符号数组【小计次】

yangge0452

用正则吧，方便简单

概率尽头

yangge0452 发表于 2020-1-18 10:11
用正则吧，方便简单

兄弟，你用模块了吗？有些指令我没有诶。

Cplusplus

  

子程序名	返回值类型	公开	备 注
_编辑框1_字符输入	整数型
参数名	类 型	参考	可空	数组	备 注
字符代码	整数型

变量名	类 型	静态	数组	备 注
光标位置	整数型
选择字符数	整数型
原文本	文本型
文本1	文本型
文本2	文本型

光标位置 ＝ 编辑框1.起始选择位置
选择字符数 ＝ 编辑框1.被选择字符数
原文本 ＝ 编辑框1.内容
文本1 ＝ 取文本左边 (原文本, 编辑框1.起始选择位置)
文本2 ＝ 取文本右边 (原文本, 取文本长度 (原文本) － 光标位置 － 选择字符数)
如果真 (字符代码 ＝ 8)
如果真 (是否是符号 (取文本右边 (文本1, 1)) 且 是否是符号 (取文本左边 (文本2, 1)))
返回 (0)

如果真 (字符代码 ＝ 取代码 (“+”, 1) 或 字符代码 ＝ 取代码 (“-”, 1) 或 字符代码 ＝ 取代码 (“*”, 1) 或 字符代码 ＝ 取代码 (“/”, 1))
如果真 (是否是符号 (取文本右边 (文本1, 1)) 或 是否是符号 (取文本左边 (文本2, 1)))
返回 (0)

子程序名	返回值类型	公开	备 注
是否是符号	逻辑型
参数名	类 型	参考	可空	数组	备 注
文本	文本型

变量名	类 型	静态	数组	备 注
符号	文本型

符号 ＝ “+-*/”
返回 (文本_寻找文本 (符号, 文本, , ) ＞ -1)

.版本 2<br /> <br /> .子程序 _编辑框1_字符输入, 整数型<br /> .参数 字符代码, 整数型<br /> .局部变量 光标位置, 整数型<br /> .局部变量 选择字符数, 整数型<br /> .局部变量 原文本, 文本型<br /> .局部变量 文本1, 文本型<br /> .局部变量 文本2, 文本型<br /> <br /> 光标位置 ＝ 编辑框1.起始选择位置<br /> 选择字符数 ＝ 编辑框1.被选择字符数<br /> 原文本 ＝ 编辑框1.内容<br /> 文本1 ＝ 取文本左边 (原文本, 编辑框1.起始选择位置)<br /> 文本2 ＝ 取文本右边 (原文本, 取文本长度 (原文本) － 光标位置 － 选择字符数)<br /> .如果真 (字符代码 ＝ 8)<br />     .如果真 (是否是符号 (取文本右边 (文本1, 1)) 且 是否是符号 (取文本左边 (文本2, 1)))<br />         返回 (0)<br />     .如果真结束<br /> <br /> .如果真结束<br /> .如果真 (字符代码 ＝ 取代码 (“+”, 1) 或 字符代码 ＝ 取代码 (“-”, 1) 或 字符代码 ＝ 取代码 (“*”, 1) 或 字符代码 ＝ 取代码 (“/”, 1))<br />     .如果真 (是否是符号 (取文本右边 (文本1, 1)) 或 是否是符号 (取文本左边 (文本2, 1)))<br />         返回 (0)<br />     .如果真结束<br /> <br /> .如果真结束<br /> <br /> <br /> .子程序 是否是符号, 逻辑型<br /> .参数 文本, 文本型<br /> .局部变量 符号, 文本型<br /> <br /> 符号 ＝ “+-*/”<br /> 返回 (文本_寻找文本 (符号, 文本, , ) ＞ -1)

yangge0452

概率尽头 发表于 2020-1-18 22:12
兄弟，你用模块了吗？有些指令我没有诶。

这个没有模块的