Visual Basic

'Requires a propertygrid
Public Class Form1
    Dim test As New TestEnum

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        PropertyGrid1.SelectedObject = test
    End Sub
End Class

Public Class TestEnum
    Dim _TestMyEnum As MyEnum

    'This works just fine because we have declared the property as MyEnum
    Public Property TestMyEnum() As MyEnum
        Get
            Return _TestMyEnum
        End Get
        Set(ByVal value As MyEnum)
            _TestMyEnum = value
        End Set
    End Property

    'This returns the exact same enumerator but has been declared as a general object
    'The same problem occurs here as you are seeing in your code
    Public Property TestMyEnumObject() As Object
        Get
            Return _TestMyEnum
        End Get
        Set(ByVal value As Object)
            _TestMyEnum = value
        End Set
    End Property

    Public Enum MyEnum
        Test0
        Test1
        Test2
    End Enum
End Class

sp_ranjan wrote:

I want to set admin privileges only to the exes of my application

sp_ranjan wrote:

How can this have adverse effect!

pashitech wrote:

i am poor at english,

For X = 1 To 20<br />
IO.File.AppendAllText("C:\test.txt", "myname")<br />
Next

Dim file As StreamWriter<br />
Dim x as Integer<br />
file = IO.File.CreateText("c:\test.txt")<br />
For x = 1 to 20<br />
   file.Write("myname")<br />
Next<br />
file.Close()