vb 写一个简单的win7wifi管理的工具

突然发现我没有分啊 不好意思啊

Dim a As String
Dim b As String
Private Sub Command1_Click()
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "请输入SSID或者密码", vbCritical
Else
a = Text1.Text
b = Text2.Text
Shell "cmd.exe /c netsh wlan set hostednetwork mode=allow ssid=a key=b" 这句我搞不定,
shell"cmd.exe /c netsh wlan start hostednetwork"
End If
End Sub
Private Sub Text2_Click()
Text2.Text = ""
End Sub
怎么才可以让ssid和key中的值随着文本框中的值而改变

咳咳 这代码都写到这地步了 这东西还解决不了 这是不是你写的哦
付值 要用变量 你那a在那里面是字符串 不是变量 正确写法是
Shell "cmd.exe /c netsh wlan set hostednetwork mode=allow ssid=" & a & " key=" & b & "