Private Sub Button2_DoubleClick(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Pic1.DoubleClick,Pic2.DoubleClick, anyothercontrol.DoubleClick
//(cast sender to picture control)
If TypeOf sender Is PictureControl Then
ControlName = DirectCast(sender, PictureBox).Name //use select case for further programming with control
Else
ControlName = DirectCast(sender, someothercontrol).Name
End If
End Sub