vb.net 不打开tiff文件情况下截取部分区域另存为图片

如果你不想打开 TIFF 文件，也可以使用 .NET Framework 自带的 System.Windows.Media.Imaging 命名空间中的 TiffBitmapDecoder 和 CroppedBitmap 类来读取和处理 TIFF 图片的部分区域。下面是一个示例代码，可以读取指定区域的 TIFF 图片，并将其另存为新的图片：

Dim decoder As TiffBitmapDecoder = New TiffBitmapDecoder(New Uri("original.tiff"), BitmapCreateOptions.None, BitmapCacheOption.Default)

Dim source As BitmapSource = decoder.Frames(0)

Dim rect As Int32Rect = New Int32Rect(10, 10, 100, 100) ' 定义要读取的区域

Dim cropped As CroppedBitmap = New CroppedBitmap(source, rect) ' 读取指定区域的图片

Dim encoder As JpegBitmapEncoder = New JpegBitmapEncoder() ' 创建 JPEG 编码器

encoder.Frames.Add(BitmapFrame.Create(cropped)) ' 将裁剪后的图片添加到编码器中

Using stream As FileStream = File.Create("cropped.jpg") ' 创建文件流并保存图片
    encoder.Save(stream)
End Using

在上面的代码中，我们创建了一个 TiffBitmapDecoder 对象来读取原始 TIFF 图片。然后，我们获取了第一帧图片（如果 TIFF 文件包含多帧图片，则需要修改该代码以读取指定帧）。接着，我们定义了一个 Int32Rect 对象来指定要读取的区域。然后，我们使用 CroppedBitmap 类的构造函数来裁剪指定区域的图片，并将其存储在一个新的 CroppedBitmap 对象中。最后，我们创建了一个 JpegBitmapEncoder 对象来将裁剪后的图片编码为 JPEG 格式，并使用 Save 方法将其保存到文件中。

请注意，上述示例代码中的区域参数可能需要根据实际需要进行调整。另外，如果你需要处理多个 TIFF 图片，可以将上述代码放在一个循环中，对每张图片进行处理。