VB如何迴圈每隔10毫秒呼叫函式

2022-11-15 00:26:36 字數 4664 閱讀 2764

1樓:匿名使用者

windows 窗體 timer 元件是單執行緒元件,精度限定為 55 毫秒。如果您需要更高精度的多執行緒計時器,請使用 system.timers 名稱空間中的 timer 類。

2樓:匿名使用者

應該可以的,再說如果不用timer控制元件,讓程式控制的話,就會死迴圈了

vb中如何設定每10秒自動重新整理一下頁面

3樓:秋色烽火

嗯 呼叫 webbrowser1.refresh

曾經寫過一個刷qq空間文章數的

刷了3萬多瀏覽量

4樓:匿名使用者

應該是使用timer控制元件吧。。

vb中如何迴圈呼叫某一函式

5樓:

private sub command1_click()a=0

do while a< n 'n為你要迴圈的次數urldownloadtofile

a=a+1 '如果要不停迴圈的話可以把n設為2,把這句刪掉。

doevents

loop

end sub

引數不可選應該是:

1.n的值你沒有賦

2.urldownloadtofile 函式你沒有給引數。可以這樣寫:

6樓:尼歐趙

加個定時器,設定定時時間。當按command1時,迴圈呼叫,當按command2時,停止呼叫。

在timer1的time事件裡寫:

urldownloadtofile()

private sub command1_click()timer1.enable=true

end sub

private sub command2_click()timer1.enable=false

end sub

7樓:匿名使用者

答案補充:引數不可選是你的函式定義的問題,不明白的話最好把這個函式的定義寫出來,好往裡套。

===============

不怕宕機的話,可以

private sub command1_click()do urldownloadtofile

loop

end sub

vb中用timer控制元件控制for迴圈,讓其一秒執行一次,求大神指教!!!

8樓:有手藝的農民

可以使用change,不需要使用for(其實是我不會用for哈哈)例如:在vb窗體加入1個timer ,2個label,然後**如下:

private sub form_load()timer1.interval = 1000label2.caption = 1

end sub

private sub label1_change()label2.caption = label2.caption + 1

end sub

private sub timer1_timer()if label1.caption <> str(timer) then

label1.caption = timeend if

end sub

當label1.caption發生變化時,label2.caption+1,

9樓:助人為樂之樂

你要的是不是一秒鐘for迴圈執行一次,還是一遍呢!

你把timer的interval改為1000!

就可以了!

10樓:

把要迴圈的內容寫到timer1_tick()事件裡,把timer的interval設定為1000就行

vb 每隔一段時間執行函式

11樓:匿名使用者

加一個timer控制元件就可以了。把這段加進去就好了。

dim jg as double=120*60 '間隔時間dim nowtime as date

static oldtime as datedim jgtime as timespanif oldtime .year = 1 then oldtime = date.now

nowtime = date.now

jgtime = nowtime - oldtimeif jgtime.totalseconds>jg then'執行函式

oldtime=newtime

end if

12樓:

用定時器。新增一個定時器,然後在定時器的屬性中設定間隔時長,在定時器觸發事件中放入你要執行的函式。

13樓:匿名使用者

dim n as integer

private sub timer1_timer()n = n + 1

label1.caption = now

if n = 0.1 * 60 then '設定時間為120 * 60(秒)

n = 0

'執行這個函式

end if

end sub

14樓:匿名使用者

dim i as long

private sub form_load()timer1.enabled = truetimer1.interval = 1000i = 0

end sub

private sub timer1_timer()i = i + 1

me.caption = i

if i mod 60 = 0 then print "過了一分鐘了。。"

end sub

vb 每隔5分鐘執行一次程式

15樓:匿名使用者

vb可以使用timer控制元件來實現按規定時間執行程式的目的。

timer 控制元件,通過引發 timer 事件,timer 控制元件可以有規律地隔一段時間執行一次**。

interval 屬性,返回或設定對 timer 控制元件的計時事件各呼叫間的毫秒數。

實現**如下:

option explicit

dim i as long

private sub form_load()timer1.interval = 1000end sub

private sub timer1_timer()i = i + 1

if i mod 300 = 0 theni = 0

'寫需要執行的**

label1.caption = timeend if

end sub

16樓:匿名使用者

timer1不呼叫stop就會一直執行下去。

17樓:匿名使用者

先給你一種方法

timer可以設定為1分鐘

private sub form_load()me.timer1.interval = 60000end sub

private sub timer1_timer()static m as long

m = m + 1

if m = 5 then

msgbox "執行"

m = 0

end if

end sub

第二種,如果非要設定為1000毫秒

private sub form_load()me.timer1.interval = 1000end sub

private sub timer1_timer()static m as long, s as integers = s + 1

if s = 60 then

m = m + 1

if m = 5 then

msgbox "執行"

m = 0

end if

s = 0

end if

debug.print s

end sub

'm為分鐘,s為秒

18樓:匿名使用者

dim i as long

private sub form_load()timer1.interval = 1000end sub

private sub timer1_timer()i=i+1

if i mod 360=0 then

i=0'執行**

end if

end sub

19樓:匿名使用者

其實這段**怎麼執行 a就是=1 =..=...

20樓:就九佳

「...」前面將變數b賦初值0.

vb中的for迴圈被執行次數的公式是什麼 50

21樓:為兒童與他人

你好,for 迴圈的執行次數的公式為:

int( ( 上限-下限 ) / 步長 )+1你可以拿筆算一下,自己模擬一個for迴圈,看一下公式計算的和手數的一樣不。

望採納~

VB中正確的迴圈語句是,vb中的迴圈語句

for x 迴圈變數 1 初始值 to 10 終止值 step 2 步進 next 以上為完整的迴圈結構 1.沒有終止值 所以錯 3.初始值比終止值小 所以步進應該為整數 而它是負數 所以也錯4.初始值大於終止值 預設步進為1 無法迴圈 所以也錯 for語句 for counter start to...

vb6 0 FOR迴圈語句,vb6 0有沒有中途跳出當前for迴圈,進行下次迴圈?

dim i as integer,d1 as integer,d2 as integer,d3 as integer,d4 as integer dim str1 as string dim str2 as string private sub form load command1.caption ...

VB的for迴圈巢狀請幫解釋,一個VB的for迴圈巢狀請幫解釋?

這是一個for的巢狀迴圈。這裡求t的值 t t 1 可以看出其實迴圈了多少次t的值就是多少 先從第一句開始執行 1 for i 1to3 這句表示1句要迴圈3次 當1句執行第一次時候 i 1 那麼第2句就可以看成是 for j 1 to 1 step 1,那麼第2句就從 j 1開始執行 第3句就可以...