我们在使用指针的时候会运到很多问题，不知道你们在编程中遇到过没有，这里把我也前遇到的问题分享给大家一些。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
