以下是引用yangming在2011-8-31 13:13:00的发言：
这是一个替换的代码，在做的过程中，发现，如果这样设置，就不操作
Dim t1,t2,t3 As String
t1=e.Form.Controls("TextBox1").text
t2=e.Form.Controls("TextBox2").text
t3=e.Form.Controls("TextBox3").text
t1=e.Form.Controls("TextBox1").text.Replace(t2,t3)
红字部分改成：t1=t1.Replace(t2,t3) 也不操作，只有改成下面蓝字这样才操作
e.Form.Controls("TextBox1").text = e.Form.Controls("TextBox1").text.Replace(t2,t3)
其实已执行了!只不过你没见t1的值发生变化而已
t1= e.Form.Controls("TextBox1").text.Replace(t2,t3)
'代码意义:赋值 字符变量 t1为: t1.Replace(t2,t3)
e.Form.Controls("TextBox1").text = e.Form.Controls("TextBox1").text.Replace(t2,t3)
'代码意义:把TextBox1的Text值 显示为 : t1.Replace(t2,t3)
加好友 
发短信
Post By：2011/8/31 14:23:00 [显示全部帖子]
