split the date

Hi!
i tried this to get Jul 5/10 and formate 06/05/10
but it gives type mismatch.pl help

Sub Sample()
Dim StrSample As String, MyArray() As String, Temp As String

StrSample = "RE: Password - Jul 5/10"

MyArray = Split(StrSample, "-")
MsgBox (MyArray)

End Sub

you can not display an array in a messagebox, only an element from the array
try msgbox myarr(1)

westconn
i tried to catch the subject in outlook
capture after '-' this
i tried but it gives type mismatch
Sub Sample()
Dim StrSample As String, MyArray() As String, Temp As String

olMail.Subject = "RE: Password - Jul 5/10"

MyArray = Split(olMail.Subject, "-")


End Sub

which line gives the error?

you are setting the subject?