哪位高手能解决？？？？？，分不是问题！！！！！

Question

也不懂
Const RESOURCETYPE_DISK = &H1
Private Declare Function WNetConnectionDialog Lib "mpr.dll" (ByVal hwnd As Long, ByVal dwType As Long) As LongPrivate Sub Command1_Click()
    Print WNetConnectionDialog(Me.hwnd, RESOURCETYPE_DISK)
End Sub
'Long，零表示成功。如用户取消了操作，则返回-1。会设置GetLastError。如GetLastError是ERROR_EXTENDED_ERROR，则可用WNetGetLastError取得额外的错误信息

Answer 1

记得www.21code.com有一个这方面的例子