Ronin » 19.11.2004 (Пт) 0:34
Доброго времени суток!
Все очень просто:
    Private Sub Form1_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseWheel
        If e.Delta > 0 Then
            MsgBox("Колесико ковернули вперед")
        Else
            MsgBox("Колесико повернули назад")
        End If
С уважением,
Игорь Шувалов aka Ronin