在使用 AForge.Video.DirectShow 库时,可以通过设置 VideoResolution 属性来控制视频的分辨率大小。例如:
Dim videoSource As NewVideoCaptureDevice(videoDevices(deviceIndex).MonikerString)
videoSource.DesiredFrameSize = New Size(640, 480)
videoSource.DesiredFrameRate = 30
AddHandler videoSource.NewFrame, AddressOf video_NewFram