以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  不知出错在那？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=114728)
--  作者：张生辉
--  发布时间：2018/2/16 21:24:00
--  不知出错在那？
Tables("订单").AddNew()  \'增加一行
Tables("产品").Cols("品名")=e.Form.Controls("TextBox1")  \'品名等于当前textbox1数据
Tables("订单").AddNew()  \'增加一行
Tables("产品").Cols("品名")=e.Form.Controls("TextBox2")  \'品名等于当前textbox2数据


提示错误：编译错误：属性"ltem"为"ReadOnly"

不知是什么原因？
--  作者：wyz20130512
--  发布时间：2018/2/16 21:36:00
--  

图片点击可在新窗口打开查看此主题相关图片如下：搜狗截图20180216213106.png
图片点击可在新窗口打开查看
--  作者：张生辉
--  发布时间：2018/2/16 21:56:00
--  
不想控件设置绑定，想用代码写，那怎么才可以把控件的数据传到表中？
--  作者：新福星
--  发布时间：2018/2/17 5:23:00
--  
有如下错误:
1 张冠李戴？在"订单"表中增加的新行后,给"产品"表中的行赋值。Tables("订单")和Tables("产品").是两个不同的表.这个请确认是不是初衷?
2 e.Form.Controls("TextBox1").value 这么引用文本控件的值。


改后视乎这个样子
Dim s as row =Tables("产品").AddNew()  \'增加一行
s("品名")=e.Form.Controls("TextBox1").value  \'品名等于当前textbox1数据



[此贴子已经被作者于2018/2/17 5:24:37编辑过]