Adding a label to specific Images

[THopwood]

Hi, So what I am looking to do is to add a label to a specific image. At the moment I have a gallery and I would like to add labels to it to display what the image is.
For example if Images(0) was shown, then the program would lbl.show() and lbl.hide() the other existing labels (I have three labels in total all in the same position)

I have tried doing these lines below but the program was saying that it cannot be converted to a bitmap.

 If PodGalleryPictureBox.Image = Images(0) Then
lblLondon.show()
lblLiverpool.hide()
lblManchester.hide(0)
End If

If PodGalleryPictureBox.Image = Images(1) Then
lblLondon.hide()
lblLiverpool.show()
lblManchester.hide(0)
End If

and this code was vice versa for each image.


Current Code:

Public Class PodsGallery

    Dim Images(14) As Bitmap
    Dim Pos As Integer = 0
    Private Sub Pods_Gallery_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'Inserting images from resources
        Images(0) = GloriousGetaways.My.Resources._1
        Images(1) = GloriousGetaways.My.Resources._2
        Images(2) = GloriousGetaways.My.Resources._3
        Images(3) = GloriousGetaways.My.Resources._4
        Images(4) = GloriousGetaways.My.Resources._5
        Images(5) = GloriousGetaways.My.Resources._6
        Images(6) = GloriousGetaways.My.Resources._7
        Images(7) = GloriousGetaways.My.Resources._8
        Images(8) = GloriousGetaways.My.Resources._9
        Images(9) = GloriousGetaways.My.Resources._10
        Images(10) = GloriousGetaways.My.Resources._11
        Images(11) = GloriousGetaways.My.Resources._12
        Images(12) = GloriousGetaways.My.Resources._13
        Images(13) = GloriousGetaways.My.Resources._14

        'Puts the images into order
        PodGalleryPictureBox.Image = Images(Pos)
    End Sub

    'Opens Gallery Form
    Private Sub btnBack_Click(sender As Object, e As EventArgs) Handles btnBack.Click
        Gallery.Show()
        Me.Hide()
    End Sub

    'Opens Book a Pod Form
    Private Sub btnBookAPod_Click(sender As Object, e As EventArgs) Handles btnBookAPod.Click
        BookAPod.Show()
        Me.Hide()
    End Sub

    'Opens Main Meny Form
    Private Sub btnMainMenu_Click(sender As Object, e As EventArgs) Handles btnMainMenu.Click
        MainMenu.Show()
        Me.Hide()
    End Sub

    'Directing the right button to show the next photo
    Private Sub btnRight_Click(sender As Object, e As EventArgs) Handles btnRight.Click
        Pos = Pos + 1

        If Pos < Images.Length - 1 Then

            PodGalleryPictureBox.Image = Images(Pos)

        Else
            Pos = Images.Length - 2
        End If
    End Sub

    'Directing the left button to show the previous photo
    Private Sub btnLeft_Click(sender As Object, e As EventArgs) Handles btnLeft.Click
        Pos = Pos - 1

        If Pos >= 0 Then

            PodGalleryPictureBox.Image = Images(Pos)

        Else
            Pos = 0
        End If
    End Sub