动态获取运行程序(控件)名称和内容程序(VB6.0源代码编写)