Execute function Get name solid when select on solid in multi solid parts

[ngocson8335]

Dear Expert,

I just create a Dockable Window and put a textbox on it. I want it automatically gets a solid name when I select on the solid. How can it execute the GET NAME SOLID Function instead of click on the button?

Here is the dockable window:

Many thanks

[Sergio.D.Suárez]

Dim oSolid As Surfacebody= ThisApplication.CommandManager.Pick(SelectionFilterEnum.kPartBodyFilter, "Select SolidBody")
	If oSolid Is Nothing Then Exit Sub
		
MessageBox.Show(oSolid.Name)

Hi, try this code, I hope it helps with your problem 

[ngocson8335]

With your code, I need a button to run this function?

I want to get the solid name without using the push button to start the function.

Thanks Sir

[ngocson8335]

Hello Sir,

Can you help me?