VB调用C++写的dll库后的问题！

2005-10-18 05:00:10 127 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Ubuntu+PM2实现nohup.out日志实时网页监控（亲测可用）本文介绍了一种在Ubuntu系统下使用PM2和WebSocket技术实现nohup.out日志实时网页监控的解决方案。该方案无需复杂工具，只需Node.js+PM2环境，通过几行命令和一段代码即可实现日志的实时网页展示。主要特点包括：实时秒级推送日志（延迟≤100ms）、自动加载全部历史日志、PM2托管保障服务稳定性、支持多人共享查看权限。文章详细提供了环境准备、代码实现步骤和配置说明，包含完整的server.js实现代码和前端展示页面，特别解决了日志路径配置、实时监听和错误处理等常见问题，适合需要远程监控阅读详情

引用一个dll
Dim telconnobj As New FAXCOMXLib.FaxClientX
Dim telnumobj As New FAXCOMXLib.SendTask
Dim telresultobj As New FAXCOMXLib.ResultTask

dim numOfTasks as long

ReDim starttime() as string
ReDim faxendtime()as string
ReDim sendjg()as string
ReDim sendid()as string

ReDim starttime(numOfTasks)as string
ReDim faxendtime(numOfTasks)as string
ReDim sendjg(numOfTasks)as string
ReDim sendid(numOfTasks)as string

telconnobj.PickResultTask mCid, telresultobj
'telresultobj是一个自定义结构，是dll函数库中的！

'telconnobj.PickResultTask mCid, telresultobj他是调用一个c++的dll函数！

for j=0 to numoftasks-1

MsgBox telresultobj.starttime'这是调完dll之后，返回的 telresultobj 这个结构中的！
MsgBox telresultobj.EndTime'这是调完dll之后，返回的 telresultobj 这个结构中的！

到这，，返回的两个时间是正确的！

starttime(j) = telresultobj.starttime
faxendtime(j) = telresultobj.EndTime

MsgBox starttime(j)
MsgBox faxendtime(j)

到这，，这两个时间就都变成telresultobj.starttime了！
next
原本代码中有很多代码，检查到最后，一一删除，就剩这些了，才发现是此问题，请高手帮下兄弟！

...全文