以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  开根号  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=170365)

--  作者:wangglby
--  发布时间:2021/7/23 15:06:00
--  开根号

Dim txt As String = Forms("窗口1").Controls("textbox1").Value

If txt= "" Then
Else

Forms("窗口1").Controls("textbox2").Value =eval(txt)

End If

 

 

这个代码在 文本框1输入 表达式     在文本框2中 求值

 

当表达式计算开根号比如:sqrt(2),无法求值,请问有办法吗


--  作者:有点蓝
--  发布时间:2021/7/23 15:17:00
--  
表达式的平方根号是sqr:http://www.foxtable.com/webhelp/topics/1415.htm

sqr(2)