[VB6] ALT+S in textbox

[tom.becker]

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)



If (Shift And vbAltMask) > 0 And KeyCode = vbKeyS Then
MsgBox "hai premuto alt + s!!"
End If

End Sub