以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 判断是否能整除  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=118484)
--  作者：zcgmxf
--  发布时间：2018/5/3 23:52:00
--  [求助] 判断是否能整除
老师，在  数字   列  输入数值时，如何判断 该数值是否是0.5 的整数倍？如果不是就禁止输入。谢谢！
--  作者：有点甜
--  发布时间：2018/5/4 9:01:00
--  

validateEdit或者datacolchanging事件写代码

 

If e.Col.name = "第一列" Then

    If cint(val(e.text) / 0.5)<> val(e.text) / 0.5 Then

        msgbox("不是0.5整数倍")

        e.cancel = True

    End If

End If
--  作者：km007
--  发布时间：2018/5/14 19:14:00
--  
学习
[此贴子已经被作者于2018/5/14 19:14:32编辑过]