How to send TEXT to a sub procedure ?

[arvinfx]

I need to have code to send a text to sub procedure like this:

Send_out("Hello World")

How to do it in correct way?

[Firewire12]

DIM text as string [7]
Sub Procedure aa (DIM ByRef wert as string [7])
...
...
end sub

text = "hello"
aa (text)

That´s all.
You find the text hello in the string wert.