[kfal]

Declare Function Info Lib "DLL.DLL" ( _
ByVal lLen As Long, _
ByVal szText As String) as Long


Sub X
Dim szText as String
Dim lRet as Long

szText=Space(128)
lRet = Info (127, szText)
...
End Sub