| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 代码问题！！谢谢了 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=21674) |
| -- 作者：jinzhengbe -- 发布时间：2012/7/21 7:05:00 -- 代码问题！！谢谢了 Dim r1 As Row = Tables("商品").Current Dim r2 As Row = Tables("订单处理").AddNew r2("productID") = r1("商品号码") r2("商品名") = r1("商品名称") r2("商号") = r1("商号") r2("pic") = "TextBox2" r2("color") = "颜色"
代码如上，
最后两行 我想要r2（“pic”）= textbox2 文本框里的值应该怎么改啊？ 谢谢！！ |
| -- 作者：czy -- 发布时间：2012/7/21 8:49:00 -- = Forms("窗口名称").Controls("TextBox2").Value |
| -- 作者：jinzhengbe -- 发布时间：2012/7/22 21:03:00 -- 非常非常感谢！！ 非常非常感谢！！ |