主题：求一偏方：怎样实现一个文本框的数值发送数字到另个文本框并且使它每次都加发送的值，谢谢

直接写

Dim d10 As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim je As WinForm.TextBox = e.Form.Controls("TextBox2")    '初始值是0
je.text = val(je.text) + val(d10.text)