就是兩條垂直線,滑鼠隨著兩條垂直線的交點移動,兩條垂直線隨著移動,但兩條線始終保持垂直
uj5u.com熱心網友回復:
界面上放一個picture box 命名為picture1 ,然后粘貼下面的代碼
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.Cls
Picture1.Line (X - 100, Y)-(X + 100, Y), vbRed
Picture1.Line (X, Y - 100)-(X, Y + 100), vbBlue
End Sub
uj5u.com熱心網友回復:
你說的這個,叫做十字游標,或者叫橡皮筋技術 ,好了,關鍵字給你了,自己google吧轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/21796.html
標籤:網絡編程
上一篇:VB接收位元組流時顯示亂碼
下一篇:VB瀏覽器搜索
