| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 获取数值输入框数值 (http://foxtable.com/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，就正常了。 |