以文本方式查看主题

-  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=75869)

--  作者:sf020cf
--  发布时间:2015/10/16 11:47:00
--  实时显示所选列表项目的值
图片点击可在新窗口打开查看Dim Sum As Double 
For Each r As Row In Tables("订单").GetCheckedRows
   Sum + = r("体积")
   e.Form.Controls("体积").Text = Sum
Next   



在文本框中怎样实时显示订单表.体积和 (跟随复选数变化),加到单击事件要在复选更改后再点选文本框才显示,请问要加到哪个事件 不需要点选 自动跟随选中个数实时显示

--  作者:大红袍
--  发布时间:2015/10/16 11:49:00
--  

去写  AfterCheckRow

 

Dim Sum As Double = 0
For Each r As Row In Tables("订单").GetCheckedRows
    Sum + = r("体积")
    Forms("窗口1").Controls("体积").Text = Sum
Next

 

http://www.foxtable.com/help/topics/1640.htm

 


--  作者:sf020cf
--  发布时间:2015/10/16 12:01:00
--  
谢谢红袍版主,经指教已经得到解决