以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]未将对象引用设置到对象的实例-系统崩溃  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=105168)

--  作者:Fox86
--  发布时间:2017/8/13 9:05:00
--  [求助]未将对象引用设置到对象的实例-系统崩溃
文件见附件。单击“选项”按钮打开“人员信息”新页签后,直接单击“关闭”按钮或者双击页签名称都可以正常关闭页面;一旦鼠标选择一下员工信息后,关闭就会报错“未将对象引用设置到对象的实例”程序崩溃,只能强行任务管理器退出。用的Win10操作系统。我是小白,比着帮助文档和前人经验做的,恳请指点,感谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:记录.rar


--  作者:有点甜
--  发布时间:2017/8/13 11:58:00
--  
你的数据库版本太高,无法附加测试,请保存为低版本的sql语句发上来。
--  作者:有点甜
--  发布时间:2017/8/13 12:12:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:jilu.foxdb


--  作者:Fox86
--  发布时间:2017/8/14 8:43:00
--  

版主,问题依然存在,改成了Access数据库。您再帮忙看看

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:记录0814.rar


--  作者:Fox86
--  发布时间:2017/8/14 8:45:00
--  问题依旧,感谢再次指导
还是一样的现象
--  作者:有点甜
--  发布时间:2017/8/14 8:57:00
--  

关闭页签函数

 

\'本函数的格式为:
\'Functions.Execute("关闭页签",Args(0))
\'Args(0):"窗体名称"

Dim tc As WinForm.TabControl = Forms("主界面").Controls("TabControl1") \'定义"主界面"的页面集合控件
For i As Integer = 0 To tc.TabPages.Count -1 \'遍历页签
    If tc.TabPages(i).Text = args(0) Then  \'若是指定的页签
        tc.tabpages(i).children.clear
        tc.TabPages.Delete(i) \'删除之
        Exit For

    End If
Next
Forms(args(0)).Close   \'关闭窗体,释放资源


--  作者:Fox86
--  发布时间:2017/8/14 9:10:00
--  我试了一下,一样的现象
版主,还是同样的现象,只要鼠标点击一下员工表中任一行的员工信息,双击页签名称或者“关闭”按钮就会报错,只能任务管理器结束。
--  作者:Fox86
--  发布时间:2017/8/14 15:23:00
--  回复:(有点甜)bug,要修改菜单systemIdle事件&nb...

版主,用你的文件现象还是一样的。我该怎么解决这个问题呢?比较愚钝啊,请明示。感谢。


--  作者:有点甜
--  发布时间:2017/8/14 17:36:00
--  

文件发错了

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:jilu.foxdb


--  作者:Fox86
--  发布时间:2017/8/16 8:35:00
--  回复:(有点甜)文件发错了??[upload=...


图片点击可在新窗口打开查看此主题相关图片如下:tim截图20170816074755.png
图片点击可在新窗口打开查看
版主,完全使用你的文件是没问题的。拷贝了你的菜单事件(没有去理解,估计暂时也吃不透)在我的文件,出现了新的错误,找不到与你的文件其他的不同之处了,求助,谢谢!

[此贴子已经被作者于2017/8/16 8:35:01编辑过]