Question

在窗体上，按下鼠标左键拖动，在窗体的标题栏中显示鼠标指针的坐标位置

编写VB程序

Answer 1

这个容易，在Form_MouseMove事件里：
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then Me.Caption = "X:" & X & "-Y:" & Y
End Sub
这个是以缇为单位的，如果你想以像素为单位可以将Form的ScaleMode设置为3 - Pixel

追问

大神 明天我们VB考上机 完全不会 能加QQ咨询哈不？、、

100分财富行不？

Answer 2

MT