VBA编写计算器的几个问题

mulingya

计算器，就是要求  文字框内  只能输入数字，
考虑到 负号（-）问题，负号与正号不一样，不能省略，
这个怎么实现？

怎么在上边的基础上，设定输入数字的最大位数，考虑到小数点，貌似用len（）不行，
这个该怎么办？

附件是兰老师的作品，求老师指导

无聊的疯子

添加一个判断,判断 小数点 以前的数据位数

1. 
   
2.             mystr = mystr & frm.Controls("CommandButton" & index).Caption
   
3.             If Len(Split(mystr, ".")(0)) > 10 Then MsgBox "数字最大位超过10位!", , "数据过大"
   
4.            .Text = mystr
   
5. 
   

复制代码