Error in a sample code ?

[Dubweisertm]

Hi Guys !

Im realy new to Autocad .NET

Im using MVS2010 Express and Autocad Architecture 2011

Im trying a sample in autocad help and I dont know why there are errors ?

The attached printscreens shows the error in the code below...

Imports Autodesk.AutoCAD.ApplicationServices
Imports Autodesk.AutoCAD.Runtime
Imports Autodesk.AutoCAD.Interop

Public Class Class3
    <CommandMethod("PrefsSetCursor")> Public Sub PrefsSetCursor()

        '' This example sets the crosshairs of the AutoCAD drawing cursor
        '' to full screen.

        '' Access the Preferences object
        Dim acPrefComObj As AcadPreferences = Application.Preferences

        '' Use the CursorSize property to set the size of the crosshairs
        acPrefComObj.Display.CursorSize = 100

    End Sub
End Class

Thanks in advance !

[BlackBox]

Try this instead (changes in red):

Imports Autodesk.AutoCAD.ApplicationServices
Imports Autodesk.AutoCAD.Runtime
Imports Autodesk.AutoCAD.Runtime.Interop

Public Class Class3
    <CommandMethod("PrefsSetCursor")> _
    Public Sub PrefsSetCursor()
        Dim acPrefComObj As Object = Application.Preferences
        acPrefComObj.Display.CursorSize = 100
    End Sub
End Class

Tested successfully using Civil 3D 2011.

Also, when you have an error like that, if you hover the red underscore, you'll be presented a drop down button which usually offers some options to correct the error detected.

[BlackBox]

Given the simplicity of the task being performed, this can be written a bit more succinctly:

Imports Autodesk.AutoCAD.Runtime

Public Class Class3
    <CommandMethod("PrefsSetCursor2")> _
    Public Sub PrefsSetCursor2()
        Autodesk.AutoCAD.ApplicationServices. _
            Application.Preferences.Display.CursorSize = 100
    End Sub
End Class

[Dubweisertm]

Also, when you have an error like that, if you hover the red underscore, you'll be presented a drop down button which usually offers some options to correct the error detected.

Good, thanks !