以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何设置退货单窗口数量必须输入为负数？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=12665)
--  作者：jackshen888
--  发布时间：2011/9/11 6:43:00
--  如何设置退货单窗口数量必须输入为负数？
如何设置退货单窗口数量必须输入为负数？代码怎么写
--  作者：明丰
--  发布时间：2011/9/11 7:44:00
--  

这样行吗？

 

该列假设是"退货数量"

 

方法1:给出提示,重新输入

\'数据DataColChanging
If e.DataCol.Name = "退货数量" Then \'如果是退货数量列的内容发生变化.
If e.NewValue IsNot Nothing
    If CStr(e.NewValue).startswith("-") = False Then \'.
    MessageBox.Show("格式不正确 请重新输入!")
    e.Cancel = True \'取消变动.
End If
End If
End If

 

方法2:直接转换为负数

\'编缉AfterEdit
If e.Col.Name = "退货数量" Then \'如果是退货数量列的内容发生变化.
If e.Row("退货数量") IsNot Nothing
    If CStr(e.Row("退货数量")).startswith("-") = False Then \'.
    e.Row("退货数量") = "-" & e.Row("退货数量")
End If
End If
End If
--  作者：狐狸爸爸
--  发布时间：2011/9/11 8:16:00
--  

也可以看看：

 

http://www.foxtable.com/help/topics/0736.htm