How do I take a specific part of text from a label and store it in a variable???

[Simonetos]

Hello guys!!!

I need your help here...
I have a label which takes a path from a file in my hard drive.
Example: C:\Documents and Settings\All Users\Desktop\none.exe

I want to store this path in to a variable but with out the last part
with file.
Example: C:\Documents and Settings\All Users\Desktop

I don't want to write it manualy.
Example:
Dim A as String
A = "C:\Documents and Settings\All Users\Desktop"

I want to write it like this:
DIM A as String
A = Label1.Caption

So, how can I take a specific part of text from this label and
store it in "A" variable???

Thanx!!!