vb程式題執行不了,沒有字母出現

2022-06-22 03:35:17 字數 1270 閱讀 1354

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...