Resize Image in DataGridView Control in VB.Net

Datagridview_Resize_Image.vb

'Visual Basic Form
'Form1 (DataGridView1)
Public Class Form1
  Private Sub DataGridView1_CellFormatting(sender As Object, _
      e As DataGridViewCellFormattingEventArgs) Handles DataGridView1.CellFormatting
        If e.RowIndex = -1 Or e.ColumnIndex = -1 Then Exit Sub
        Dim Col_Name as String = ("ImageCol")
        Try
            If Not IsNothing(e.Value) Then
                If DataGridView1.Columns(e.ColumnIndex).ValueType = GetType(Byte()) Then
              Dim imageColumn = DirectCast(DataGridView1.Columns(Col_Name), DataGridViewImageColumn)
                    imageColumn.ImageLayout = DataGridViewImageCellLayout.Zoom
                End If
            End If
        Catch ex As Exception
            MsgBox("Error Display Image : " & ex.Message)
        End Try
    End Sub
End Class