modal num
num = 0
Application.ExecuteCommand("Select", -354, 2452)
Application.ExecuteCommand("DoubleClick", -354, 2452)
DlgTerminalProperties.Number = num
DlgTerminalProperties.Ok.Click()