PB最简单的ping

已封装成NonVisualObject，即开即用，PB9测试通过。ifnettool.ping(em_1.Text)thenMessageBox("Ping","Pingfailed!",Exclamation!)elseMessageBox("Ping","Pingsucceeded!")endif