如何用VB代码实现SQL的服务管理器刷新或者重启

最近编程需要刷新SQL2000数据库的服务管理器，，需要用VB代码，求大神帮忙！