vb.net Emgu.CV 旋转摄像头视频

Imports Emgu.CV
Imports Emgu.CV.Structure
Imports Emgu.CV.Util

Public Class Form1

Dim capturez As Capture = New Capture
Dim imagez1 As Image(Of Bgr,Byte)
Dim imagez2 As Image(Of Bgr,Byte)
Dim rotation As Integer

Private Sub Timer1_Tick(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Timer1.Tick

imagez1 = capturez.RetrieveBgrFrame
imagez2 = imagez1.Rotate(rotation,New Bgr(255,255,255))

rotation = rotation + 2
If rotation = 360 Then
rotation = 0
End If

PictureBox1.Image = imagez2.ToBitmap
End Sub
End Class

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!