VB 如何讓計(jì)時(shí)器重新計(jì)時(shí)
-
Dim a As Integer Private Sub Command1_Click() Timer1.Enabled = True Timer1.Interval = 500 End Sub Private Sub Command2_Click() Timer1.Enabled = False Timer start End Sub Private Sub Timer1_Timer() a = a + 1 Text1 = a End S... Dim a As Integer Private Sub Command1_Click() Timer1.Enabled = True Timer1.Interval = 500 End Sub Private Sub Command2_Click() Timer1.Enabled = False Timer start End Sub Private Sub Timer1_Timer() a = a + 1 Text1 = a End Sub 展開
全部評(píng)論(4條)
-
- 查水表的路過 2010-06-13 00:00:00
- 啊沙發(fā)沙發(fā)按時(shí)發(fā)放薩芬
-
贊(5)
回復(fù)(0)
-
- 吃出身材 2016-12-13 00:00:00
- 在通用里聲明a,或是在timer里用static來聲明靜態(tài)變量a static a as integer
-
贊(3)
回復(fù)(0)
-
- 冰旭冰旭冰 2010-06-13 00:00:00
- Private Sub Timer1_Timer() if flag=1 then a=0 end if a = a + 1 Text1 = a End Sub 在通用聲明處寫 dim flag 再添個(gè)按鈕,click里編寫 flag=1 此后當(dāng)點(diǎn)這個(gè)按鈕a的值就從0開始了,也就是重新開始計(jì)時(shí)了
-
贊(9)
回復(fù)(0)
-
- vans來 2010-06-13 00:00:00
- Private Sub Command2_Click() Timer1.Enabled = False Timer start a=0'這里加入這句就可以了 End Sub
-
贊(4)
回復(fù)(0)
登錄或新用戶注冊(cè)
- 微信登錄
- 密碼登錄
- 短信登錄
請(qǐng)用手機(jī)微信掃描下方二維碼
快速登錄或注冊(cè)新賬號(hào)
微信掃碼,手機(jī)電腦聯(lián)動(dòng)
熱門問答
- VB 如何讓計(jì)時(shí)器重新計(jì)時(shí)
- Dim a As Integer Private Sub Command1_Click() Timer1.Enabled = True Timer1.Interval = 500 End Sub Private Sub Command2_Click() Timer1.Enabled = False Timer start End Sub Private Sub Timer1_Timer() a = a + 1 Text1 = a End S... Dim a As Integer Private Sub Command1_Click() Timer1.Enabled = True Timer1.Interval = 500 End Sub Private Sub Command2_Click() Timer1.Enabled = False Timer start End Sub Private Sub Timer1_Timer() a = a + 1 Text1 = a End Sub 展開
- 怎么設(shè)置delphi計(jì)時(shí)器重新計(jì)時(shí)
- 在一個(gè)頁面內(nèi),按“重新開始”,計(jì)時(shí)器從0,重新開始計(jì)時(shí),該怎么設(shè)置,怎么寫代碼?
- 如何讓一個(gè)timer計(jì)時(shí)器停止計(jì)時(shí)?C++
- 程序中用Settimer(0,1000,NULL)構(gòu)造了一個(gè)計(jì)時(shí)器。由于程序功能決定,要在程序運(yùn)行過程中停掉計(jì)時(shí)器,也就是停止計(jì)時(shí),怎么做呢?用什么語句?謝了先~
- 如何可以讓挖機(jī)計(jì)時(shí)器停止計(jì)時(shí)
- VB中如何設(shè)置使得計(jì)時(shí)器在初始狀態(tài)下不計(jì)時(shí)
- vb 如何重置計(jì)時(shí)器
- vb 如何重置計(jì)時(shí)器
- 在VB中如何編寫使計(jì)時(shí)器中的時(shí)間歸零重新開始計(jì)時(shí)
- YDWE怎么讓計(jì)時(shí)器正向計(jì)時(shí),而不是倒數(shù)計(jì)時(shí)??真心感謝?。?!
- vb停止計(jì)時(shí)器
- 我想做一個(gè)程序,讓計(jì)時(shí)器隨機(jī)取一個(gè)數(shù)并可以讓計(jì)時(shí)器過5秒后自動(dòng)停止下來。 已編寫代碼: Private Sub Timer1_Timer() Randomize s = Int(Rnd * 16 + 24) Text1.Text = s End Sub 嗯~~interval的值為10 誰能幫我完成過“5秒后自動(dòng)停止下來”這個(gè)... 我想做一個(gè)程序,讓計(jì)時(shí)器隨機(jī)取一個(gè)數(shù)并可以讓計(jì)時(shí)器過5秒后自動(dòng)停止下來。 已編寫代碼: Private Sub Timer1_Timer() Randomize s = Int(Rnd * 16 + 24) Text1.Text = s End Sub 嗯~~interval的值為10 誰能幫我完成過“5秒后自動(dòng)停止下來”這個(gè)步驟?。?不要手動(dòng)停止(什么timer1.enabled=false的)。 我是vb6.0的 展開
- vb正計(jì)時(shí)器
- 做一個(gè)這樣的格式的 00:00:00 往上計(jì)時(shí) dim a as date a=format(00:00:00 AM) text1.text=a timer.interval=1000 a=a+1 我純新手 只知道大概是這樣一個(gè)格式 請(qǐng)幫忙修改下。 Z好每句后面加上說明 Z好修改我這上面的吧
- VB計(jì)時(shí)器interval
- 我把interval的屬性調(diào)到10,定義一個(gè)靜態(tài)變量t,Timer1.Timer事件為t=t+1,結(jié)果一秒內(nèi)t自加100。但我把interval設(shè)為1,結(jié)果一秒內(nèi)t自加甚至不到1,這是什么情況?如何解決?
- 51單片機(jī)計(jì)時(shí)器溢出后是不是就自動(dòng)重新從零開始計(jì)時(shí)了?
- 沒裝初值的情況下
- Vb如何實(shí)現(xiàn)兩個(gè)計(jì)時(shí)器同時(shí)運(yùn)行
- VB計(jì)時(shí)器怎么用
- VB 計(jì)時(shí)器 與 進(jìn)度條
- 我想把進(jìn)度條弄成7秒,然后打開窗口form2 代碼該怎樣寫?
- 在vb中怎么設(shè)計(jì)計(jì)時(shí)器屬性,使其在初始狀態(tài)不計(jì)時(shí)
- vb計(jì)時(shí)器設(shè)計(jì)圖片左右往復(fù)運(yùn)動(dòng)vb代碼
- 請(qǐng)問一vb題目,用計(jì)時(shí)器安秒計(jì)時(shí),在窗體畫一計(jì)時(shí)器控件和一標(biāo)簽程序
- 請(qǐng)問一vb題目,用計(jì)時(shí)器安秒計(jì)時(shí),在窗體畫一計(jì)時(shí)器控件和一標(biāo)簽程序運(yùn)行后,在標(biāo)簽內(nèi)顯示經(jīng)過秒數(shù)并響鈴,代碼怎么寫啊
- 求vb計(jì)時(shí)器編程代碼
- 編寫程序,用計(jì)時(shí)器按秒計(jì)時(shí)。在窗體上畫一個(gè)計(jì)時(shí)器控件和一個(gè)標(biāo)簽,運(yùn)行程序后,在標(biāo)簽內(nèi)顯示經(jīng)過的秒數(shù),并響鈴
- 怎樣用VB做一個(gè)秒表計(jì)時(shí)器
- 兩個(gè)按鈕,一個(gè)開始鍵 一個(gè)清零鍵 ,想要點(diǎn)擊開始鍵以后 開始鍵變成 結(jié)束 文本也改成結(jié)束 按清零鍵后變回開始 還想添加一個(gè)開始的鍵盤快捷鍵(開始和結(jié)束能夠公用這個(gè)快捷鍵) 求大神指教
4月突出貢獻(xiàn)榜
推薦主頁
最新話題





參與評(píng)論
登錄后參與評(píng)論