设为首页收藏本站
开启辅助访问 切换到窄版
搜索
第一问答网»论坛 › 中问网 › 问答 › vb6.0中的as any 怎么向vb.net转换

vb6.0中的as any 怎么向vb.net转换

[复制链接]
查看11 | 回复3 | 2021-1-27 06:48:25 | 显示全部楼层 |阅读模式
程序中应用到了hydraulicsdll.dll，在使用中需要调用dll
vb6调用dll的函数如下，里面有个asany
PublicDeclareFunctionDWFluxMinLib"hydraulicsdll.dll"_
(ByValRheoModelAsInteger,ByRefpMudAsany,ByRefpWellPathAsWELLPATH)AsDouble
在调用的时候是用的
m_FluxMin=DWFluxMin(3,m_HBMud,m_WellPath(0)
其中
m_HBMud是一个结构，因为在调用的时候，有时候调用的是HBMUD有时候调用的是POWERMUD，所以他用的是asany但是在vb.net中确无法调用，有高手吗，知道定义一个asany，any作为一个结构时应该怎么调用呢？
TypePOWERMUD
m_MudDenAsDouble'密度
m_MudKAsDouble'稠度系数
m_MudNAsDouble'流性指数
EndType
TypeHBMUD
m_MudDenAsDouble'密度
m_MudTAsDouble'初切
m_MudKAsDouble'稠度系数
m_MudNAsDouble'流性指数
EndType

在改成vb.net中，我把asany改为asobject,程序没有报错，但是在运行的过程中提示值不在范围内。

分 -->
回复

使用道具 举报

千问 | 2021-1-27 06:48:25 | 显示全部楼层
PublicDeclareFunctionDWFluxMinLib"hydraulicsdll.dll"_
(ByValRheoModelAsInteger,ByRefpMudAsLong,ByRefpWellPathAsWELLPATH)AsDouble
回复

使用道具 举报

千问 | 2021-1-27 06:48:25 | 显示全部楼层
PublicDeclareFunctionDWFluxMinLib"hydraulicsdll.dll"_
(ByValRheoModelAsInteger,ByRefpMudAsobject,ByRefpWellPathAsWELLPATH)AsDouble
回复

使用道具 举报

千问 | 2021-1-27 06:48:25 | 显示全部楼层
引用2楼gxingmin的回复:VB.NETcode
PublicDeclareFunctionDWFluxMinLib"hydraulicsdll.dll"_
(ByValRheoModelAsInteger,ByRefpMudAsobject,ByRefpWellPathAsWELLPATH)AsDouble
不行啊用object不好用啊
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

千问

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
回复楼主 返回列表
热门排行