19841120 发表于 2005-6-10 12:28:00

那位大哥给帮小弟一把，解决个小问题！！

　　　　　　矩形
        　　　　　长度　　　　　宽度
中心点　　　　拾取　　　确定　　　　　　　　取消　本人作了像上面的一个小东西，不过还是有几个问题请大家给指点一下子，就是在输入数据时，如果误输入了非数字数据运行的话，会造成CAD的错误，还请那们高手给小弟指点一下，给写一下数字错误处理的程序段，就是只能在文本框内输入数字，如果输入其它的字符将出现警告，小弟在这里先谢了！！

wylong 发表于 2005-6-10 14:17:00

在“确定”按钮的click事件的前面加入对文本框内字符的判断，是数字通过；否则返回。
                       If Not IsNumeric(Text1.Text) Then
                                                                Exit Sub
                       End If
页: [1]
查看完整版本: 那位大哥给帮小弟一把，解决个小问题！！