|
| HOMEPAGE | INDICE FORUM | REGOLAMENTO | ::. | NEI PREFERITI | .:: | RSS Forum | RSS News | NEWS web | NEWS software | |
| PUBBLICITA' | | | ARTICOLI | WIN XP | VISTA | WIN 7 | REGISTRI | SOFTWARE | MANUALI | RECENSIONI | LINUX | HUMOR | HARDWARE | DOWNLOAD | | | CERCA nel FORUM » | |
12-09-2002, 21.21.14 | #1 |
Newbie
Registrato: 12-09-2002
Messaggi: 2
|
ACCESS 2000
NON MI PIACE CHE SI POSSANO SCROLLARE I RECORD CON LA ROTELLA PERCHE' VORREI DECIDERE I QUANDO SCROLLA RE I RECORD |
20-09-2002, 16.59.19 | #2 |
Senior Member
Registrato: 04-07-2000
Loc.: Riccione,Italia
Messaggi: 267
|
Io ho usato un piccolo trucco, non troppo elegante ma efficace:
Ho definito una variabile a livello di modulo Usata per rilevare se il nuovo record viene creato dalla pressione del tasto oppure dalla rotella del mouse... Dim NewRecFromBtn As Boolean Nell'evento Su corrente del form ho messo... Private Sub Form_Current() 'Se si passa al nuovo record tramite la rotella del mouse, 'non lo faccio andare al nuovo record On Error Resume Next If Me.NewRecord = -1 And NewRecFromBtn = False Then _ DoCmd.GoToRecord , , acPrevious End Sub Poi, sull'evento click del pulsante NUOVO RECORD.... Private Sub BtnNewRec_Click() On Error GoTo Err_BtnNewRec_Click NewRecFromBtn = True DoCmd.GoToRecord , , acNewRec NewRecFromBtn = False Exit_BtnNewRec_Click: Exit Sub Err_BtnNewRec_Click: MsgBox Err.Description Resume Exit_BtnNewRec_Click End Sub ;o) LeleB. |
20-09-2002, 18.53.51 | #3 |
Gold Member
WT Expert
Registrato: 09-01-2002
Loc.: None of your business
Messaggi: 5.505
|
L'importante è arrangiarsi fino a quando non si trova una soluzione migliore !(Y) (Y) (Y)
|
Utenti attualmente attivi che stanno leggendo questa discussione: 1 (0 utenti e 1 ospiti) | |
Strumenti discussione | |
|
|