Shell team - bring to the fore

Question

I have a program that runs a shell command to do constant ping, but when it starts, it does not bring the cmd window to the forefront.

It seems like he should have some minor fix that I am missing.

The code:

Shell("ping " & IPAddy.Text & " -t")

Answer 1

Shell("ping " & IPAddy.Text & " -t", AppWinStyle.NormalFocus)

Use the Style parameter with the AppWinStyle.NormalFocus argument as shown above

MSDN: Shell Function: https://msdn.microsoft.com/en-us/library/xe736fyk(v=vs.90).aspx