1樓:瑞安阿芳
你這是一個打字遊戲,字母從上掉下來,是你自己編寫的嗎,我試了一下,可以的。
你如果不行的話,在下面幾個方面考慮一下:
1. timer1與timer2的interval值 設定了沒,把它們分別設定為500與1000試試
2. command1的caption是否設定為「開始」
3. 把label4字號改大些,如「四號」
4. shape1的大小,位置調整一下
2樓:匿名使用者
到底簡單的說下你這一大段是幹嗎的、要實現什麼功能啊,這麼著叫人看反正我不願意,分數也不高~ ~
也要替幫你解答問題的人考慮考慮行個方便啊!
3樓:棘棘芽
不知道你的程式初始資料了沒有1我在這 裡為你做一下!
private sub form_load()me.backcolor = rgb(0, 0, 0)me.keypreview = true
shape1.backcolor = rgb(0, 50, 0)shape1.move 0, 0, me.scalewidth / 4 * 3, me.scaleheight
command1.move shape1.width, 50, me.scalewidth - shape1.width
command1.caption = "開始"
with label1
.forecolor = &hfffff
.backstyle = 0
.caption = "得分:000分"
.move 0, 0
.autosize = true
end with
with label2
.forecolor = &hfffff
.backstyle = 0
.caption = "倒計時:60 s"
.move label2.width, 0.autosize = true
end with
with label4
.forecolor = &hfffff
.backstyle = 0
.fontsize = 20
.caption = ""
.move label2.width, 0.autosize = true
end with
timer1.enabled = falsetimer2.enabled = falseend sub
把你的那個換成這個可以用,我試過了!
vb程式閱讀題1執行下面程式段的輸出結果是
第1題的輸出結果是 tab n 可選的 n 引數是在顯示或列印列表中的下一個表示式之前移動的列數。例如print tab 10 將在第10列出現 關於vb程式題 private sub mand1 click dim a as integer for i 10 to 1 step 2 s s i 你...
vb的程式題
dim h,m,s as integerprivate sub form load h 1 m 0 s 0 label1.caption 01 00 00 timer1.interval 1000end sub private sub timer1 timer s s 1 if s 0 then s...
VB程式執行時一直提示for control控制元件變數已在使用這是為什麼
就是你的迴圈變數已經在使用的意思 你這裡的兩個迴圈變數都是i,而且是鑲嵌在一起的,所以會報錯。建議修改迴圈變數使不重合。for i 1 to n print 7 ab 20 i print for j 1 to 2 i 1 print next j print next i 補充 visual ba...