关于使用VB.NETANY问题要点总结

我们在使用指针的时候会运到很多问题，不知道你们在编程中遇到过没有，这里把我也前遇到的问题分享给大家一些。Any不是一个真正的类型，它只是告诉VB编译器放弃对参数类型的检查，这样，理论上，我们可以将任何类型传递给API。Any在什么地方用呢？让我们来看看，在VB文档里的是怎么说的，现在就请打开MSDN(Visual Studio 6自带的版本)，翻到"Visual Basic文档"->"使用Visual Basic"->"部件工具指南"->"访问DLL和Windows API"部分，再看看"将 C 语言声明转换为 Visual Basic 声明"这一节。文档里告诉我们，只有C的声明为LPVOID和NULL时，我们才用VB.NET ANY。实际上如果你愿意承担风险，所有的类型你都可以用Any。当然，也可以如我所说，永远不要用VB.NET ANY。

为什么要这样？那为什么VB官方还要提供Any？是信我的，还是信VB官方的？有什么道理不用VB.NET ANY？

#T#如前面所说，VB官方不鼓励我们使用指针。因为VB所标榜的优点之一，就是没有危险的指针操作，所以的内存访问都是受VB运行时库控制的。在这一点上，JAVA语言也有着同样的标榜。但是，同JAVA一样，VB要避免使用指针而得到更高的安全性，就必须要克服没有指针而带来的问题。VB已经尽***的努力来使我们远离指针的同时拥有强类型检查带来的安全性。但是操作系统是C写的，里面到处都需要指针，有些指针是没有类型的，就是C程序员常说的可怕的 void*无类型指针。它没有类型，因此它可以表示所有类型。如CopyMemory所对应的是C语言的memcpy，它的声明如下：

 
 

  
  
void *memcpy( void *dest, const void *src, size_t count );
 
 

因memcpy前两个参数用的是void*，因此任何类型的参数都可以传递给他。一个用C的程序员，应该知道在C函数库里这样的void*并不少见，也应该知道它有多危险。无论传递什么类型的变量指针给上面memcpy的void*，C编译器都不会报错或给任何警告。在VB里大多数时候，我们使用Any就是为了使用void*，和在C里一样，VB也不对Any进行类型检查，我们也可以传递任何类型给Any，VB编译器也都不会报错或给任何警告。但程序运行时会不会出错，就要看使用它时是不是小心了。正因为在C里很多错误是和void*相关的，所以，C++鼓励我们使用satic_cast 来明确指出这种不安全的类型的转换，已利于发现错误。

说了这么多C/C++，其实我是想告诉所有VB的程序员，在使用Any时，我们必须和C/C++程序员使用void*一样要高度小心。　VB里没有satic_cast这种东西，但我们可以在传递指针时明确的使用long类型，并且用VarPtr来取得参数的指针，这样至少已经明确地指出我们在使用危险的指针。如程序二经过这样的处理就成了下面的程序：

 
 

  
  
'使用更安全的CopyMemory，明确的使用指针！ 
  
  
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (ByVal Destination As Long, ByVal Source As Long, ByVal Length As Long) 
  
  
Sub SwapStrPtr2(sA As String, sB As String) 
  
  
Dim lTmp As Long 
  
  
Dim pTmp As Long, psA As Long, psB As Long 
  
  
pTmp = VarPtr(lTmp): psA = VarPtr(sA): psB = VarPtr(sB) 
  
  
CopyMemory pTmp, psA, 4 
  
  
CopyMemory psA, psB, 4 
  
  
CopyMemory psB, pTmp, 4 
  
  
End Sub  
 
 

网页名称：关于使用VB.NETANY问题要点总结
网页地址：http://www.hantingmc.com/qtweb/news11/371011.html

网站建设、网络推广公司-创新互联，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联