Sub XX()    Dim i As Integer, m As Double, T As Double    m = 81    T =&nbs...Sqr是什么意思？Sqr表示完全平方根！可是在VB里面 sqr表示不出来呀那就用这个 m = m ^ (1/2) 试试