vb上传图片自动调整角度
时间: 2023-11-23 19:03:31 浏览: 47
在VB中实现上传图片后自动调整角度的方法如下:
首先,我们需要使用VB打开图片,并获取到图片的旋转角度信息。
```vb
Dim img As Image = Image.FromFile("图片路径")
Dim propertyItems() As PropertyItem = img.PropertyItems
Dim rotation As Integer = 0
For Each propItem As PropertyItem In propertyItems
If propItem.Id = &H112 AndAlso propItem.Type = 3 Then
rotation = BitConverter.ToInt16(propItem.Value, 0)
Exit For
End If
Next
```
接下来,我们需要根据获取到的旋转角度信息,将图片进行角度调整。
```vb
Select Case rotation
Case 1
img.RotateFlip(RotateFlipType.Rotate90FlipNone)
Case 2
img.RotateFlip(RotateFlipType.Rotate180FlipNone)
Case 3
img.RotateFlip(RotateFlipType.Rotate270FlipNone)
End Select
```
最后,我们将调整后的图片保存到指定路径。
```vb
img.Save("保存路径")
img.Dispose()
```
整个过程中,我们首先打开图片并获取旋转角度信息,然后根据这个角度信息进行图片的调整,最后保存并释放资源。这样实现了在VB中上传图片后自动调整角度的功能。
相关推荐
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![-](https://csdnimg.cn/download_wenku/file_type_column_c1.png)
![-](https://csdnimg.cn/download_wenku/file_type_lunwen.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)
![](https://csdnimg.cn/download_wenku/file_type_ask_c1.png)