以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  手动更新数据  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=61486)
--  作者：石四
--  发布时间：2014/12/13 11:51:00
--  手动更新数据

参数表有三列a/b/c,如何实现在窗口数值框输入系数,更新c列数据?c=b*系数

详见参数表窗口

 

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:事例.zip
--  作者：石四
--  发布时间：2014/12/13 11:54:00
--  

另外,如何让下次打开窗口后,数值框显示上次退出时的数值?
--  作者：有点甜
--  发布时间：2014/12/14 10:33:00
--  

     

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:事例.foxdb
--  作者：石四
--  发布时间：2014/12/16 10:47:00
--  

OK!

关键词:

 

窗口表事件

 

窗口与控件事件

 

参数表_AfterLoad

 

e.Form.Controls("系数").Text = GetConfigValue("系数", Nothing)

 

参数表_Button1_Click

 

Dim t As Table = e.Form.controls("Table1").Table

Dim v As Double = val(e.Form.Controls("系数").Text)

For Each r As Row In t.Rows

    If r.IsNull("a") = False Then

        r("c") = r("b") * v

    End If

Next

SaveConfigValue("系数", v)