用VB和Surfer实现污染物在大气中扩散的动态演示

提出了一种用VB将基于DOS的污染物在大气中扩散的程序和Surfer软件结合起来实现动态演示的方法。该方法通过结合使用VB的Shell函数和Windows API的OpenProcess函数有效解决了DOS程序在VB中的调用和等待问题;并且用ActiveX技术解决了在VB中调控Surfer的问题,实现了污染物在大气中扩散的以评价区域地图为背景的动态演示,可为环境风险评价和事故应对决策提供支持。