vb的一个求解方程的例子