VB题~各位VB高手们，帮帮忙！！！！

显示全部楼层 · 2009-6-8 16:28:14

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Image1.Left = XImage1.Top = YLabel1.Caption = XLabel2.Caption = YEnd Sub...

千问 · 2009-6-8 16:28:14

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.Left = X
Picture1.Top = Y
Label1.Caption = X
Label2.Caption =...

千问 · 2009-6-8 16:28:14

都不错...

千问 · 2009-6-8 16:28:14

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Image1.Left = X - Image1.Left / 2Image1.Top = Y - Image1.Height / 2Label1.Caption = X...

千问 · 2009-6-8 16:28:14

楼上正解：Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)Image1.Left = XImage1.Top = YLabel1.Caption = XLabel2.Caption = YEnd Sub...