.版本 2
.子程序 _按钮1_被单击
.局部变量 起始位置, 整数型
.局部变量 文本, 文本型
起始位置 ＝ 寻找文本 (编辑框1.内容, “农民家庭”, , 假)
.如果真 (起始位置 ≠ -1)
文本 ＝ 取文本中间 (编辑框1.内容, 起始位置, 取文本长度 (“农民家庭”))
输出调试文本 (文本)
列表框1.加入项目 (文本, )
-----------------------------以下是回答你的补充问题------------------------------------------
.版本 2
.子程序 _按钮1_被单击
.局部变量 起始, 整数型
.局部变量 结束, 整数型
.局部变量 文本, 文本型
起始 ＝ 寻找文本 (编辑框1.内容, “金”, , 假)
结束 ＝ 寻找文本 (编辑框1.内容, “这可是本人亲身体会啊”, , 假)
文本 ＝ 取文本中间 (编辑框1.内容, 起始, 结束 － 起始)
输出调试文本 (文本)
信息框 (文本, 0, )
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024