vb文字移動,用滾動條控制移動速度,鍵盤方向鍵控制方向,從右邊出去後從左端進入,方向不變

2021-04-25 09:20:55 字數 743 閱讀 1520

1樓:匿名使用者

看看這個是不是你要的效果

2樓:匿名使用者

在窗體中建抄三個控制項:

襲label1用於顯示文字,baihscroll1用於調整速度,timer1用於觸發移

du動。

zhi假如form的scalemode用的是dao預設的1 - twip,如果沒調過就不用修改

根據你的實際速度要求設好hscroll1的max、min以及 value屬性,比如分別設為1、50和20

timer的interval設為10(建議10-25之間,這樣重新整理頻率差不多在40-100hz,適合人眼觀察效果,interval設低了視覺舒服但占用系統資源高),然後在timer事件中寫入如下**即可:

private sub timer1_timer()

label1.left = ((label1.left + hscroll1.

value + label1.width) mod (me.scalewidth + label1.

width)) - label1.width

end sub

當焦點在hscroll1上時,也可以通過左右方向鍵調節移動速度。

如何用vb編寫乙個字幕滾動程式要求用單選框控制左右移動,滾動條控制移動速度 10

3樓:機械l牛

要怎樣滾動啊,是像鋪地毯一樣,還是像摩天輪一樣啊,請將問題補充清楚

中國移動用什麼卡比較好,中國移動用什麼卡比較好?

神州行大眾卡 一元包月接 就可以免費 忙時打 0.18元 分鐘.閒時打 0.12元 分鐘.忙時就是早上9點到晚上10點之內都屬於忙時其他時段就是閒時 每天0.65元的月租 這就要看你生活在那個城市了,每個城市的資費標準都是不同的!我建意你去移動營業廳諮詢神州行卡的業務,神州行一般適應 較少簡訊較少的...

求助vb文字框

private sub text1 change text2 text1 end sub private sub text1 change text2.text text1.textend sub text2的文字隨text1的動 此事件是text1變動事件,當text1文字有改動事觸發當作為子程式...

vb取文字檔案的內容,vb讀取文字檔案某行的內容

dim mystr as string split file.readalltext data1.txt vbcrlf 讀取data1 mystr 0 表示第一行 mystr 1 表示第二行 system.io.file.writealltext data2.txt mystr 0 vbcrlf m...