以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]为何会出现这个情况?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106889)

--  作者:18523982317
--  发布时间:2017/9/17 18:47:00
--  [求助]为何会出现这个情况?

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20170917184414.png
图片点击可在新窗口打开查看

why?

--  作者:有点甜
--  发布时间:2017/9/17 19:03:00
--  

1、先把你的内容拷贝到txt文件去,看是否正常;

 

2、如果内容是正常的,再拷贝回来,关闭项目,重新打开项目测试。


--  作者:有点甜
--  发布时间:2017/9/17 19:04:00
--  
 你把bin文件夹删除,重新打开项目,加密狗换一个usb插口插入。
--  作者:18523982317
--  发布时间:2017/9/17 19:15:00
--  
Dim dr As DataRow = DataTables("动态函数表").Find("函数名 = \'up\'")
Functions.Add("up001",dr("内容"))
Functions.Complie()
Functions.Execute("up001")

我这样运行,报错,求解?


--  作者:18523982317
--  发布时间:2017/9/17 19:18:00
--  
调用的目标发生了异常。
索引超出了数组界限。

报错

--  作者:有点甜
--  发布时间:2017/9/17 19:24:00
--  
 把单元格内容拷贝粘贴到txt文件里显示,看是否正确。
--  作者:18523982317
--  发布时间:2017/9/17 19:36:00
--  
正常的
--  作者:有点甜
--  发布时间:2017/9/17 19:57:00
--  
以下是引用18523982317在2017/9/17 19:15:00的发言:
Dim dr As DataRow = DataTables("动态函数表").Find("函数名 = \'up\'")
Functions.Add("up001",dr("内容"))
Functions.Complie()
Functions.Execute("up001")

我这样运行,报错,求解?

 

1、split函数,只能分拆单个字符。vbcrlf是两个字符,所以有问题;你可以改成split(chr(13))

 

2、执行函数的时候,你要传入参数,如 Functions.Execute("up001", e)