有關vb的timer控制元件的問題

2022-02-19 17:04:00 字數 736 閱讀 9648

1樓:銀蠍

建立一個timer控制元件,一個文字框,一個按鈕。

先把timer的interval屬性值改成100通用宣告**如下

dim t as single

t=0text1.text=0

按鈕的**如下:

if timer1.enabled=true thentimer1.enabled=false

else

timer1.enabled=true

end if

timer的**如下:

t=t+0.1

text1.text=t

2樓:匿名使用者

dim ela as long

'設定timer1.interval=1000'--------------------------------private sub command1_click()timer1.enabled = not timer1.

enabled

if timer1.enabled thenela = 0

else

print ela

'顯示持續的秒數

end if

end sub

private sub timer1_timer()ela = ela + 1

end sub

3樓:匿名使用者

timer.enble = true

求vb的時間控制元件的問題

新增一個標籤框,一個計時器,然後新增如下 執行試試private sub form load label1.caption 示例程式 label1.backcolor vbblacklabel1.forecolor vbgreenlabel1.autosize truelabel1.move 0,f...

一個vb控制元件的問題,關於VB模組的問題

在窗體上新增兩個命令按鈕,將第二個命令按鈕command2的index屬性設定為0,下面的 實現點選command1按鈕,將新增一個按鈕,並自動排列。option explicit 輸出十個命令控制元件。dim i as integer private sub command1 click i i ...

vb的tet控制元件怎麼換行,VB的TEXT控制元件怎麼換行

除設定文字框屬性multiline為true外,如下 private sub form load text1 123 vbnewline 456 end sub 1,先在窗體新增 text1控制元件 2,設定 text1.multiline true3,在text1控制元件顯示中,新增換行資訊,如 ...