2010-08-20 7 views

risposta

14

provare il seguente

Dim name = Me.GetType().Name 

O per qualsiasi istanza

Dim name = theObject.GetType().Name 
+0

come faresti a livello condiviso? sostenere anche sottoclassi? – NullVoxPopuli

17
Dim type As Type = yourObject.GetType() 
Dim typeName As String = type.FullName 

Nome completo ti porterà il nome completo del tipo, tra cui lo spazio dei nomi del tipo.

Vedere MSDN per ulteriori informazioni su ciò che è disponibile con Type.

+0

come faresti a livello condiviso con le sottoclassi? – NullVoxPopuli

1

Questo potrebbe essere migliore quando si utilizza la classe del sito Web asp.net non oggetto.

Dim ClassName as string = Me.GetType().BaseType.FullName 

O

quando si utilizza un'applicazione desktop.

Dim ClassName as string = Me.GetType().Name