编辑框1的内容是一个首很高雅、流行、时尚的歌曲的名字，但后面还带有一串毫无规则的数字。编辑框1下面有一个按钮 ，按下按钮后编辑框2会出现“月亮之上.mp3”的文字，也就是找到.mp3然后把".mp3"后面的文本删除掉。
下面是实现这功能的代码：
.版本 2
.子程序 _按钮1_被单击
.局部变量 关键字的位置, 短整数型
.局部变量 关键字长度, 整数型
关键字的位置 ＝ 寻找文本 (编辑框1.内容, “.mp3”, , 假)
关键字长度 ＝ 取文本长度 (“.mp3”)
编辑框2.内容 ＝ 取文本左边 (编辑框1.内容, 关键字的位置 ＋ 关键字长度 － 1)
本文结束。
