Question

悬赏100分 vfp表单：我在text1中输入符号A，点击按钮控件，符号A被符号B替换掉，并且B在text2中显示出来

悬赏100分 vfp表单：我在text1中输入符号A，点击按钮控件，符号A被符号B替换掉，并且B在text2中显示出来，麻烦详细说下
其中的A和B可以随机是什么，可以是逗号句号，并且text1中可能是A1 A2 A3。。。等等多个，text2中要显示出B1 B2 B3。。。

Answer 1

按钮单击事件代码：
thisform.text2.value=thisform.text1.value //text1中的值代入text2
thisform.text1.value=“B” //给text1赋新值
THISFORM.REFRESH //刷新一下表单，使text1和text2的新值表现出来。

追问

比如我在text1中输入的A1 A2 A3 A4为a b c d，点按钮后，在text2中显示的是/ * - + 这4个符号，怎么写？
求教。。。
求教。。。
求教。。。
求教。。。

追答

增加判断
if thisform.text1.value==”a“
thisform.text2.value=”/“
endif
if thisform.text1.value==”b“
thisform.text2.value=”*“
endif
if thisform.text1.value==”c“
thisform.text2.value=”-“
endif
if thisform.text1.value==”d“
thisform.text2.value=”+“
endif
thisform.text1.value=thisform.text2.value //再让两个框的值一致起来（符号A被符号B替换掉）
THISFORM.REFRESH

追问

大神，最后麻烦你下，后面一段增加的，增加到上面哪里呢，能完整写下吗？拜托

追答

第一段代码都不要了，只用第二段即可（放入单击事件中）。

严格说来，对每个判断中的 thisform.text1.value要在外面套一个清除字符串前后空格的函数，防止输入中前后有空格，影响判断，增加程序的健壮性。没有也行。

另：如果需代换的符号很多，就要事先先设计一个对应表，取对应表中的值进行代换。

追问

我运行试了下，输入abc，点按钮后，text2中是空白的，不显示，不知道为什么，方便加下我492746927教我吗，先谢了

追答

如果是输入的是字符串“abc”，就要在一个循环中一位一位的判断，
整个程序
单击按钮代码：
y=“”
x=“”
c=len(thisform.text1.value)
for i=1 to c
if substr(thisform.text1.value,i,1)==”a“
x=”/“
endif
if substr(thisform.text1.value,i,1)==”b“
x=”*“
endif
if substr(thisform.text1.value,i,1)==”c“
x=”-“
endif
if substr(thisform.text1.value,i,1)==”d“
x=”+“
endif
y=y+x
endfor
thisform.text2.value=y
thisform.text1.value=y
THISFORM.REFRESH

追问

嵌套错误，前面空格试了又试，还是没试出来。

追答

我在机器上试了一下，可以运行

y=""

x=""

c=len(alltrim(thisform.text1.value))

for i=1 to c

if substr(thisform.text1.value,i,1)=="a"

    x="/" 

endif

if substr(thisform.text1.value,i,1)=="b"

  x="*"

endif

if substr(thisform.text1.value,i,1)=="c"

  x="-"

endif

if substr(thisform.text1.value,i,1)=="d"

  x="+"

endif

y=y+x

endfor

thisform.text2.value=y

thisform.text1.value=y

THISFORM.REFRESH

追问

大神，膜拜，分先给了，另外有点小瑕疵，就是点按钮之后text1也变的和text2显示一样了，如果还是显示输入的字就完美了，十分感谢

追答

去掉倒数第二句即可

Answer 2

用ASCII去判断吧。

追问

比如我在text1中输入的A1 A2 A3 A4为a b c d，点按钮后，在text2中显示的是/ * - + 这4个符号，怎么写？求教。。。求教。。。求教。。。求教。。。