可运行,VB求和源代码右,VB求和源代码