Dim PairedDevices As Map
PairedDevices = Serial1.GetPairedDevices
Dim l As List
l.Initialize
For i = 0 To PairedDevices.Size - 1
l.Add(PairedDevices.GetKeyAt(i))
Next
Dim res As Int
res = InputList(l, "Choose device", -1) 'show list with paired devices
If res <> DialogResponse.CANCEL Then
Serial1.Connect(PairedDevices.Get(l.Get(res))) 'convert the name to mac address
End If
این کدها برای نمایش لیست بلوتوث های دستگاه است برای اتصال.
من میخواهم لیست رو نشونم نده فقط با نام و پسوردی که خودم تو برنامه بهش میدم کانکت بشه.
سوال
Mostafanet 21
سلام به اساتید.
این کد رو نگاه کنید:
این کدها برای نمایش لیست بلوتوث های دستگاه است برای اتصال.
من میخواهم لیست رو نشونم نده فقط با نام و پسوردی که خودم تو برنامه بهش میدم کانکت بشه.
کجای این کد رو تغییر بدم.
لطفا کمک کنید.با تشکر فراوان
لینک ارسال
به اشتراک گذاری در سایت های دیگر
9 پاسخ به این سوال تاکنون داده شده است
ارسالهای توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.