神奇的＊号

MsgBox lpString

这时如果这样：

Dim lpString as String *

GetPrivateProfileString "Test", "Str1", "", lpString, 10, "c:\t.ini"

MsgBox lpString

结果……哈哈，你自己试试看吧！

这时盖茨的操作系统会说你的程序很粗鲁，并以很粗鲁的方式告诉你，程序出错了！哈哈…..

这只是个简单的例子，如果用VB和VC混合开发，如VC做DLL文件在VB中调用，这样可以解决很多问题并且很方便。例如现有一VC做的DLL（Handle.dll）　文件，其中有一函数其原型是这样的：

DWORD GetUserName(LPTSTR lpUserNameBuff)

此函数是用来取用户名的，并将取到的用户名放入lpUserNameBuff中，并返回取到的字节数。要在VB　中使用该函数，先声明一下：

Public Declare Function GetUserName Lib "Handle.dll" (ByVal lpUserNamebuff As String) As Long

好了，可以这样用：

Dim lpUserName as String * 16

GetUserName lpUserName

MsgBox lpUserName

同样，如果你这样：

Dim lpUserName as String

文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!