字符搜索选定问题
如何对编辑框内搜索到的所有指定字符进行选定,并改为红色背景。以下代码只能选定第一个。
temp_mn=ALLTRIM(thisform.text3.value)
temp_mm=At(temp_mn,thisform.编辑框1.value)
IF temp_mm<>0
thisform.编辑框1.selstart=temp_mm-1
thisform.编辑框1.sellength=LEN(temp_mn)
ELSE
WAIT windows"没有匹配的文字"timeout 1
endif
[此贴子已经被作者于2024-4-9 16:25编辑过]