La rotellina di scorrimento del mouse è utile in alcune applicazioni del computer , ma può causare problemi in Microsoft Access . Se si creano applicazioni database con Access, si potrebbe avere familiarità con il modo in cui la rotella di scorrimento può causare record a ciclo troppo veloce o ciclo prima immissione dei dati è completa. Con il rilascio di Access 2007 , la rotellina di scorrimento è disabilitata di default nell'applicazione. Nelle versioni precedenti di Access 2007 , tra cui Access 2003 , è necessario disattivare manualmente la funzione di rotellina di scorrimento con un modulo o il codice VBA posto in una routine evento del mouse . Questo articolo vengono descritti due metodi per ottenere questo risultato . Cose che ti serviranno
Computer con accesso a Internet
Show More Istruzioni
Chiamare un file DLL dal codice
manualmente pagina 1

Scarica il MouseWheelHookA2k libera database e codice di esempio da il Holdings sito Lebans ( vedi Risorse per il link) . Estrarre il file in una cartella sul computer .
2

Copia e incolla il file " MouseHook.DLL " nella cartella con il file MDB di Access .
3 < p > Aprire il database di Access . Trovare e aprire la maschera " StartUp " nella lista dei moduli per il database ( la forma iniziale potrebbe avere un nome diverso) .
4

Fare clic su " Strumenti di Progettazione Form" barra degli strumenti e creare un " Comando Button " in qualsiasi punto della forma .
5

Fare clic con il pulsante di comando e cliccare l'opzione" Proprietà " dal menu a comparsa. Scorrere verso il basso per l'opzione " OnClick " e fare doppio clic sul campo vuoto per aprire il Visual Basic, Applications Edition (VBA)
6

Copia e incolla il seguente codice nell'editor di VBA : . < Br

' > Ruotare la rotella del mouse Off

Dim blRet come booleano

blRet = MouseWheelOFF
7

Chiudere l'editor VBA .
8

Creare un'altra " Pulsante di comando " su qualsiasi altra forma nel vostro database per girare la rotella di scorrimento indietro prima di chiudere il database . Inserisci il seguente codice dietro il pulsante di comando nel codice " OnClick " :

' Girare la rotellina del mouse su

Dim blRet come booleano

blRet = MouseWheelON
< br >
importare un modulo in Access Database
9

scaricare il database di esempio basMouseHook libero e codice dal sito EverythingAccess.com ( vedi Risorse per il link) . Salvare il database in una cartella del computer .
10

Aprire il database in Access . Fare clic sull'opzione "File /Importa" e poi selezionare "Moduli ". Passare alla cartella dove avete salvato il database basMouseHook e importare il modulo di codice basMouseHook dal database di esempio .
11

Aprire il modulo " StartUp " nella finestra di progettazione del form. Pulsante destro del mouse sulla forma , quindi scegliere l'opzione " Proprietà" dal menu a comparsa.
12

Scorrere verso il basso per la routine evento " SuApertura " e fare doppio clic su di esso per entrare nell'editor VBA .
13

Copia e incolla il seguente codice nella routine evento " SuApertura " :

private Sub Form_Open ( Cancel As Integer ) per

MouseHook statico As Object < br

Set> MouseHook = NewMouseHook ( Me ) per

End Sub