如何用vb6.0语言编写高精度开方的程序？

如：√5 = 2.2360679775……

在下面这个网站中有一个高精度开方的程序，不过它是用C++语言编的，要是能将它转换成VB6.0语言就好了！


http://topic.csdn.net/t/20050617/09/4088398.html

原C++语言程序如下：

#include <iostream>
#include <cryptlib/integer.h>
#include <sstream>
using namespace std;
using namespace CryptoPP;

#define PREC 1000

int main( int argc , char* argv[] )
{
if( argc != 2 )
{
cout << "usage foobar <number>" << endl;
exit( 1 );
}

istringstream iss( argv[1] );
Integer nn , mm = 1 , mm2; iss >> nn;

for( int i = 0; i < PREC; ++i ) mm *= 10; mm2 = mm * mm; nn *= mm2;
cout << nn.SquareRoot() << endl;
}

[此贴子已经被作者于2006-3-11 9:12:08编辑过]

“"二分法"”能达到高精度吗？