Sad sam na MSDN- iskopao ovo
Control.MousePosition Property
Gets the position of the mouse cursor in screen coordinates.
Namespace: System.Windows.Forms
Assembly: System.Windows.Forms (in system.windows.forms.dll)
Syntax
Visual Basic (Declaration)
Code:
Public Shared ReadOnly Property MousePosition As Point
Visual Basic (Usage)
Code:
Dim value As Point
value = Control.MousePosition
Što je dobro, proverio sam i imam taj System.Windows.Forms.Control.MousePosition, međutim kada sam to ubacio u kod, ovako:
Code:
Public Shared ReadOnly Property MousePosition() As Point
Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
Dim value As Point
value = Control.MousePosition
MsgBox(value)
End Sub
dobijem error pri buildu:
Code:
------ Build started: Project: DeviceApplication2, Configuration: Release Any CPU ------
C:\WINDOWS\Microsoft.NET\Framework\v2.0.50727\Vbc.exe /noconfig /imports:Microsoft.VisualBasic,System,System.Collections,System.Collections.Generic,System.Drawing,System.Diagnostics,System.Windows.Forms /nowarn:42016,41999,42017,42018,42019,42032,42036,42020,42021,42022 /nostdlib /rootnamespace:DeviceApplication1 /sdkpath:"C:\Program Files\Microsoft.NET\SDK\CompactFramework\v2.0\WindowsCE" /netcf /doc:obj\Release\DeviceApplication2.xml /define:"CONFIG=\"Release\",TRACE=-1,_MyType=\"WindowsForms\",PLATFORM=\"AnyCPU\",WindowsCE=TRUE" /reference:"C:\Program Files\Microsoft.NET\SDK\CompactFramework\v2.0\WindowsCE\Microsoft.WindowsCE.Forms.dll","C:\Program Files\Microsoft.NET\SDK\CompactFramework\v2.0\WindowsCE\System.dll","C:\Program Files\Microsoft.NET\SDK\CompactFramework\v2.0\WindowsCE\System.Drawing.dll","C:\Program Files\Microsoft.NET\SDK\CompactFramework\v2.0\WindowsCE\System.Windows.Forms.DataGrid.dll","C:\Program Files\Microsoft.NET\SDK\CompactFramework\v2.0\WindowsCE\System.Windows.Forms.dll" /main:DeviceApplication1.Form1 /debug:pdbonly /filealign:512 /optimize+ /out:obj\Release\DeviceApplication2.exe /resource:obj\Release\DeviceApplication1.Form1.resources /resource:obj\Release\DeviceApplication1.Resources.resources /target:winexe Form1.vb Form1.Designer.vb "My Project\AssemblyInfo.vb" "My Project\Resources.Designer.vb"
C:\Documents and Settings\Danko Vukovic\My Documents\Visual Studio 2005\Projects\DeviceApplication2\DeviceApplication2\Form1.vb(37) : error BC30126: 'ReadOnly' property must provide a 'Get'.
C:\Documents and Settings\Danko Vukovic\My Documents\Visual Studio 2005\Projects\DeviceApplication2\DeviceApplication2\Form1.vb(40) : error BC30634: Statement cannot appear within a property body. End of property assumed.
========== Build: 0 succeeded or up-to-date, 1 failed, 0 skipped ==========