Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Dim input As String = TextBox1.Text
Dim input2() As String = Nothing
input = input.Replace("/", "\")
input2 = input.Split("\")
Label1.Text = input2.Last
IO.Path.GetFileName([B]Path As String[/B])
[I][B]path:[/B] The path string from which to obtain the file name and extension.[/I]
Dim ofd As New OpenFileDialog
ofd.Multiselect = True
If ofd.ShowDialog = DialogResult.OK Then
For Each File As String In ofd.FileNames
MessageBox.Show(IO.Path.GetFileName(File))
Next
End If
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.