исключение sql Null в vb.net

Вместо этого:

Dim ImgStream As New MemoryStream(CType(command.ExecuteScalar, Byte()))

сделать это:

Dim result = TryCast(command.ExecuteScalar(), Byte())

If result IsNot Nothing Then
    Dim imgStream As New MemoryStream(result)

    'Use imgStream here.
End If

TryCast вернет Nothing, если указанное значение не может быть приведено как указанный тип. [117 ]

Обратите внимание, что вы также можете сделать это при желании:

Dim result = command.ExecuteScalar()

If result IsNot DBNull.Value Then
    Dim imgStream As New MemoryStream(DirectCast(result, Byte()))

    'Use imgStream here.
End If