以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [已解决][求助]自定义函数_调用的目标发生异常  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=179813)

--  作者:rightinfo2014
--  发布时间:2022/9/11 16:00:00
--  [已解决][求助]自定义函数_调用的目标发生异常
各位大师们好!
我自定义的函数,请详见附件实例,不知为什么会出现下图的错误提示?

图片点击可在新窗口打开查看此主题相关图片如下:运行错误提示1.png
图片点击可在新窗口打开查看

求助,帮忙指点问题出在哪里,感恩感恩图片点击可在新窗口打开查看

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

实例开发者密码为:k,就一个小写字母


[此贴子已经被作者于2022/9/11 16:53:32编辑过]

--  作者:rightinfo2014
--  发布时间:2022/9/11 16:16:00
--  
试着将内部自定义函数改为如下:

Dim nm主表 As String = Args(0)

If Forms("共有窗口-快捷导航").Opened Then
    Dim frm快捷导航 As WinForm.Form = Forms("共有窗口-快捷导航")
    Dim nm按钮名称 As String
    MessageBox.Show(1)
    Dim txt主表 As String
    If Tables.Contains(nm主表) Then
            txt主表 = Tables(nm主表).Text

并调用函数时的参数相应转为string字符型,也同样报错。
实在不知问题出在哪里???

--  作者:rightinfo2014
--  发布时间:2022/9/11 16:53:00
--  
解决了,我发现犯了个低级错误,text不是table的标题属性,引用table的标题,代码应改为:
table.datatable.caption


不过还是要感谢各位过往的提携,才有本人一点点的进步,多谢!!!