Dr. Dobb's Sourcebook July/August 1997
(a) Private Declare Function Str2B40 Lib "B40DLL" _ Alias "_Str2B40@12" _ (ByVal s As String, ByVal Length As Long, _ ByVal Key As String) As Long (b) Dim arg1 as String * 256 Dim arg2 as String arg2 = String(256, ' ')