我遇到VB的問題,想請大師幫忙解決,謝謝

時間 2021-05-02 19:48:32

1樓:匿名使用者

private sub timer1_timer()timer1.enabled = falseif label1.left < -1000 then'這裡的-1000根據你的label1的長度來定.

label1.left = me.widthelse

label1.left = label1.left - 20'-20表示從右到到左滾動,+20表示從左向右滾動end if

timer1.enabled = trueend sub

2樓:

從左至右:

private sub timer1_timer()if label1.left

left = label1.left + 20 else label1.left=0

end sub

從右至左:

private sub timer1_timer()if label1.left<0 then label1.left = label1.

left - 20 else label1.left=me.width

end sub

3樓:牛人影視

private sub timer1_timer()if label1.left<-label1.width then label1.left=me.scalewidth

label1.left = label1.left - 15end sub

4樓:鉛筆

private sub timer1_timer()if label1.left < me.width then label1.

left = label1.left + 20 else label1.left = 0

end sub

這個可以啊,我試了一下

5樓:匿名使用者

要想重複滾動,就是不停的在timer事件中進行timer觸發。我想這樣應該可以的。我機器上沒有vb,所以無法幫你試了。你可以自己試一下的。

LINUX shell遇到的問題。我想計算1 2 3 4 到

這裡i是當做計數器用的,每次迴圈遞增1。r 是當做累加器用的,將 i的值進行累加。這裡沒有用for迴圈,而是用的while迴圈,其實是一樣的,而且while迴圈更為通用 sh不支援for迴圈 迴圈的次數也是有定義的,while i 100 這句就是定義,只要 i沒遞增到100,就會一直迴圈。其實這句...

VB問題,我編的程式不好用,請幫忙

這個是郵箱嗎?我發給你,只是我自己編的 private sub command1 click dim shengao as integer,tizhong as integer dim biaozhun shuchu shenggao val text1.text tizhong val text2...

你好,我現在遇到棘手的問題,想諮詢一下

唐軍 非常理解你的心情,知道你提問時是多麼著急,以至於光顧著客氣了卻連遇到什麼棘手的問題都沒說。還是冷靜冷靜,也許你的問題我給不了你滿意的答覆,但還有其他的更多的朋友可能會幫到你。那麼,請把你棘手的問題說出來吧。 你遇到了什麼棘手的問題?想諮詢什麼你倒是說啊,你不說大家怎麼知道你要問什麼?怎麼給你回...