title: Get Filename from random picturebox
body: <p>i have picturebox that display image random from directory i want to get name of every image from picturebox to label</p>
  
  <pre><code> Dim rnd As New Random
      Dim alljpgs() As String = IO.Directory.GetFiles("C:\Users\" + Environment.UserName.ToString + "\AppData\SystemInfo\Images", "*.jpg", IO.SearchOption.TopDirectoryOnly)
      Dim jpg As New Bitmap(alljpgs(rnd.Next(0, alljpgs.Count - 1)))
      PictureBox14.Image = jpg
  
      ' Label24.Text = (IO.Path.GetFileNameWithoutExtension(jpg.ToString))
      Dim x As String = Path.GetFileName(PictureBox14.ImageLocation)
      Label24.Text = x
  </code></pre>
  
  <p>but it's not working how to do this?</p>