主题：开根号

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),无法求值，请问有办法吗