主题：2013年8月26日更新

希望下次更新能够增加Mail模块，我记得狐爸是讲过的

 

已经有了，帮助没有写，要整理

希望功能足够强大哈，期待

顶顶顶

狐爸，虽然你会认为我只是闲着没事做，我也承认手贱了一点，但也算BUG，呵呵，您就海涵吧

以下计算时，均会出错

 

此主题相关图片如下：1.png


此主题相关图片如下：2.png


此主题相关图片如下：3.png

此主题相关图片如下：4.png

呵呵，这个不算bug。

0不能做除数，这显然是bug，输入文字报错，那到可以不做为bug，因为您提供的计算方式很多应用需要输入文字，要是能判断计算式是否合法，那是更好

Dim s As String = e.Form.Controls("TextBox显示").Text

If TryEval(s) = False Then
    MessageBox.Show("算式错误!")
    e.Form.Controls("TextBox显示").Select()
Else
    e.Form.Controls("TextBox显示").Text = Eval(s)
End If

我说的是狐表给的内置计算器，不是自己设计的代码，那里面引用了表、列，好要考虑科学计算公式的话，估计TryEval某些方面应该是无能为力（没测试，有时间的朋友可以试一下）！

谢lsy兄提醒，我用eval减少一点错误提示吧。