以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  数值组合框  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99861)
--  作者：lk15502
--  发布时间：2017/4/28 7:57:00
--  数值组合框
窗口中的数值组合框绑定机物料库存表的数量列，数量列的属性是双精度小数；当数值组合框为空时会弹出错误提示框：.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2017.4.22.1
错误所在事件：窗口,机物料库操作,保存到出库表,Click
详细错误信息：
从字符串“”到类型“Double”的转换无效。
输入字符串的格式不正确。
请问老师应该怎么处理？
------------------------------
Dim sl As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox1")
If sl.text = 0 OrElse sl.text = "" Then
        msgbox("请输入出库数量!")  \'首先出库数量不能为0
        Return
    End If
--  作者：有点色
--  发布时间：2017/4/28 8:40:00
--  

 改成

 

Dim sl As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox1")
If sl.text = "0" OrElse sl.text = "" Then
    msgbox("请输入出库数量!")  \'首先出库数量不能为0
    Return
End If

 

或者这样写

 

Dim sl As WinForm.NumericComboBox = e.Form.Controls("NumericComboBox1")
If val(sl.text) = 0 Then
    msgbox("请输入出库数量!")  \'首先出库数量不能为0
    Return
End If