以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何强行让“第一列”只能输入小数点后一位数  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173557)

--  作者:jjjeyes
--  发布时间:2021/12/5 23:20:00
--  如何强行让“第一列”只能输入小数点后一位数
在“表A”的“第一列”里输入一个小数,只允许输入为小数点后一位的数值。
如:只能输入6.3;6.9;7.6这种类似的小数。
目前已经在列属性里设置了小数点最多为一位小数,但是如果输入6.35则会四折五入变成6.4。
请问有没有比较好的方法只允许输入一位小数,如果输入两位或更多位小数也不让四折五入取值。

--  作者:有点蓝
--  发布时间:2021/12/6 8:44:00
--  
“表A”datacolchanging事件

Output.Show(1)
If e.DataCol.name = "第一列" AndAlso e.NewValue <> Nothing Then
    Dim s As String = e.NewValue
    If s.contains(".") AndAlso s.split(".")(1).length > 1 Then
        msgbox("只能输入一位小数")
        e.cancel=True
    End If
End If