QQ在线状态如何做在窗体里？

tz-chf · 发表于 2009-8-26 10:12:43

这个样子如何做在窗体里，代码是网页的。

liwen · 发表于 2009-8-26 10:25:58

加一个网页控件,只显示这个标志

liwen · 发表于 2009-8-26 12:38:19

If M = 1 Then
W1.Refresh
Else
W1.Navigate "about:blank"
      W1.Document.writeln "<HTML>"
      W1.Document.writeln "<HEAD>"
      W1.Document.writeln "<TITLE>"
      W1.Document.writeln "QQ在线"
      W1.Document.writeln "</TITLE>"
      W1.Document.writeln "</HEAD>"
      W1.Document.writeln "<BODY >"
      W1.Document.writeln "<tr><a target=""_blank"" href=""http://wpa.qq.com/msgrd?V=1&Uin=83799119&Site=腾讯互动黄页&Menu=yes"">"
      W1.Document.writeln "<img border=""0"" SRC=""http://wpa.qq.com/pa?p=1:83799119:1"" alt=""点击给我发送消息"">QQ:83799119</a><br></tr>"
      W1.Document.writeln "</BODY>"
      W1.Document.writeln "</HTML>"
      M = 1
      End If

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[窗体] QQ在线状态如何做在窗体里？

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)