以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  值不在预期的范围内  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=91333)

--  作者:刘林
--  发布时间:2016/10/8 16:03:00
--  值不在预期的范围内
If e.sender.value > e.Form.Controls("textbox2").value
    If e.Form.Controls("CheckBox3").checked = True
        Dim sp As New DotNetSpeech.SpVoice()
        sp.rate = 6
        sp.Speak("输入值大了", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
    End If
    e.sender.value = Nothing
    e.sender.Select()
Else
    If e.Form.Controls("CheckBox3").checked = True
        sp.Speak(e.sender.value, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
    End If
End If


老师,请问上面代码出现:值不在预期的范围内。什么问题

--  作者:有点蓝
--  发布时间:2016/10/8 16:18:00
--  
看不出什么问题,试试

If e.sender.value > "" andalso  e.Form.Controls("textbox2").value > ""
If e.sender.value > e.Form.Controls("textbox2").value
    If e.Form.Controls("CheckBox3").checked = True
        Dim sp As New DotNetSpeech.SpVoice()
        sp.rate = 6
        sp.Speak("输入值大了", DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
    End If
    e.sender.value = Nothing
    e.sender.Select()
Else
    If e.Form.Controls("CheckBox3").checked = True
        sp.Speak(e.sender.value, DotNetSpeech.SpeechVoiceSpeakFlags.SVSFlagsAsync)
    End If
End If
end if

另外以后麻烦事件代码说明是哪个控件的什么事件

--  作者:刘林
--  发布时间:2016/10/8 16:32:00
--  
哦,不好意思,这是textbox4.leave事件,textbox4绑定双精度字段,试了上面的不行,谢谢
--  作者:有点蓝
--  发布时间:2016/10/8 16:48:00
--  
跟踪看是哪一句代码问题

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

--  作者:刘林
--  发布时间:2016/10/8 17:02:00
--  
老师,改不来呀
--  作者:有点蓝
--  发布时间:2016/10/8 17:04:00
--  
改不来就学。
--  作者:有点蓝
--  发布时间:2016/10/8 17:05:00
--  
上例子测试
--  作者:刘林
--  发布时间:2016/10/8 17:23:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:desktop.rar

请帮指导

--  作者:有点蓝
--  发布时间:2016/10/8 17:58:00
--  
所有的value都改成Text,如

If e.sender.text > e.Form.Controls("textbox3").text

--  作者:刘林
--  发布时间:2016/10/8 19:44:00
--  
更加错了,请问是什么原因,怎么解决