آموزش قطع و وصل کردن GPS و Bluetooth

[Kazem Forghani 2,928]

سلام،

1 - کتابخانه ToggleLibrary رو فعال کنید.

2 - به این صورت بنویسید :

Dim t As Toggle
t.TurnBluetoothOff

خط اول : یک متغیر از نوع Toggle تعریف کردیم .

خط دوم : بلوتوث رو غیر فعال کردیم . برای فعال کردن Off رو On کنید

 

1- برای قطع و وصل کردن GPS ابتدا کتابخانه TurnGPS رو تیک بزنید سپس :

Dim g As TurnGPS
g.Initialize
g.turnGPSOff

خط اول : یک متغیر از نوع TurnGPS تعریف کردیم.

خط دوم : اون رو Initialize کردیم

خط سوم : GPS گوشی موبایل رو قطع کردیم .

شما با کد زیر می تونید اون رو روشن کنید :

g.turnGPSOn

[hosabd222 20]

ممنون بابت آموزش