:sign0013:,I not make it clearly: some buttons(keypad) on the headset ,how to use the headset button to control MyApp,so need read the message from headset.
Sub Form1_Keypress(key)
msgbox(key)
End Sub
Sub App_Start
door.New1(false)
door.FromControl("Form1")
door.SetProperty("KeyPreview", true)
event.New1(door.Value, "KeyDown")
End Sub
Sub event_NewEvent
door.Value = event.Data
msgbox(dooor.GetValue("KeyCode"))
End Sub
Thanks eww245 .I did try it ,but it still not work.
I find an external libray "headset.dll" in my PPC,the headset.dll should be the driver for headset,and how can I call it?