Foxtable(狐表)用户栏目专家坐堂 → 使用内部数据表如何保存?


  共有5318人关注过本帖树形打印复制链接

主题:使用内部数据表如何保存?

帅哥哟,离线,有人找我吗?
南望
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:391 积分:3290 威望:0 精华:0 注册:2014/4/9 10:04:00
使用内部数据表如何保存?  发帖心情 Post By:2015/3/4 17:26:00 [只看该作者]

在窗口中设置些textbox控件,并且没有绑定内部表的相应列,保存按钮事件、删除按钮事件等如何写?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/4 17:40:00 [只看该作者]

1、保存按钮这样写

 

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

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

 

2、删除按钮不用写,或者这样写

 

If Tables("表A").Current IsNot Nothing Then

    Tables("表A").Current.Delete

End If

[此贴子已经被作者于2015/3/4 17:40:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
南望
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:391 积分:3290 威望:0 精华:0 注册:2014/4/9 10:04:00
  发帖心情 Post By:2015/3/4 21:35:00 [只看该作者]

呃,ADDNEW如果多点了几次保存会增加很多行的。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2015/3/4 21:37:00 [只看该作者]

 那你单独做一个新增的按钮

 

Tables("表A").AddNew

 

 保存按钮这样写

 

Tables("表A").Current("第一列") = e.Form.Controls("TextBox1").Text

 


 回到顶部
帅哥哟,离线,有人找我吗?
南望
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:391 积分:3290 威望:0 精华:0 注册:2014/4/9 10:04:00
  发帖心情 Post By:2015/3/4 23:02:00 [只看该作者]

嗯,这样应该可以了,谢谢

 回到顶部