как получить название объекта

[dklmn]

Народ, извиняюсь что использую ваш форум для ликвидации безграмотности.
но как узнать программно название объекта,
я так понял что свойство name теперь в runtime недоступно.
Например:

Код: Выделить всё


Private Sub TableModification(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuItmInPocket.Click, mnuItmOutPocket.Click, mnuItmMakeTable.Click
dim itmName as string
Dim mnuItm As MenuItem = CType(sender, MenuItem)
itmName=mnuItm.....


'********************
У объекта нельзя узнать свойство Name
Вот на другом форуме мне снисходительно сообщили что это делатеся через Reflection.. А как?[/code]

[GSerg]

Какое имя тебе надо?

[dklmn]

Какое имя тебе надо?

ну в принципе уже никакого
я имел в виду что то вроде

Код: Выделить всё


im itmName as string
Dim mnuItm As MenuItem = CType(sender, MenuItem)
itmName=mnuItm.name
select case itmName
  case "mnuItmOutPocket"
.......



я просто привык сравнивать все по строковым свойствам.
в общем дейстительно, логично сравнивать сами объекты а их свойсва
- вот так

Код: Выделить всё


If sender.Equals(Me.mnuItmInPocket) Then
                    LoadToSqlCeTable(tblName)
                ElseIf sender.Equals(Me.mnuItmMakeTable) Then


[GSerg]

Ы...

Вообще-то есть оператор Is...