VB6-MouseWheel With Any Control

[bushmobile]

ok, was fairly simple when managed to get my hands on VB

Don't call the PictureBox 'Picture' - it's a reserved word - i renamed it picMain and then changed this part of the Select Case:

Case TypeOf ctl Is PictureBox
            If Not ctl Is picMain Then
                PictureBoxZoom ctl, MouseKeys, Rotation, Xpos, Ypos
            Else
                bHandled = False
            End If