vb数字之美1*1=1 11*11=121代码