OK, чтобы получить имя текущего подключенного WiFi попробуем это,
Перейти к NuGet
Package Manager
>Manage NuGet Packages For Solution
. нажмите кнопку Обзор и поиск managedwifi
Установите пакет (Там должен быть только один)
После то сделано, следуйте этому примеру я сделал для вас.
Imports System.Collections.ObjectModel
Imports System.Text
Imports NativeWifi
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
''THIS WILL DISPLAY THE CONNECTED WIFI'S NAME ON START UP.
Dim wlan = New WlanClient()
Dim connectedSsids As Collection(Of [String]) = New Collection(Of String)()
For Each wlanInterface As WlanClient.WlanInterface In wlan.Interfaces
Dim ssid As Wlan.Dot11Ssid = wlanInterface.CurrentConnection.wlanAssociationAttributes.dot11Ssid
connectedSsids.Add(New [String](Encoding.ASCII.GetChars(ssid.SSID, 0, CInt(ssid.SSIDLength))))
For Each item As String In connectedSsids
Label1.Text = item ''CHANGE THE LABEL TO A TEXTBOX OR WHERE EVER YOU WANT TO DISPLAY YOUR CONNECTED WIFI'S NAME.
Next
Next
''CONTINUE ON FROM HERE.
End Sub
End Class
Если у вас есть какие-либо вопросы, дайте мне знать, и я сделаю все возможное, чтобы быстро ответить вам.
Счастливое кодирование!
Вы просто хотите отобразить текущее имя подключенного Wi-Fi в вашей программе VB? – Werdna
Да. Просто каким-то образом превратить его в строку или что-то в этом роде. – Robert