| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 窗口中对两个字段的计算问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=63188) |
| -- 作者：peterx -- 发布时间：2015/1/15 16:28:00 -- 窗口中对两个字段的计算问题 想根据某一字段数值变化时，另一文本框中的值以除以“10000”后的值显示。请指点下公式，如何修改？谢谢 Dim dr As DataRow Dim wy As Integer = e.Form.Controls("总价_万元") Dim zj As Integer = Tables("设备采购管理").current("总价_人民币") wy=zj/10000 [此贴子已经被作者于2015-1-15 16:29:13编辑过]
|
| -- 作者：Bin -- 发布时间：2015/1/15 16:29:00 -- e.Form.Controls("总价_万元").text=Tables("设备采购管理").current("总价_人民币")/10000 |
| -- 作者：peterx -- 发布时间：2015/1/15 16:33:00 -- thank you! |
| -- 作者：peterx -- 发布时间：2015/1/15 17:39:00 -- 再请教一个问题。将此字段的数字格式化为两位有效数字，应如何表达？谢谢。 |
| -- 作者：有点甜 -- 发布时间：2015/1/15 17:41:00 -- e.Form.Controls("总价_万元").text = Format(Tables("设备采购管理").current("总价_人民币")/10000, "#.00") |
| -- 作者：peterx -- 发布时间：2015/1/15 17:44:00 -- 非常感谢 |