VB的运算顺序是：先乘除、后加减，有括号的先算括号内，有负号的先算负号。
为郊区等地区用户提供了全套网页设计制作服务，及郊区网站建设行业解决方案。主营业务为成都网站设计、成都网站制作、郊区网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！
请你比较一下这个运算中x和y的值：
Dim n As Single = 4
Dim x As Single
Dim y As Single
x = n + 1
x = x / n
x = x - 1
x = Math.Sqrt(x)
y = Math.Sqrt((n + 1) / n - 1)
这样就会发现，你的代码中括号的位置错了。
正确的应该是： Math.Sqrt((n + 1) / n - 1)
问题不是很简单吗？
判断输入的数,大于等于零,则直接开方;小于零则取绝对值开方再加上字符"i",代码我就不写了.
有现成的函数：
返回一个 Double，指定参数的平方根。语法Sqr(number)必要的 number 参数 number 是 Double 或任何有效的大于或等于 0 的数值表达式。
要用程序来开平方，首先你最起码要知道经过自己推导出来的公司，其次再是求精度，你说的nLength是要得到的10进制位数，这个不能给你保证，你得用一个小数位数来表达精度。假如你开一个非常大的数，你的整数部分就可能超过10位，更不要谈精度
方法是这样的：
x表示我要开的数,y表示结果,z是和开方后比较接近的数
y=z+(x-x^2)/2*z
也许你还不太明白，具体举例来说明
sqr(x)代表开x，即根号x，这个符号不太好打
假如我开5，即求根号5的值
5比4大sqr(4)=2,sqr(9)=3,9比5大，即459，所以2sqr(5)3,我们任取这个范围的一个数，就取2.5，z=2.5
y=2.5+(5-2.5^2)/2.5*2=2.25
此时比较接近结果的值是2.25,即z=2.25
y=2.25+(5-2.25^2)/2.25*2=2.2361112
比较接近了，想要再精确，就再次循环
通过上面的举例，相信你已经发现了用循环来求精度
具体该怎么做，相信你已经知道了
