红色突出显示上一单元格文本内容

易语言 2020-03-07 16:51:26

红色突出显示上一单元格文本内容

原内容 = 编辑框源文本.内容
行集 = 分割文本 (原内容, #换行符, )
调试输出 (取数组成员数 (行集))
.计次循环首 (取数组成员数 (行集), i)
.如果 (i % 2 = 0)
列集 = 分割文本 (行集 [i], 字符 (#Tab键), )
一行 = “”
.计次循环首 (取数组成员数 (列集), j)
列集 [j] = 子文本替换 (列集 [j], 上一格 [j], #常量红色头 + 上一格 [j] + #常量红色尾, , , 真)
一行 = 一行 + “” + 列集 [j] + “”
.计次循环尾 ()
结果 = 结果 + “” + 一行 + “” + #换行符
.否则
上一格 = 分割文本 (行集 [i], 字符 (#Tab键), )
行集 [i] = 子文本替换 (行集 [i], 字符 (#Tab键), “”, , , 真)
结果 = 结果 + “” + 行集 [i] + “” + #换行符
.如果结束

.计次循环尾 ()
结果 = #常量表头 + 结果 + #常量表尾