拉出3个大的编辑框 和一个按钮1
-----------------------------------------
.版本 2
.子程序 _按钮1_被单击, , , 蜀黍撸炮不频繁-检测2个编辑框里的不同处显示在3
.局部变量 B1长度, 整数型
.局部变量 B2长度, 整数型
.局部变量 容器1, 整数型
.局部变量 最终文本记录1, 文本型
.局部变量 最终文本记录2, 文本型, , , B1
.局部变量 最终文本记录3, 文本型, , , B2
.局部变量 最终文本记录4, 文本型, , , 相同文本
.局部变量 B1, 文本型
.局部变量 B2, 文本型
B1长度 ＝ 取文本长度 (编辑框1.内容)
B2长度 ＝ 取文本长度 (编辑框2.内容)
.如果 (B2长度 ≥ B1长度)
.计次循环首 (B1长度, 容器1) ' B1
B1 ＝ 取文本中间 (编辑框1.内容, 容器1, 1)
B2 ＝ 取文本中间 (编辑框2.内容, 容器1, 1)
.如果 (B1 ＝ B2)
最终文本记录1 ＝ 最终文本记录1 ＋ “-” ' 一样的
最终文本记录2 ＝ 最终文本记录2 ＋ “-”
最终文本记录3 ＝ 最终文本记录3 ＋ “-”
最终文本记录4 ＝ 最终文本记录4 ＋ B1
.否则
最终文本记录1 ＝ 最终文本记录1 ＋ “*” ' 不一样的
最终文本记录2 ＝ 最终文本记录2 ＋ B1
最终文本记录3 ＝ 最终文本记录3 ＋ B2
最终文本记录4 ＝ 最终文本记录4 ＋ “*”
.如果结束
.计次循环尾 ()
最终文本记录3 ＝ 最终文本记录3 ＋ 取文本右边肢山 (编辑框2.内容, B2长度 － B1长度)
最终文本记录1 ＝ 最终文本记录1 ＋ 取重复文本 (B2长度 － B1长度, “*”)
最终文本记录4 ＝ 最终文本记录4 ＋ 取重复文本 (B2长度 － B1长度, “*”)
.否则
.计次循环首 (B2长度, 容器1) ' B2
B1 ＝ 取文本中间 (编辑框1.内容, 容器1, 1)
B2 ＝ 取文本中间 (编辑框2.内容, 容器1, 1)
.如果 (B1 ＝ B2)
最终文本记录1 ＝ 最终文本记录1 ＋ “-” ' 一样的
最终文本记录2 ＝ 最终文本记录2 ＋ “-”
最终文本记录3 ＝ 最终文本记录3 ＋ “-”
最终文本记录4 ＝ 最终文本记录4 ＋ B1
.否则
最终文本记录1 ＝ 最终文本记录1 ＋ “*” ' 不一样的
最终文本记录2 ＝ 最终文本记录2 ＋ B1
最终文本记录3 ＝ 最终文本记录3 ＋ B2
历余中 最终文本记录4 ＝ 最终文本记录4 ＋ “*”
.如果结束毁氏
.计次循环尾 ()
最终文本记录3 ＝ 最终文本记录3 ＋ 取文本右边 (编辑框1.内容, B1长度 － B2长度)
最终文本记录1 ＝ 最终文本记录1 ＋ 取重复文本 (B1长度 － B2长度, “*”)
最终文本记录4 ＝ 最终文本记录4 ＋ 取重复文本 (B1长度 － B2长度, “*”)
.如果结束
编辑框3.是否允许多行 ＝ 真
编辑框3.滚动条 ＝ 3
编辑框3.内容 ＝ “不同位置显示 : ” ＋ 最终文本记录1 ＋ #换行符 ＋ “编辑框1不同处: ” ＋ 最终文本记录2 ＋ #换行符 ＋ “编辑框2不同处: ” ＋ 最终文本记录3 ＋ #换行符 ＋ “2编辑框相同处: ” ＋ 最终文本记录4
就这样了 不难 多实践就行 饿少了一个 算了你自己解决吧 就是计算有几个不一样的字 你就在相应的判断里面写个 整数变量=整数变量+1