MP3 routine prob

Hey, I get an error when i'm adding a mp3 file into a listbox.
I'm adding the file with:

Code:

---

PlayList......+ MP3.Length

---

and i get an error: Type Mismatch
The bold line in the code is the yellow line which VB marks in error

Code:

---

Public Function LengthInSec() As Long
  Dim Ls As String * 30
 
  Call mciSendString("set MP3Play time format milliseconds", 0, 0, 0)
  Call mciSendString("status MP3Play length", Ls, Len(Ls), 0)
  (B)LengthInSec = CLng(Left$(Ls, Len(Ls))) \ 1000(/B)
End Function

---

CAn ne1 plz fix theat line for me?

K
BTW, this is leading me to another question:
What's the diffrend between Integer and Long?

I still get an error: Type Mismatch. The marked line is:
LengthInSec = CLng(Left$(Ls, Len(Ls))) \ 1000
?

Do u know a way to get the file's length without playin the file?

ne1 else?

Can you plz help me guys?