- -没基础你没写代码他怎么动?VB没那么聪明,知道你要编游戏。。来做个试验:新建一个工程,画一个picturebox然后加入代码Option ExplicitDim ox As SingleDim oy As SinglePrivate Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)ox = Xoy = YEnd SubPrivate Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As...