VisualBasic6.0编写的铸造温度场模拟程序