Como hacer un ciclo para saber si un proceso se esta ejecutando

[valderramalex]

Buenas tardes busque lo del backgroundworker pero no encontre suficiente informacion asi que me dispuse a encontrar una solucion y esto fue lo que hice:

Imports System.Diagnostics
Imports System.IO
Public Class Form2

Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
Dim valor As Boolean
Dim ejecutando As Process() = Process.GetProcessesByName("ffmpeg")
If ejecutando.Length > 0 Then
valor = False
Label1.Text = "COMPRIMIENDO ......."
PictureBox1.Visible = True
Else
valor = True
Label1.Text = "COMPRESION COMPLETA"
PictureBox1.Visible = False
Timer1.Stop()
End If
End Sub

Private Sub Form2_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
PictureBox1.Visible = False
Timer1.Start()
End Sub

en un timer con intervalo de 2 segundos lo puse a verificar si el proceso esta abierto, lo cual nos retorna un valor y puedo saber en mi programa si se esta ejecutando o no.
lo demás son adornos visibles un label con texto y un picture box con la imagen en gif de procesando.

se que puede verse muy novato pero me pareció una buena solución para los que estamos iniciando, quedo activo para recibir comentarios u mejoras.