.版本 2 .子程序 HTM转UBB, 文本型 .参数 HTM, 文本型 .局部变量 对象, 对象 .局部变量 代码, 文本型 对象.创建 (“ScriptControl”, ) 对象.写属性 (“Language”, “javascript”) 对象.方法 (“AddCode”, 到文本 (#H2U)) 代码 ＝ 对象.通用方法 (“run”, “H2U”, HTM).取文本 () 对象.清除 () 返回 (代码) .子程序 UBB转HTM, 文本型 .参数 UBB, 文本型 .局部变量 对象, 对象 .局部变量 代码, 文本型 对象.创建 (“ScriptControl”, ) 对象.写属性 (“Language”, “javascript”) 对象.方法 (“AddCode”, 到文本 (#H2U)) 代码 ＝ 对象.通用方法 (“run”, “U2H”, UBB).取文本 () 对象.清除 () 返回 (代码) .子程序 _按钮1_被单击 编辑框2.内容 ＝ HTM转UBB (编辑框1.内容) .子程序 _按钮2_被单击 编辑框1.内容 ＝ UBB转HTM (编辑框2.内容)