Access-o-Mania

Ich möchte in einem Formular bei Mausbewegung ein Ereignis auslösen (Setzen eines Feldwertes), aber nur, wenn gleichzeitig auch die shift opder strg-Taste gedrückt wird.
Welchen Code muss ich eingeben?

Hallo,

im Mouse_Move-Ereignis den Wert des Shift-Argumentes auswerten.

schon klar, aber wie lautet dafür der Code?

wie lauten Deine Feldnamen?

Der Feldname lautet M7

konkret:
Der Feldname lautet M7  und soll bei Mausbewegung und shift den Wert "1" erhalten und bei
Mausbewegung und strg den Wert "0" erhalten

Private Sub M7_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Shift = 1 Then
Me!M7 = 1
ElseIf Shift = 2 Then
Me!M7 = 0
End If
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
   Select Case Shift
       Case 1
           'Me.M7 = 1
           Me![M7] = 1
       Case 2
           'Me.M7 = 0
           Me![M7] = 0
       Case 3
           'Me.m7 = "Shift&Ctrl-Taste"
       Case 4
           'Me.m7 = "Alt-Taste-Taste"
   End Select
End Sub

Vielen Dank, hat funktioniert, ich habe die Rückgabewerte nicht gekannt.