建壹個界面,壹個按鈕1,壹個編輯框1?,把下邊虛線內容全部復制到易裏,
================================================================
.版本?2
.子程序?_按鈕1_被單擊
.局部變量?文本,?文本型
.局部變量?計次,?整數型
.局部變量?新建文本,?文本型
.局部變量?起始位置,?整數型
文本?＝?編輯框1.內容
.計次循環首?(取文本長度?(文本),?計次)
.如果真?(計次?％?2?＝?0)
新建文本?＝?新建文本?＋?取文本中間?(文本,?起始位置,?2)?＋?“|”
.如果真結束
起始位置?＝?起始位置?＋?1
.計次循環尾?()
編輯框1.內容?＝?新建文本
====================================================================