用visual basic 编写的一个小程序。体现了visual basic编程的有趣性。