Using the mouse wheel in the Code IDE

[salvelinus]

Is is possible to use the mouse wheel in the code IDE (Access 2000)? It's annoying to have to use the scrollbars a/o page up/down keys. Thanks.

[RobDog888]

It may just be the form/control needing the focus because on mine
it works with no coding at all. I am using an MS Intellipoint
mouse? There is an API I think to use the wheel in programming.
I will look for it.

[salvelinus]

Thanks, RobDog. One guy at work can use his, but no one else can. He installed Office Developer Edition, apparently. I can't think of any reason this functionality wouldn't be enabled in the IDE. I guess it's better than coding in binary*, but still.

*"Why, you newbies and all your fancy pants languages! In my day, we had to code in 1's and 0's, and we didn't have any 0's!!"

[RobDog888]

It may also depend on the OS, mouse, and any supported mouse
software being installed. I started working on something but I
dont have a way to test since my mouse wheel works and I cont
disable the wheel under the mouse software.

Here is the link to M$ on what you will need.
WM_MOUSEWHEEL

Here is what I had started on.

Option Explicit
'Add one textbox - set to multiline with a scrollbar.
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, ByRef lParam As Any) As Long
 
Private Const WM_MOUSEWHEEL As Long = &H20A
 
Private Sub Form_Load()
    
    Dim i As Integer
    Dim sStr As String
    
    For i = 1 To 25
        sStr = sStr & " Test " & i & vbNewLine
    Next
    Text1.Text = sStr
    
End Sub
 
Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    SendMessage Text1.hwnd, WM_MOUSEWHEEL, 0&, 0& 'The last two parameters need to be filled in I think, since I cant test.
End Sub

HTH

[Dave Sell]

It is possible they need proper mouse drivers installed.

[RobDog888]

Possibly, but as the poster states, One guy at work can use his,
but no one else can. This makes me think that its a low possibility
that everyone is having problems. Although, if they are running
old OS or mouse as you suggest, they may just need an updated
mouse driver.

[salvelinus]

I solved it by installing a different mouse driver, MS Intellimouse 4.1. Apparently the newer versions of the driver have this problem, but old ones work ok. Go figure. Thanks for the ideas.

[RobDog888]

Dave you nailed it.

[Dave Sell]

Originally posted by RobDog888
Dave you nailed it.

Boo-Ya!

[RobDog888]

Although, in my first post I mention the fact that it works for my
intellimouse no problems at all. Hinting at it being the mice.

[Dave Sell]

Originally posted by RobDog888
Although, in my first post I mention the fact that it works for my
intellimouse no problems at all. Hinting at it being the mice.

Yes, you suggesting it works for you, combined with him suggesting it worked on some machines, and not on others, led me to suspect the mouse driver issue. I've had lots of driver issues in my day. You start to recognize them after a decade or so...

[RobDog888]

Just messing with ya.