简单小程序，给大家参考参考。呵呵具体代码参照prg文件。