出错代码:
Number = numberlabel1.Caption * 100 + _
numberlabel2.Caption * 10 + numberlabel3. _
Caption
应该改成这样,因为Label的Caption是文本型的,你乘100,计算机根本不明白,要先转换为数值型的
Number = Val(numberlabel1.Caption) * 100 + _
Val(numberlabel2.Caption) * 10 + Val(numberlabel3. _
Caption)