當我嘗試用選項Strict ON優化我的代碼後,我得到許多錯誤,至少剩下一個。Option Strict On不允許從'System.Drawing.Point'到'System.Drawing.Size'的隱式轉換
我已經創建變量MoveForm_MousePosition如點 = System.drawing.point
Imports System.Drawing
Public MoveForm_MousePosition As Point
Private Sub lblYaple_MouseDown(sender As Object, e As MouseEventArgs) Handles lblYaple.MouseDown
If e.Button = MouseButtons.Left Then
MoveForm = True
Me.Cursor = Cursors.NoMove2D
MoveForm_MousePosition = e.Location
End If
End Sub
Public Sub lblYaple_MouseMove(sender As Object, e As MouseEventArgs) Handles lblYaple.MouseMove
If MoveForm Then Me.Location = Me.Location + (e.Location - MoveForm_MousePosition)
End Sub
在此行
如果MoveForm然後Me.Location = Me.Location +(e.Location - MoveForm_MousePosition)
選項嚴格On不允許從「System.Draw隱式轉換ing.Point」到 'System.Drawing.Size'
無法理解,me.location和e.location和MoveForm_MousePostions應 System.Drawing.Point爲什麼來到這個錯誤嗎?
試試這個嗎? 'Me.Location = Me.Location + New Point(e.Location - MoveForm_MousePosition)' – 2015-01-04 11:15:37