- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 新手学习中，在练习中找不到相关资料 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88410)
-- 发布时间：2016/8/2 11:50:00
-- 新手学习中，在练习中找不到相关资料
此主题相关图片如下：qq截图20160802114728.png
填入值比如 100
点输入 3个文本框都填入100
代码怎么写？
-- 发布时间：2016/8/2 11:55:00
--
e.Form.Controls("TextBox1").Text = e.Form.Controls("TextBox2").Text
-- 发布时间：2016/8/2 12:02:00
--
谢谢解决
e.Form.Controls("TextBox1","TextBox3").Text = e.Form.Controls("TextBox2").Text
必须分开写吗？
能不能代码简化一点？
-- 发布时间：2016/8/2 12:41:00
--
如果两三就分开写。
如果好多好多，就这样写：
Dim nms() as string = {“TextBox4”, “TextBox5”, "TextBox6”, "TextBox7"}
For each nm As string in nms
e.Form.Controls(nm).Text = e.Form.Controls("TextBox2").Text
next