Option Strict On causing error

[mikeg71]

Hi All.. when I use Option Strict On with this code, I get errors. Can someone please tell me what is wrong with this code?

Dim dynamicButton As New Button
dynamicButton.Location = New Point(Me.PictureBox2.PointToClient(MousePosition))

The error shows on the 'Point' in New Point. I am not sure how to fix that.

[Delaney]

You cannot call directly

dynamicButton.Location = New Point(Me.PictureBox2.PointToClient(MousePosition))

the New point method ask for coordinate or size type, not a point.

You can write :

dynamicButton.Location = Me.PictureBox2.PointToClient(MousePosition)

or

dynamicButton.Location = New Point(Me.PictureBox2.PointToClient(MousePosition).X,Me.PictureBox2.PointToClient(MousePosition).Y)

[mikeg71]

Thanks Delaney, this does the trick.

[.paul.]

Option Strict on does not cause an error... It reveals your error

[jmcilhinney]

Option Strict on does not cause an error... It reveals your error

Indeed. The error here was that you were trying to create a new Point when you didn't need to. PointToClient returns a Point so why would you need to create a new one at all? Think of all the junky code like this that you might write without it being picked up by the compiler when you have Option Strict Off? In such cases, the system makes a best guess at what you were actually trying to achieve. On many occasions, it will guess correctly. On those that it doesn't get it right, your application will quite possibly just continue chugging along and using the wrong data. That's why you should ALWAYS have Option Strict On and learn how to write good code.