Здравствуйте, maslenisa, Вы писали:
M>Robot:
M>Declare Function Test Lib "FL.dll"(byref c as String) as Integer
M>...
M>Dim filename as String
M>dim c as integer
M>c = Test(filename)
Надо так
Dim filename as String * 256
Dim c As Integer
c = Test(filename)