How do I reset a imagebox on a form? I use a command button to reset all the other fields but it doesn't work on a image box.
The code:

Private Sub rstFields_Click()
Dim ctl As Control
For Each ctl In Me.Controls
Select Case ctl.ControlType
Case acTextBox, acComboBox, acListBox, acCheckBox
If ctl.ControlSource = "" Then
ctl.Value = Null
End If
Case Else
End Select
Next ctl

End Sub