看到贴吧里有人问我就发出来了那里发的都被删了 Dim Webcode$Private Sub Command1_Click() If Winsock1.State <> 0 Then Winsock1.Close Winsock1.Protocol = sckTCPProtocol Winsock1.RemoteHost =&n...【阅读全文】
知道里有人问了我就回答下,顺便赚点分数 普通的东东我还懒得回答呢,看了2个分类达人的回答,一个用webbrowser一个用渣api 笑死我了看我的王道-xmlhttpPrivate Sub Command1_Click() Dim webcode$, ListDate$, Str$, i& For i = 1&nb...【阅读全文】