Vb.net 使用EMGU保存网络摄像头中的图片

Vb.net 使用EMGU保存网络摄像头中的图片,vb.net,image,save,emgucv,profile-picture,Vb.net,Image,Save,Emgucv,Profile Picture,我想在VB 2015中修改我的程序,该程序使用网络摄像头捕获照片并将其保存到我的文件夹中。问题是它会替换拍摄的每一张照片,我想用这个格式名称picture01、picture02等保存每一张照片 信息:我正在使用Emgu 您可以将文件名设置为日期戳,这样它将始终是唯一的: Dim a As String = Now.ToShortDateString & Now.ToLongTimeString a = a.Replace(":", "").Replace("/", "").Repla

我想在VB 2015中修改我的程序,该程序使用网络摄像头捕获照片并将其保存到我的文件夹中。问题是它会替换拍摄的每一张照片,我想用这个格式名称picture01、picture02等保存每一张照片

信息:我正在使用Emgu


您可以将文件名设置为日期戳,这样它将始终是唯一的:

Dim a As String = Now.ToShortDateString & Now.ToLongTimeString
a = a.Replace(":", "").Replace("/", "").Replace("\", "")

PictureBox1.Image.Save("D:\WEBCAM\" & a & ".JPEG", Imaging.ImageFormat.Jpeg)

也可以使用简单的整数增量:

Private FileID as Integer = 0
Private Sub captWebcam_Click(sender As Object, e As EventArgs) Handles captWebcam.Click
    Timer1.Stop()

    'Save the picture
    FileID += 1
    PictureBox1.Image.Save("D:\WEBCAM\Img" & FileID.ToString("00") & ".JPEG", Imaging.ImageFormat.Jpeg)
    capture.Dispose()
End Sub

谢谢你的主意,我非常喜欢。尊敬:)
Private FileID as Integer = 0
Private Sub captWebcam_Click(sender As Object, e As EventArgs) Handles captWebcam.Click
    Timer1.Stop()

    'Save the picture
    FileID += 1
    PictureBox1.Image.Save("D:\WEBCAM\Img" & FileID.ToString("00") & ".JPEG", Imaging.ImageFormat.Jpeg)
    capture.Dispose()
End Sub