以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  获取数值输入框数值  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158617)
--  作者：透明人生
--  发布时间：2020/11/26 21:10:00
--  获取数值输入框数值
红色部分的数值要怎么实现，比如当ZF=0.7 时 ，红色部分取值为35.
Dim zf As object = TopToolBar.Items("学科总分").Value
Output.Show(zf)   \'这个可以显示0.7，为什么后面不行？
If zf > 0 Then
b.Totals.AddExp("分数分布_50*zf 以下","Case When 分数 < 50*zf   Then  1 else 0  End")
end if
--  作者：有点蓝
--  发布时间：2020/11/26 21:28:00
--  

b.Totals.AddExp("分数分布_50 *" & zf & " 以下","Case When 分数 < 50*" & zf & "   Then  1 else 0  End")
--  作者：透明人生
--  发布时间：2020/11/26 22:08:00
--  
好的，谢谢！当ZF=0.7时，“分数分布_50 *" & zf & " 以下” 不能生成 "分数分布_35"以下.只生成“分数分布_50 *0.7以下”，要怎么解决？
[此贴子已经被作者于2020/11/26 22:08:39编辑过]
--  作者：有点蓝
--  发布时间：2020/11/26 22:31:00
--  
b.Totals.AddExp("分数分布_" & (50 * zf) & " 以下","Case When 分数 < " & (50 * zf) & "   Then  1 else 0  End")
--  作者：透明人生
--  发布时间：2020/11/26 23:54:00
--  
谢谢，我多用一行代码转化也可以实现，但为何两种方法都是会保留一位小数。
--  作者：有点蓝
--  发布时间：2020/11/27 8:43:00
--  
请截图说明一下
--  作者：透明人生
--  发布时间：2020/11/27 20:03:00
--  
谢谢，老师！我现在把0.7改为70/100，就正常了。