.版本 2.支持庫 RegEx.程序集 窗口程序集_啟動(dòng)窗口.子程序 _取中間文本按鈕_被單擊取中間文本編輯框.內(nèi)容 ＝ 取中間文本 (完整文本編輯框.內(nèi)容, “~”, 表達(dá)式編輯框.內(nèi)容, “~”, 到整數(shù) (下標(biāo)編輯框.內(nèi)容)).子程序 取中間文本, 文本型, , 返回匹配的文本 多個(gè)會(huì)以{1}{2}形式輸出.參數(shù) 原文本, 文本型.參數(shù) 左邊文本, 文本型.參數(shù) 中間文本類型, 文本型, 可空.參數(shù) 右邊文本, 文本型.參數(shù) 引用下標(biāo), 整數(shù)型, 可空.局部變量 正則, 正則表達(dá)式.局部變量 搜索結(jié)果, 搜索結(jié)果, , "0".局部變量 匹配結(jié)果, 文本型.局部變量 成員數(shù), 整數(shù)型.如果真 (中間文本類型 ＝ “”)  中間文本類型 ＝ “.*?”.如果真結(jié)束正則.創(chuàng)建 (“(?<=/Q” ＋ 左邊文本 ＋ “/E)(” ＋ 中間文本類型 ＋ “)(?=/Q” ＋ 右邊文本 ＋ “/E)”, ) ' 使用 /Q 開始，/E 結(jié)束，可使中間的標(biāo)點(diǎn)符號(hào)失去特殊意義，將中間的字符作為普通字符。搜索結(jié)果 ＝ 正則.搜索全部 (原文本)成員數(shù) ＝ 取數(shù)組成員數(shù) (搜索結(jié)果).如果真 (成員數(shù) ＝ 0)  返回 (“”).如果真結(jié)束.如果真 (成員數(shù) ＞ 0)  .如果 (成員數(shù) ＝ 1)    匹配結(jié)果 ＝ 搜索結(jié)果 [1].取匹配文本 (原文本, )    返回 (匹配結(jié)果)  .否則    .如果 (引用下標(biāo) ＞ 0 且 引用下標(biāo) ≤ 成員數(shù))      匹配結(jié)果 ＝ 搜索結(jié)果 [引用下標(biāo)].取子匹配文本 (原文本, 1, )    .否則      匹配結(jié)果 ＝ 正則.替換 (原文本, “(/{$&/})”, 1, , 假, 真)    .如果結(jié)束  .如果結(jié)束.如果真結(jié)束返回 (匹配結(jié)果)