rullhjulet på en mus är användbart i vissa datorprogram , men det kan orsaka problem i Microsoft Access . Om du skapar databasapplikationer med Access , kan du vara bekant med hur rullhjulet kan orsaka poster att cykla för fort eller cykel innan datainmatning är klar . Med lanseringen av Access 2007 , är scrollhjulet inaktiverat som standard i programmet . I tidigare versioner än Access 2007 , inklusive Access 2003 , måste du inaktivera manuellt scrollhjulet funktionen med en modul eller VBA-kod placeras i ett mushändelse förfarande . I artikeln beskrivs två metoder för att åstadkomma detta . Saker du behöver
Dator med tillgång till Internet
Visa fler instruktioner
Ring en DLL -fil från kod manuellt
1
Ladda ner gratis Databas MouseWheelHookA2k Prov och kod från den Lebans Holdings webbplats ( se Resurser för länk ) . Packa upp filen till en mapp på datorn .
2
Kopiera och klistra in " MouseHook.DLL " filen i mappen med Access MDB -filen .
3
Öppna Access-databas . Hitta och öppna " Autostart " formulär i listan över formerna för din databas ( Din start formulär kan ha ett annat namn ) .
4
Klicka på " Form Design Tools " i verktygsfältet och skapa ett " Command knapp " någonstans på formuläret .
5
Högerklicka på kommandoknappen och klicka på " Egenskaper " alternativet i pop - up menyn . Rulla ner till " OnClick " och dubbelklicka på det tomma fältet för att öppna Visual Basic for Applications ( VBA ) redaktör
6
Kopiera och klistra in följande kod i VBA editorn : .
" Stäng av mushjulet Off
Dim blRet As Boolean
blRet = MouseWheelOFF
7
Stäng VBA editorn .
8
Skapa en annan " Command Button " på någon annan form i databasen för att vrida väljaren igen innan du avslutar databasen . Skriv följande kod bakom Command Button i " OnClick " code :
" Vrid mushjulet
Dim blRet As Boolean
blRet = MouseWheelON
Importera en modul i Access Database
9
Ladda ner den kostnadsfria databasen basMouseHook Prov och kod från EverythingAccess.com webbplats ( se Resurser för länk ) . Spara databasen i en mapp på din dator .
10
Öppna din databas i Access . Klicka på " Arkiv /Importera " och sedan välja " moduler . " Bläddra till den mapp där du sparade basMouseHook databasen och importera basMouseHook kodmodulen från provet databasen .
11
Öppna din " start" formen i former designer fönstret . Högerklicka på formuläret och klicka sedan på " Egenskaper " alternativet på snabbmenyn .
12
Rulla ner till " OnOpen " händelse förfarande och dubbelklicka på den för att komma in i VBA editorn .
13
Kopiera och klistra in följande kod i " OnOpen " händelse förfarande :
Private Sub Form_Open ( Cancel As Integer ) katalog
Statisk MouseHook As Object
Set MouseHook = NewMouseHook ( Me ) katalog
End Sub
