oppure usi una funzione tipo:
codice:
Private Sub Form_Current()
   If bitrate Then
       Immagine4.Picture = "C:\immagine1.jpg"
   Else
       Immagine4.Picture = "C:\immagine2.jpg"
   End If
End Sub