DSAPI Wifi熱點的掃描與鏈接

使用DSAPI掃描和鏈接Wifi熱點，支持鏈接隱藏的SSID。

效果演示：

代碼以下：

    Private Wifi As New DSAPI.網絡.Wifi

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        '--------掃描Wifi熱點
        Win7連接列表框1.連接項列表.Clear()
        Dim 全部熱點() As DSAPI.網絡.Wifi.Wifi熱點 = Wifi.掃描可用Wifi熱點
        For Each 熱點 As DSAPI.網絡.Wifi.Wifi熱點 In 全部熱點
            Win7連接列表框1.連接項列表.Add(New 連接項(熱點.SSID名稱))
        Next


        '--------鏈接wifi熱點
        Dim 已鏈接網絡 As Boolean = If(DSAPI.網絡.當前已聯網的網絡鏈接 Is Nothing, False, True)
        If 已鏈接網絡 Then Exit Sub
        For Each 熱點 As DSAPI.網絡.Wifi.Wifi熱點 In 全部熱點
            If 熱點.SSID名稱 = "dskj-bj" Then
                Wifi.鏈接到Wifi熱點(熱點.SSID名稱, "123123123")
                Exit For
            End If
        Next
    End Sub

Wifi熱點屬性：

SSID名稱
加密類型
無線信道
信號質量
有安全鎖

Wifi熱點方法:

鏈接到Wifi熱點
掃描可用Wifi熱點