Add prefix to arry of string

[abfab]

Hello,
I'm new to VB, and I realy don't get the arrays. I have to write a program that takes an arry of string as a parameter and adds "sir" to each string. I need to use "get upper bound."
Can anyone help? I'm desperate, I tried eveything and nothing works.

[wappy]

how about this... :)

Private Sub AddPrefixToArra y(ByRef arr() As String)
Dim i As Integer
For i = 1 To UBound(arr)
arr(i - 1) = "Sir " & Trim(arr(i - 1))
Next i
End Sub

[abfab]

Hi,
I did try and Its still not working, I can not get it to display anything in the listbox, Thank you for your help.
:confused:

Private Sub Button1_Click(. .....ByVal e ....) Handles Button1.Click

Dim List() As String = {"", "Kill", "Zav", "SAV", "Jan"}
ListBox1.Items. Clear()
ListBox1.Items. Add(AddTitle)
End Sub

Private Sub AddTitle(ByRef arr() As String)
Dim i As Integer
For i = 1 To UBound(arr)
arr(i - 1) = "Sir " & Trim(arr(i - 1))
Next i
End Sub

[wappy]

TRY THIS..........

Private Sub Command1_Click( )
Dim arr(4) As String

arr(0) = ""
arr(1) = "Kill"
arr(2) = "Zav"
arr(3) = "SAV"
arr(4) = "Jan"

AddTitle arr

End Sub

Private Sub AddTitle(ByRef arr() As String)
Dim i As Integer
ListBox1.Clear
For i = 1 To UBound(arr)
ListBox1.AddIte m "Sir " & Trim(arr(i - 1))
Next i
ListBox1.AddIte m ""
ListBox1.AddIte m "ENJOY CODIN :)"
End Sub

[wappy]

you shouldnt put a procedure name on listbox.additem since the syntax only requires a variable or a string value, besides sub procedures doesnt return a value, use functions instead of procedures it will work then.

[abfab]

Thank you so much,
I got it, this realy works.


Private Sub Button1_Click Handles Button1.Click
Dim arr() As String = {"", "Kill", "Zav", "SAV", "Jan"}

AddTitle(arr)

End Sub


Private Sub AddTitle(ByRef arr() As String)
Dim add As String = ("Sir. ")
Dim i As Integer
ListBox1.Items. Clear()
For i = 1 To arr.GetUpperBou nd(0)
ListBox1.Items. Add(add & Trim(arr(i)))
Next i
End Sub