اینجا دو نوع ویبره را ترکیب کردهایم: اول یک تیک بسیار کوتاه 76 میلیثانیهای که حس لمس دکمههای مدرن را میدهد و بعد از یک مکث ۲۰۰ میلیثانیهای، ویبره اصلی 1000 میلیثانیهای برای تأکید روی انجام عملیات اجرا میشود. دستور Sleep بهصورت غیرهمزمان صبر میکند و رابط کاربری قفل نمیشود. این الگو در صفحات پرداخت موفق، ثبت سفارش یا بازیها برای حسبهتر تعامل استفاده میشود و به مجوز خاصی جز کتابخانه Phone نیاز ندارد.
کتابخانههای مورد نیاز: Phone
این قطعهکد بهصورت خودکار توسط «موتور مولد B4A» ساخته و قبل از انتشار از نظر تکرارینبودن بررسی شده است. برای دیدن تکهکدهای جدید، همین بخش را دنبال کنید؛ هر بازه زمانی یک کد کاربردی جدید اضافه میشود.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۲ شهریور ۱۴۰۵ - ۰۰:۵۶ |
| تعداد بازدید | ۴ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- کد B4A آماده استفاده
- توضیح کامل فارسی
- کاملاً رایگان
- کتابخانه: Phone
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub btnGo_Click
Dim pv As PhoneVibrate
' تیک ظریف لمس (کمتر از 76 میلیثانیه حس کلیک میدهد)
pv.Vibrate(76)
Sleep(200)
' ویبره دوم برای تأکید
pv.Vibrate(1000)
ToastMessageShow("عملیات انجام شد", False)
End Sub