如何对Text输入框内的VB代码进行排版，注意不是在编辑器中排版

写编译器？

不需要编译成程序，只是将代码排版，就像CloudMoonFormatCode.dll，不过CloudMoonFormatCode.dll好像只能在VB6编译器里运行，我想要我的程序的Text1运行

[此贴子已经被作者于2018-7-11 11:41编辑过]

关键字要着色吗？
需要自动处理缩进吗？
需要 关键字 自动大写吗？

需要 知道富文本框的知识。

一、预处理：
读所有的内容，搜索运算符，然后在去处符前面各加空格。
搜索所有的双空格，替换成单空格。
二、缩进
分解成每一行。去掉每一行的前导空格
   循环开始
      如果缩进层次不为零，加上前导空格。
   搜索每一行的 开关关键字，
      如果属于 结构开始代码，标识下一行缩进层次。
      如果属于 结构结束代码，标识下一行退回缩进层次。
    循环结束
组成成内容，放入文本框。
三、着色
分解每一行，得到每一个字段的内容，判断属于：1关键字，2变量，3常量，4运算符
在总文本中，计算位置、长度，选定， 发现是关键字的，修改为大写，然后 粘贴进去。
按 分类设置颜色。