Question

我制作了一个Vb的弹球游戏，请问如下Visual basic 6.0程序应该如何修改才可以使小木棒跑的更快点？

程序地址：http://pan.baidu.com/share/link?shareid=2024033162&uk=539650880

Answer 1

修改计时器1 timer1 的interval值 修改的越小 球的移动速度越快
在VB中测试 修改为10 移动速度很快

Answer 2

修改下面的代码

Private Sub Picture1_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case 37 '如果按下左箭头,使板子向左移动
If Line1.X1 <= Picture1.Left Then
Line1.X1 = Picture1.Left
Else
Line1.X1 = Line1.X1 - (200 + move_x)
Line1.X2 = Line1.X2 - (200 + move_x)

End If
Case 39 '如果按下右箭头,使板子向右移动
If Line1.X2 >= Picture1.Left + Picture1.Width Then
Line1.X2 = Picture1.Left + Picture1.Width
Else
Line1.X1 = Line1.X1 + (90 + move_x)
Line1.X2 = Line1.X2 + (90 + move_x)
End If
End Select
End Sub

把里面的数字200 和90加大即可，加多少你试试即可比如200改成400，90 改成180

Answer 3

已修改

内附注释

楼主一看就懂

追问

谢拉，但是不小心按错了，请原谅……