主题：关于个人自定义计算器 求改进

做了一个计算器窗口，当要计算时按=号就可以调出这个计算器窗口，然后输入如2+3+8的代码按回车就能将计算结果输入到当前行的数量列。

 但有个问题，现在只按=号是不能达到上述所说的，只有按“ctrl+=”才能达到所想的目的。

 

  请问有什么办法只按“=”号就能达到想要的结果呢？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:计算器.rar

我按等于键可以调出窗口，只不过会在焦点单元格中输入等于字符。

是可以调出窗口，但计算结果不会自动显示，如果按"ctrl + ="时调出窗口就能将计算结果显示于数量列的当前行里。

If e.KeyCode=keys.Oemplus then
Sendkeys.Send("{TAB}")
e.Cancel=true
Forms("计算器").Open()
End If

 

这样就可以了，呵呵。

呵呵，Sendkeys.Send("{TAB}")多此一举吧？

还是有一个问题（在独立窗口时），就是得到结果时，再按任何健都不会反应，除非点一下鼠标才行；如果改为模式窗口时，按健虽然有反应， 但得不到结果。

没必要用计算器吧，简单点，在ValidateEdit事件中判断输入内容，如果内容以“=”开始，例如：

 

=99+128

 

则用eval求此表达式的值，并用求得的值替换输入的内容。

经测试这个方法只有在列的数据类型为字符时才可以，如果在数值列就不行。请问是这样吗？

是这个理，看来此方法没有实际意义。

 

 

所以还是以窗口的形来做吧，大家有没办法解决像我在6楼所说的现象呢？