取中間文本代碼
.版本 2.支持庫 RegEx.程序集 窗口程序集_啟動窗口.子程序 _取中間文本按鈕_被單擊取中間文本編輯框.內容 = 取中間文本 (完整文本編輯框.內容, “~”, 表達式編輯框.內容, “~”, 到整數 (下標編輯框.內容)).子程序 取中間文本, 文本型, , 返回匹配的文本 多個會以{1}{2}形式輸出.參數 原文本, 文本型.參數 左邊文本, 文本型.參數 中間文本類型, 文本型, 可空.參數 右邊文本, 文本型.參數 引用下標, 整數型, 可空.局部變量 正則, 正則表達式.局部變量 搜索結果, 搜索結果, , "0".局部變量 匹配結果, 文本型.局部變量 成員數, 整數型.如果真 (中間文本類型 = “”) 中間文本類型 = “.*?”.如果真結束正則.創建 (“(?<=/Q” + 左邊文本 + “/E)(” + 中間文本類型 + “)(?=/Q” + 右邊文本 + “/E)”, ) ' 使用 /Q 開始,/E 結束,可使中間的標點符號失去特殊意義,將中間的字符作為普通字符。搜索結果 = 正則.搜索全部 (原文本)成員數 = 取數組成員數 (搜索結果).如果真 (成員數 = 0) 返回 (“”).如果真結束.如果真 (成員數 > 0) .如果 (成員數 = 1) 匹配結果 = 搜索結果 [1].取匹配文本 (原文本, ) 返回 (匹配結果) .否則 .如果 (引用下標 > 0 且 引用下標 ≤ 成員數) 匹配結果 = 搜索結果 [引用下標].取子匹配文本 (原文本, 1, ) .否則 匹配結果 = 正則.替換 (原文本, “(/{$&/})”, 1, , 假, 真) .如果結束 .如果結束.如果真結束返回 (匹配結果)
運行結果:
總結
以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對VeVb武林網的支持。
新聞熱點
疑難解答