' This function returns a value based on the PictureBox.Image.Flags property's value.
Function GetFlags()
    If PictureBox.Image.Flags = 1 Then
        Return 1
    End If
    If PictureBox.Image.Flags >= 2 Then
        Return 2
    End If
    If PictureBox.Image.Flags >= 4 Then
        Return 3
    End If
    If PictureBox.Image.Flags >= 8 Then
        Return 4
    End If
            ' Update the "PictureInfo" variable based on the vlaue the "GetFlags()" function returns.
        If GetFlags() = 1 Then
            PictureInfo += Environment.NewLine & "• Scalable: yes."
        End If
        If GetFlags() = 2 Then
            PictureInfo += Environment.NewLine & "• Scalable: yes." &
            Environment.NewLine & "• Has aplha: yes."
        End If
        If GetFlags() = 3 Then
            PictureInfo += Environment.NewLine & "• Scalable: yes." &
            Environment.NewLine & "• Has aplha: yes." &
            Environment.NewLine & "• Has translucent: yes."
        End If
        If GetFlags() = 4 Then
            PictureInfo += Environment.NewLine & "• Partially scalable: yes." &
            Environment.NewLine & "• Has aplha: yes." &
            Environment.NewLine & "• Has translucent: yes."
        End If