• Home
 · 
• String Manipulation
 · 
• This code lets you get only the path from a common dialog control. Can be very useful.

This code lets you get only the path from a common dialog control. Can be very useful.

This code lets you get only the path from a common dialog control. Can be very useful.

Rate This code lets you get only the path from a common dialog control. Can be very useful.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub Command1_Click()
Dim x As String
Dim y As Integer
CommonDialog1.Filter = "All Files [*.*]|*.**"
CommonDialog1.ShowOpen
x = CommonDialog1.FileName

For i = 1 To 255

If Mid(x, i, 1) = "\" Then
y = i
End If

Next i

Text1.Text = Mid(x, 1, y)
End Sub