Returning strings to VB from a DLL

[twobits]

Hi im trying to return s string from PB to VB without success, here is my code:

PB code:

Code: Select all

  ProcedureDLL.s GetName()
  
    ProcedureReturn "Test"
  EndProcedure

VB decleration:

Code: Select all

Public Declare Function GetString Lib "purebasic.dll" () As String

VB use:

Code: Select all

Private Sub Command1_Click()

    Command1.Caption = GetString
End Sub

The command buttons caption is "" after the function is called, any help appreciated.
2_bits

[Rings]

search the Resourcesite for 'VB_CALL_PBDLL' , there is a working example from me

[twobits]

OK, thank you very much