V6.11有问题

你好

同样的代码在以前的金字塔版本就没有问题

技术008

本地没有问题，你可以参考这个例子自己看看

你好

您这怎么返回的是一个数字，而不是数组？您返回一个列表试试看？

你好

我用金字塔自带的PY环境测试，发现返回数组不行
代码如下：
public d

sub test
    application.MsgOut "调用"
    data = d.CallObject("pytest",1,2)'调用PY函数，获取指标，返回类型为数组
    Application.MsgOut "result:"&data
    Set d = nothing'使用完毕需要 Set Nothing销毁以免出现内存泄漏
    set data =nothing
end sub   

''启动函数
Sub APPLICATION_VBAStart()
    '创建外部对象，启用Python引擎
    On Error Resume Next
    application.MsgOut "启动"
    Set d = CreateObject("Stock.Python")
       '载入Python模块，模块名为MyPython
    ret =d.ImportModule("jzt_MyPython2")
    If ret <> 1 Then   '当载入失败，打印错误原因
       Msg = d.GetErrorInfo()
       Application.MsgOut Msg
       Set Msg = Nothing'使用完毕需要 Set Nothing销毁以免出现内存泄漏
       Exit sub
           End If
    Call test
End Sub


# 该Python代码用于模块定义，供其他Python代码或VBA调用。
from PythonApi import *
#调试打印输出
# print("...")
def pytest (part1,part2):
    #return [[1,2,3],[3,4,5]][part1] [part2]
    print('调用了')
    data=[1,2,3]

你好

# 该Python代码用于模块定义，供其他Python代码或VBA调用。

from PythonApi import *

#调试打印输出
# print("...")
def pytest (part1,part2):
    #return [[1,2,3],[3,4,5]][part1] [part2]
    print('调用了')
    data=[1,2,3]
    return data

技术015

数组返回你意思是用6.01版本没问题的，只有6.11不行？

你好

数组返回你意思是用6.01版本没问题的，只有6.11不行？

是这个意思

你好

这个问题如果不解决，我以前花那么多功夫写的代码就白写了，只能用以前的版本。

你好

能解决吗？

技术015

PythonJztServer.zip (86.72 KB, 下载次数: 1670)

2021-6-26 17:33 上传

点击文件名下载附件 该问题已经修复，请下载附件解压缩后，将PythonJztServer.exe替换到金字塔目录中Python目录下同名文件即可。