15问答网 > 在vb.net中，用什么类型代替vb6.0中的any类型啊？我用object代替时，总是显示"只不

在vb.net中，用什么类型代替vb6.0中的any类型啊？我用object代替时，总是显示"只不

2025-02-12 15:34:40

推荐回答（1个）

回答1：

请参考：

当我把一些旧的VB6项目转变成VS2008时会出现, “Declare”语句中不支持“As Any”的错误说明, 例如在National Instrument中有一个VBib-32.vb中有大量的这样一类的语句:

Declare Function ibcmda32 Lib "Gpib-32.dll" Alias "ibcmda" (ByVal ud AsInteger, ByRef sstr As Any, ByVal cnt As Integer) As Integer
如何办?
有两种办法:
一, 使用具体的参数
例如字符串, 就用string, 那么上面的ByRef as Any, 就写成ByRef as string, 或者

二, 使用特殊说明MarshalAsAttribute

把这段语句放在相应之处, 然后把Any改成Object, 于是最上面的说明语句写成

Declare Function ibcmda32 Lib "Gpib-32.dll" Alias "ibcmda" (ByVal ud AsInteger, ByRef sstr As Object, ByVal cnt As Integer) As Integer

对于ByVal也是一样

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias"GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Object, ByVal lpDefault As String,ByVal lpReturnedString As String, ByVal nSize As Integer, ByVal lpFileName AsString) As Integer

MSDN官方说明, 可以简写成:
Declare Sub SetData Lib "..\LIB\UnmgdLib.dll" ( ByVal x As Short, ByVal o As Object)

这种方法本人实际使用, 可行.

最新问答

有高手在吗？怪物猎人2G，哪套装的会心率最高？谢谢

天下贰灵兽蛋分类

离婚起诉状女方怎么写模板图片

蛙泳有哪几种呼吸方式？

帮小孩取名。父亲姓：王。想取个四个字的名字，男孩。

青春期女生白天用了防晒霜，晚上可以用卸妆水或者卸妆油吗？

大家好我想考武汉理工大学的船舶与海洋工程专业研究生，想问一下武汉大学分数线多少？考哪些科目？

捷信手机分期付款，逾期一个月了怎么办？

关于泡沫之夏的昵称

求一篇《假如给我三天光明》摘抄型读书笔记。300~400字。