devxlogo

StringFromBSTR – Convert a BSTR to a VB string

StringFromBSTR – Convert a BSTR to a VB string

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (dest As _    Any, source As Any, ByVal bytes As Long)' convert a BSTR into a VB StringFunction StringFromBSTR(ByVal pointer As Long) As String    Dim temp As String    ' copy the pointer into the temporary string's BSTR    CopyMemory ByVal VarPtr(temp), pointer, 4    ' now Temp points to the original string, so we can copy it    StringFromBSTR = temp    ' manually clear then temporary string to avoid GPFs    CopyMemory ByVal VarPtr(temp), 0&, 4End Function

devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist