1樓：墨漬
我可以讓form在螢幕上四處亂撞，你可以在在form上貼個球的**，然後用api把form透明化，只留下**，透明化**我也有。
public a, b
private sub command1_click() '停止移動timer1.interval = 0
end sub
private sub command2_click() '開始移動timer1.interval = 1
end sub
private sub form_load()randomize '初始化移動的方向
a = 50 * rnd
b = 50 * rnd
end sub
private sub timer1_timer()'form1移動
form1.left = form1.left + aform1.
top = form1.top + bif form1.left < 0 or form1.
left + form1.width > screen.width then 'form1碰到左右邊界
a = -a
end if
if form1.top < 0 or form1.top + form1.height > screen.height then 'form1碰到上下邊界
b = -b
end if
end sub
求VB畢業課程設計，VB程式設計
給分解決不了這種問題的。vb程式設計 80 我自能給親說一下思路，如圖所示，應該建立2個form，第一個用於成績顯示查詢，當然前提應該把成績的資料庫匯入進去，如果這是老師要求的作業，用access資料庫簡單編幾個資料就好了。當點選 生成圖表 按鈕時，form1隱藏，form2出現，座標軸事先用lin...
vb設計計時器，vb 設計一個計時器
10ms產生一次timer事件是不行的 因為vb的timer是有一個精度的，精度大約在55ms，所以interval再小就不起作用了，api gettickcount的精度大約也是在55ms，要想獲得更高的精度，可以用api timegettime，其精度大約在1 10ms，如果這個仍然滿足不了你的...
為什麼你扔小球小球往復跳動在最後的時候會越挑越快呢，是不
這個，你要知道快慢與時間有關，簡單的說一開始彈起的高度長時間長，到最後高度短時間短，所以就看著快了許多，額，其實還有其他因素，比如空氣阻力，速度啊等等，但基本可以忽略 向心力不改變速度的大小，為什麼旋轉一個小球會越甩越快？你能保證你對小球的拉力永遠垂直嗎？如果是的話，小球如何啟動的呢？為什麼小球在地...