لرزش گوشی ( ویبره ) با کلیک روی دکمه

[arastooms 1,046]

سلام یک دکمه دارم و قصد دارم در ساب دکمه وقتی کار بر کلیک میکنه "یک چهارم ثانیه" ویبره بزنه
چه کدی باید استفاده کنم عزیزان؟
با تشکر از همه اساتید

[dr.mohammad 68]

کتابخونه phone رو تیک بزنید و توی کلیک این رو بنویسید

Sub Button1_Click

    Dim vib As PhoneVibrate

    vib.Vibrate(250)

End Sub