Foxtable(狐表)用户栏目专家坐堂 → 应用程序中发生了无法处理的异常


  共有2282人关注过本帖树形打印复制链接

主题:应用程序中发生了无法处理的异常

帅哥哟,离线,有人找我吗?
zoyong
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:670 积分:7958 威望:0 精华:0 注册:2015/8/24 9:02:00
应用程序中发生了无法处理的异常  发帖心情 Post By:2017/11/13 17:26:00 [显示全部帖子]

有关调用实时(JIT)调试而不是此对话框的详细信息,
请参见此消息的结尾。

*


************** 已加载的程序集 **************
mscorlib
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.8825 (WinRelRS3.050727-8800)
    基本代码: file:///C:/Windows/Microsoft.NET/Framework/v2.0.50727/mscorlib.dll
----------------------------------------
......
2.DLL
----------------------------------------
System.Windows.Forms.resources
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.8825 (WinRelRS3.050727-8800)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.Windows.Forms.resources/2.0.0.0_zh-CHS_b77a5c561934e089/System.Windows.Forms.resources.dll
----------------------------------------
System.resources
    程序集版本: 2.0.0.0
    Win32 版本: 2.0.50727.8825 (WinRelRS3.050727-8800)
    基本代码: file:///C:/Windows/assembly/GAC_MSIL/System.resources/2.0.0.0_zh-CHS_b77a5c561934e089/System.resources.dll
----------------------------------------

************** JIT 调试 **************
要启用实时(JIT)调试,
该应用程序或计算机的 .config 文件(machine.config)的 system.windows.forms 节中必须设置
jitDebugging 值。
编译应用程序时还必须启用
调试。

例如: 

<configuration>
    <system.window s.forms jitDebugging="true" />
</configuration>

启用 JIT 调试后,任何无法处理的异常
都将被发送到在此计算机上注册的 JIT 调试器,
而不是由此对话框处理。



图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图17年11月13日1722_1.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
zoyong
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:670 积分:7958 威望:0 精华:0 注册:2015/8/24 9:02:00
  发帖心情 Post By:2017/11/24 13:59:00 [显示全部帖子]

问题出来了:在"TextBox1"文本框中执行动态筛选后点击下面的明细数据就跳出上面的错误

textchanged代码:
Dim txt As String = e.Form.Controls("TextBox1").Text
Dim tbl As Table = Tables("cw_lsbxql")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"          
    tbl.Filter = "项目名称 Like " & txt & " Or 对方户名 Like " & txt & " Or 类别 Like " & txt  & " Or 对方账号 Like " & txt & " Or 合作公司 Like " & txt & " Or convert(支出, 'System.String') Like " & txt & " Or convert(收入, 'System.String') Like " & txt
End If

click代码:
Dim tbl As Table = Tables("cw_lsbxql")
e.Form.Controls("textbox1").Value = Nothing
tbl.Filter =""

doubleclick代码:
e.Form.Controls("TextBox1").Text =""



 回到顶部