Sub Keydown()
  if not m_Flag then
    m_Flag= True
    '... code
  end if
End sub
 
Sub keyup()
  m_Flag = False
end sub

Gruß
Dirk

--
?Get it right the first time

Beitrag wurde zuletzt am 17.09.10 um 20:59:20 editiert.