Исключение не обработано

Using myImg1 As Bitmap = CType(Image.FromFile(url & iRand & ".jpg"), Bitmap)
                'перерисовываем  с новым размером
                Dim myImg2 As New System.Drawing.Bitmap(myImg1, 300, 226)
                'myImg2 будет содержать изображение размером 272x156 пикселей
                MyButton24.BackgroundImage = myImg2
            End Using

Application.Startuppath & "\"  url &  irand &".jpg"

Application.Startuppath & "\"  url &  irand &".jpg"

 url &  irand &".jpg"

 Private Sub MyButton13_Click_1(sender As Object, e As EventArgs) Handles MyButton13.Click
        url = "Весёлое - Высота\"
        name0 = "Весёлое "
        name1 = " Высота"
        Trainer3(16)
    End Sub
    Private Sub MyButton14_Click(sender As Object, e As EventArgs) Handles MyButton14.Click
        url = "Острые - Плавные\"
        name0 = "Острые "
        name1 = " Плавные"
        Trainer3(8)
    End Sub
    Private Sub MyButton15_Click(sender As Object, e As EventArgs) Handles MyButton15.Click
        url = "Биообъект - нет Биообъекта"
        name0 = "Биообъект "
        name1 = "нет Биообъекта"
        Trainer3(5)
    End Sub
 
    Private Sub MyButton16_Click(sender As Object, e As EventArgs) Handles MyButton16.Click
        url = "Натуральное - Сделанное руками\"
        name0 = "Натуральное "
        name1 = "Сделанное руками"
        Trainer3(26)
    End Sub