[求助]窗口控件不绑定表如何输入到表 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]窗口控件不绑定表如何输入到表

共有2172人关注过本帖树形打印复制链接主题：[求助]窗口控件不绑定表如何输入到表

yaorxin

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：13 积分：180 威望：0 精华：0 注册：2016/1/25 22:23:00

[求助]窗口控件不绑定表如何输入到表 发帖心情

Post By：2016/2/1 21:12:00 [只看该作者]

[求助]窗口控件不绑定表如何输入到表

我现在是绑定的，但是有问题，绑定的话点下面表的数据会显示在上面，用清除还不能清空。

应该用什么代码来不绑定，输入内容后加车自动输入到下表中对应的列中，

请帮给些提示。谢谢

图片点击可在新窗口打开查看此主题相关图片如下：22.png

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/2/1 21:19:00 [只看该作者]

那就不绑定，直接赋值即可

Dim nr As Row = Tables("表A").AddNew

nr("第一列") = e.Form.Controls("TextBox1").Text

nr("第二列") = e.Form.Controls("TextBox2").Text

yaorxin

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：13 积分：180 威望：0 精华：0 注册：2016/1/25 22:23:00

Post By：2016/2/2 21:45:00 [只看该作者]

参考你的代码，我想把datetime和checkbox的也加值，但是出错了。

代码如下，是什么问题？是否要定义才行。

Dim nr As Row = Tables("进出单表").current

nr("出单单号") = e.Form.Controls("出单单号").Text
nr("登记出单时间") = e.Form.Controls("登记出单时间").value=now
nr("是否出单") = e.Form.Controls("是否出单").value =True

大红袍

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/2/2 21:46:00 [只看该作者]

nr("登记出单时间") = e.Form.Controls("登记出单时间").value
nr("是否出单") = e.Form.Controls("是否出单").Checked

yaorxin

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：13 积分：180 威望：0 精华：0 注册：2016/1/25 22:23:00

Post By：2016/2/2 22:04:00 [只看该作者]

改为这个OK了，谢谢指导。

Dim nr As Row = Tables("进出单表").current
e.Form.Controls("登记出单时间").value=now
e.Form.Controls("是否出单").Checked =True
nr("登记出单时间") = e.Form.Controls("登记出单时间").value
nr("是否出单") = e.Form.Controls("是否出单").Checked

下一主题 >> << 上一主题

主题：[求助]窗口控件不绑定表如何输入到表