Hej
Snabbt och fel woops !
mvh
Sven

Nu är jag rädd att jag inte riktigt förstår!

MvH Dan "DaPe" Persson

Hej
Nej det förstår jag.Jag skrev ett svar på din
fråga om Ctrl+å ....... men efter en stund
kom jag på att svaret var uppåt väggarna
så jag administrerade om inlägget.

Återkommer kolla mitt svar tangentbord

mvh
Sven

Hej
Så här skulle man kunna göra

Option Explicit
Dim CtrlSum As Long
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
CtrlSum = 0
CtrlSum = KeyCode
End Sub
Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
CtrlSum = CtrlSum + KeyCode
Select Case CtrlSum
Case 401
MsgBox ("Du tryckte Ctrl+ö")
Case 461
MsgBox ("Du tryckte Ctrl+ä")
Case 459
MsgBox ("Du tryckte Ctrl+å")
End Select
End Sub

mvh
Sven