Tactile Feedback?

[Andris]

Can anyone suggest a simple way to create tactile feedback within a _Click event? When touching a button or label, I'd like to create the same feeling as a text input keyboard does.

I haven't seen anything in the libraries except the vibrate function in the phone library, which really doesn't do what I want.

Any suggestions?

 

[Kevin]

I know this post is a bit old now, but I was wanting to do this today as well and it was actually somewhat simple. I'll include it here in case anyone else is looking for it here.

Be sure to add the Phone library to your project if you haven't already.

Sub Process_Globals

Dim Vibrate As PhoneVibrate ' For phone vibration

End Sub



Sub Button_Click

Vibrate.Vibrate (50) ' Vibrate phone for 50 ms

' Do other stuff

End Sub

You can adjust the length of time that the vibration lasts. I found 50 to be about right for key-press feedback.