116.htm

来自「VB的一些网络编程的例子,个人认为还不错。大家一起来研究一下.」· HTM 代码 · 共 11 行

<p>在程序中打开 Internet 拨号连接窗口   </p>
<p>       </p>
<p>Private Sub StartConnection()</p>
<p>Dim X</p>
<p>X = Shell("rundll32.exe rnaui.dll,RnaDial " & "_连接的名称_", 1)</p>
<p>DoEvents</p>
<p>SendKeys "{enter}", True</p>
<p>DoEvents</p>
<p>End Sub</p>
<p> </p>