易语言实现删除引号内所有文本字符串的实现方法(引号外的不会被删除，支持单双引号)

QAQ

1. 
   
2. .版本 2
   
3. 
   
4. .程序集 程序集1
   
5. 
   
6. .子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码
   
7. 
   
8. 
   
9. _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
   
10. 返回 (0)  ' 可以根据您的需要返回任意数值
    
11. 
    
12. .子程序 _临时子程序
    
13. 
    
14. ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
    
15. 
    
16. 输出调试文本 (删引号内文本 (“'123' Hello World! '会被删除'不会被删除'单引号内的文本都会被删除'单引号外的文本不会被删除 'Hello World'” ＋ #引号 ＋ “双引号内的文本也不会被删除” ＋ #引号 ＋ “'456'”, 真))
    
17. 
    
18. .子程序 删引号内文本, 文本型, 公开, 删除引号内所有的文本(支持单双引号)
    
19. .参数 文本, 文本型, , 不支持转义符，必须对称使用否则会出错
    
20. .参数 单双引号, 逻辑型, 可空, 真为单引号，假为双引号
    
21. .局部变量 字节集, 字节集
    
22. .局部变量 字节数组, 字节型, , "0"
    
23. .局部变量 字节, 字节型
    
24. .局部变量 长度, 整数型
    
25. .局部变量 计数, 整数型
    
26. .局部变量 引号内, 逻辑型
    
27. .局部变量 引号字节, 字节型
    
28. .局部变量 删除长度, 整数型
    
29. .局部变量 删除起始位置, 整数型
    
30. .局部变量 添加空格, 逻辑型
    
31. .局部变量 删除位置表, 整数型, , "0"
    
32. .局部变量 删除长度表, 整数型, , "0"
    
33. 
    
34. 引号字节 ＝ 选择 (单双引号, 39, 34)
    
35. 引号内 ＝ 假
    
36. 字节集 ＝ 到字节集 (文本)
    
37. 字节集交换字节型数组 (字节集, 字节数组)
    
38. .如果真 (取文本右边 (文本, 1) ＝ 字符 (引号字节))
    
39.     加入成员 (字节数组, 32)
    
40.     添加空格 ＝ 真
    
41. .如果真结束
    
42. 长度 ＝ 取数组成员数 (字节数组)
    
43. .计次循环首 (长度, 计数)
    
44.     字节 ＝ 字节数组 [计数]
    
45.     .如果真 (字节 ＝ 引号字节)
    
46.         引号内 ＝ 取反 (引号内)
    
47.     .如果真结束
    
48.     .如果 (引号内 或 字节 ＝ 引号字节)
    
49.         .如果真 (删除起始位置 ＝ 0)
    
50.             删除起始位置 ＝ 计数
    
51.         .如果真结束
    
52.         删除长度 ＝ 删除长度 ＋ 1
    
53.     .否则
    
54.         .如果真 (删除长度 ≠ 0)
    
55.             加入成员 (删除位置表, 删除起始位置)
    
56.             加入成员 (删除长度表, 删除长度)
    
57.         .如果真结束
    
58.         删除长度 ＝ 0
    
59.         删除起始位置 ＝ 0
    
60.     .如果结束
    
61. 
    
62. .计次循环尾 ()
    
63. .变量循环首 (取数组成员数 (删除位置表), 1, -1, 计数)
    
64.     删除成员 (字节数组, 删除位置表 [计数], 删除长度表 [计数])
    
65. .变量循环尾 ()
    
66. .如果真 (添加空格)
    
67.     删除成员 (字节数组, 取数组成员数 (字节数组), 1)
    
68. .如果真结束
    
69. 返回 (到文本 (字节数组))
    
70. 
    
71. .子程序 字节集交换字节型数组
    
72. .参数 字节集, 字节集
    
73. .参数 字节数组, 字节型, 数组
    
74. 
    
75. 置入代码 ({ 96, 139, 69, 8, 139, 93, 12, 139, 8, 139, 19, 137, 16, 137, 11, 97 })
    
76. 
    

复制代码

1心1亿

6666

demon

唔，路过帮顶