-----------------------------------------------------------------------------------

黑客动画吧 http://www.hack58.com

专业的黑客动画教程网站

免费学习黑客黑客技术

成为黑客不是梦。
打造国内最大的黑客动画网站

注意：所有教程全部对外免费开放

-----------------------------------------------------------------------------------

今天来教大家用vb做一个QQ财富察看器..也就是可以看别人的有几钻
和在QQ上花的钱,废话不多说了开始吧....
打开VB!!
先添加控件..
这里你们就看吧..我也就不打字了...
由于时间关系,代码我已经写完了...

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, _
    ByVal lpOperation As String, _
    ByVal lpFile As String, _
    ByVal lpParameters As String, _
    ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) As Long

Private Sub Command1_Click()
ShellExecute 0, "open", "http://qqshow.qq.com//cgi-bin/qqshow_user_info?uin=" + Text1.Text, "", "", 1
End Sub

好,我们来看下效果噢```

pony （ 10001 ）
总财富： 29379.0

教程就到这里吧.希望管理员给个论坛邀请码...

QQ:469750336
邮箱:469750336@qq.com