1樓:雨水沉沒
找下延時的函式吧,將時間間隔調到0.5秒以上
其實是有時間間隔的,只不過太快了,人肉眼可辨別的變換時間間隔最低是0.2秒,低於這個人眼就看不出了
可以用timer控制元件模擬
2樓:匿名使用者
兩種方法:
1.使用timer控制元件,按下按鍵時啟動timer1控制元件,設定好時間後,顯示哭臉。
2.在程式中加入一個長時間的**迴圈以達到延遲顯示的目的。
3樓:匿名使用者
在笑臉後用sleep函式,暫停一下程式的執行
4樓:匿名使用者
新增個timer控制元件,在timer方法裡寫哭**後邊加上「timer1.enable=.f."
inteval設為1000 enable設為f
最後在按鈕click裡寫笑回**後邊加上「答timer1.enable=.t."
5樓:手機使用者
***mand1可以換成
bai你的按鈕的名稱
private sub ***mand1_mousedown(button as integer, shift as integer, x as single, y as single)
'變為笑臉
du的事件zhi
,自己寫dao
end sub
private sub ***mand1_mouseup(button as integer, shift as integer, x as single, y as single)
'變為哭臉的事件,自己寫
end sub
按住,是笑臉,
回鬆開,答是哭臉
自己想的
VB下可不可以隱藏按鈕,vb 按鈕隱藏
可以設定隱藏按鈕,單擊需要隱藏的按鈕再把屬性visible設為false 或者設定成下面的在執行時也可以隱藏按鈕的作用 private sub form load command4.visible falseend sub lz 你可借用image控制元件來達到你的目的 option explici...
VB中設計加法計算器,怎麼按按鈕能將數字連起來。如 按兩
private sub command9 click text1 text1.text command9.caption end sub 用字串連線就行了 你的按鈕上比如是9 那你就 9 是8 就 8 text1.text text1.text 9text1.text text1.text 8簡單易...
vb怎麼畫出正方形,按了按鈕後變成平行四邊形,還要看到移動的過程
dim x1,y1,x2,y2,x3,y3,x4,y4private sub form load me.width 7000 me.height 5000 me.autoredraw true timer1.interval 40 timer1.enabled false mand2 click e...