Eu tenho uma função que me retorna um Double
e preciso verificar se o resultado é igual a 5000. Eu estou usando If CType(resultadoFunção as double, Int32) = 5000 Then
, mas embora ele mostre 5000, ele não retorna True
. Por que?
Private Async Sub Teste1()
'Necessário Engucv
'Imports Emgu.CV
'vid = caminho de algum video
Capiture = New VideoCapture(vid)
While True
Dim m As New Mat
Capiture.Read(m)
PictureBox1.Image = m.Bitmap
Label1.Text = CType(Capiture.GetCaptureProperty(CvEnum.CapProp.PosMsec), Int32).ToString
Await Task.Delay(42)
If CType(Capiture.GetCaptureProperty(CvEnum.CapProp.PosMsec), Int32) = 5000 Then
'Faz algo
End If
End While
End Sub