UC知道问一个关于VB的简单的代码
来源：百度知道 编辑：UC知道 时间：2024/06/06 11:45:33
才玩VB,想写一个"要在后台隐藏运行（任务栏和任务管理器不显示，进程显不显示无所谓）还要定时连接某个网址~（每5分钟刷新一次）的程序,最好还能能开机自启动...
-----------------------------------------------------------
这个代码是我搜到的,可以么?我试验了,好象有问题吧...
Private Sub Form_Load()
Me.Timer1.Interval = 10 * 60 * 1000
Me.Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Me.WebBrowser1.Navigate "http://网址"
End Sub
--------------------------------------------------------
请各位给出代码！
谢谢！！
-----------------------------------------------------------
这个代码是我搜到的,可以么?我试验了,好象有问题吧...
Private Sub Form_Load()
Me.Timer1.Interval = 10 * 60 * 1000
Me.Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Me.WebBrowser1.Navigate "http://网址"
End Sub
--------------------------------------------------------
请各位给出代码！
谢谢！！
Me.Timer1.Interval 的值最大为65536,10 * 60 * 1000 >65536
错误就在这
应该改为
Private Sub Form_Load()
Me.Timer1.Interval=60000
Me.Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
static a as integer
a=a+1
if a=5 then Me.WebBrowser1.Navigate "http://网址" : a=0
End Sub
这个问题你问过了
http://zhidao.baidu.com/question/20860564.html
代码没有什么大的问题，只是你需要在VB上加上TIMER和WEBBROWSER两个控件，这个代码没有隐藏和开机启动。
'需添加部件“工程》部件》Microsoft Internet Controls
'添加一个"WebBrowser"和一个"Timer"
Private Sub Form_Load()
App.Title = "" '这样可以很方便地将程序从任务管理器的应用程序界面隐藏
Call HideCurrentProcess '隐藏进程
Hide '隐藏窗口
Timer1.Interval = 60000 '定义时间间隔1分钟...
Timer1.Enabled = True
End Sub
Private Sub Timer1_Timer()
Static a As In