1樓:網友
他們寫的太煩了。
看看我的。dim s as integerprivate sub form_load()s = 10
end sub
private sub timer1_timer()if > then
s = 10
end if
if < 0 then
s = 10
end if
send sub
2樓:網友
dim oldh as long
dim oldw as long
private sub form_load()= 移動的文字!"
oldh = -
oldw = -
end sub
private sub timer1_timer()randomize
int(rnd() oldw + 1))randomize
int(rnd() oldh + 1))end sub
vb還是比較好學的。為以後學 打好基礎。
3樓:網友
就是設定2個不同的座標就ok拉。 不用這麼麻煩了。
vb中如何使字上下來回移動
4樓:好學者百科
1、點選桌面上的「
2、選擇「標準exe」,單擊「開啟」。
3、分別在窗體中建立乙個label控制項、兩個command控制項、乙個timer控制項。
4、把label的caption改成「歡迎來到vb!」,command1的caption改成「手動」,command2的caption改成「自動」。
<>6、雙擊點開**視窗。
7、點選f5檢視執行效果,點選「自動」label就會自動從上到下移動,點選「手動」便會切換成手動,在任意地方單擊,label就會停止。
vb中如何使字上下來回移動
5樓:網友
首先新增乙個timer控制項和乙個label控制項。在label1的caption中寫入自己要寫的字。雙擊開啟書寫以下函式:
dim i%
每秒觸發一次。
if i > then i=0
i=i+10
10,i
6樓:匿名使用者
用timer控制字型lable的座標就好了。當到達某個值後開始加,到達另外乙個之後在慢慢的減少。
用VB編寫程序,用VB編寫程式
首先,用vb畫出介面圖,那些按鈕控制項,每個按鈕空間都要實現什麼功能,這個你自己心裡要有數,然後給按鈕編 你要具體點,別人才好回答你!我也是用這個,很好用的,目前沒發現病毒 vb程式編寫 用vb編寫程式 怎樣用vb編寫程式從鍵盤上輸入10個數求平均值 怎麼用vb編寫乙個exe檔案?1 執行vb6.0...
用vb如何編寫剪下和還原程序,用vb如何編寫剪下和還原程式
實現剪下 實現還原 vb中的剪下 5 朋友 5分啊 是不是太少了點啊 private sub 複製 click clipboard.clear if typeof screen.activecontrol is textbox then clipboard.settext screen.active...
如何使vb產生隨機正整數,如何使VB中Rnd函式產生的隨機數是在 0,1 內?
zheng0823的回答有點小問題,你那樣永遠得不到38,應該37改為38 同理你command2的事件裡28改為29,不然最大只能得到66因為rnd函式返回的範圍是 0,1 包含0 但不包含1 還有沒有初始化隨機數種子 修改後的 private sub command1 click randomi...