自己用VB写的小程序,可以算静力和动力下的矩形挡土墙稳定性