单击任务栏的图标时,如何把当前运行的窗口显示在最前面

我写的VB程序没有应用MDI窗口,但是有几个窗体,并且应用程序的图标显示在任务栏上.
本人使用的API函数是BringWindowToTop, 本