Foxtable(狐表)用户栏目专家坐堂 → 添加到选定的行


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

主题:添加到选定的行

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
添加到选定的行  发帖心情 Post By:2015/9/12 12:29:00 [显示全部帖子]

如果把ComboBox1添加到企业档案窗口_Table5选定的行的退换信息_状态列应该怎么改一下啊 兄弟们 帮帮忙


Dim dr As Row = Tables("企业档案.订单附表").addnew
'dr("业务往来_产品型号") = Tables("企业档案窗口_Table5").Current("型号")
dr("退换信息_状态")=e.form.controls("ComboBox1").text
dr("退换信息_数量")=e.form.controls("NumericComboBox1").text
dr("退换信息_单号")=e.form.controls("TextBox2").text
dr("退换信息_原因")=e.form.controls("TextBox1").text
dr("退换信息_日期")=e.form.controls("DateTimePicker1").text

退换信息_数量 列在原来的基础上加了后所显示的结果 
比如 以前 退换信息_数量 列是 5  现在 NumericComboBox1 是4  点击按钮后就 退换信息_数量 显示 9 

比如我点击了企业档案窗口_Table5 的某行,然后点击按钮,就把 ComboBox1 的内容复制到 企业档案窗口_Table5的 退换信息_状态 列里面 感谢 感谢 


[此贴子已经被作者于2015/9/12 12:32:14编辑过]

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/9/12 16:02:00 [显示全部帖子]

不是的  他是自己增加一行在添加到里面, 我是想添加到 企业档案窗口_Table5 鼠标选择的那一行  感谢 感谢 

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/9/13 15:15:00 [显示全部帖子]

可以是复制到鼠标选择的行吗? 感谢 感谢 

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/9/14 11:50:00 [显示全部帖子]

感谢了 

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/9/14 18:58:00 [显示全部帖子]

能帮我看看这个吗 
 dr("财务_待开piao")=DataTables("订单附表").Compute("sum(订单核算_合计)","绑定号='" & e.DataRow("绑定号")  & "' and 收款信息_开piao状态=('未开piao') an ('核对中') and 业务往来_方式='订单'") 
加上  收款信息_开piao状态= 核对中的  和

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/9/15 16:29:00 [显示全部帖子]

Dim dr As Row = Tables("企业档案.订单附表").addnew
dr("业务往来_产品型号") = Tables("企业档案窗口_Table5").Current("型号")
    'dr("业务往来_产品型号") = e.Form.Controls("TextBox10").Text
    dr("订单核算_售价")=e.form.controls("TextBox01").text
能帮我看看这个吗?
是这样的 企业档案窗口_Table5 是一个搜索结果的一个表格 ,当表个收索不错结果的时候, (当 企业档案窗口_Table5 没显示类容的时候 业务往来_产品型号 就=  TextBox10 里面的内容 可以吗 感谢 感谢 

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


加好友 发短信
等级:九尾狐 帖子:2701 积分:17999 威望:0 精华:0 注册:2013/4/9 10:41:00
  发帖心情 Post By:2015/9/16 22:14:00 [显示全部帖子]

谢谢

 回到顶部