[2005] Conversion of C code to VB.net

I found the following code posted by Louisda16th at http://www.dreamincode.net/code/snippet533.htm


I am wondering if anyone can help me convert the following code to VB.NET..

I will be thankful for any response..

Code:

---

/*Created by Louisda16th/Ashwith*/
#include<stdio.h>
#include<math.h>
struct complx solvequad( long double p, long double q, long double r, long double s, long double t);
struct complx
{
    long double real;
    long double img;
    int iscomplex;  //0=False, 1 = True
};
void main()
{
    int y;
    long double a,b,c,d,x1,x2;
    struct complx x3;
 
    printf("\n a?");/*Find Coefficients of the equation*/
    scanf("%lf",&a);
    printf("\n b?");
    scanf("%lf",&b);
    printf("\n c?");
    scanf("%lf",&c);
    printf("\n d?");
    scanf("%lf",&d);
 
    if (d != 0)
    {   
          x1=0;
          /*The for loop finds an approximate solution
          for the equation by using Newton-Raphson Method:
                    x1=x0-(f(x0)/f'(x0))
                    x2=x1-(f(x1)/f'(x1))
                    ...
                    ...
          the solution is more accurate with more iterations*/
          for(y=0;y<=100;y++)                                                                                                   
          {
              x2=x1-(((a*x1*x1*x1)+(b*x1*x1)+(c*x1)+d)/((3*a*x1*x1)+(2*b*x1)+c));
              x1=x2;
          }
          printf("\n x1=%lf",x2);
    }
    else
          printf("\n x1=0");
    /*After one root has been found, we're left
    with a quadratic equation which can easily be solved
    using the formula*/
    x3 = solvequad(a,b,c,d,x2);
   
    if (x3.iscomplex == 0)
          printf("\n x2=%lf\n x3=%lf\n", x3.real +x3.img, x3.real - x3.img);
    else
          printf("\n x2=%lf+i%lf\n x3=%lf-i%lf\n",x3.real, x3.img,x3.real,x3.img);
         
}
 
struct complx solvequad( long double p, long double q, long double r, long double s, long double t)
{
   
    long double a,b,c,i;
    struct complx x;
 
    a=p;
    b=q+(t*p);
    c=(-s)/t;
    x.real =((-b)/(2*a));   
    i=((b*b)-(4*a*c));
 
    if (i>=0)
    {
          x.img =(sqrt(i))/(2*a);
          x.iscomplex = 0;
    }
    else
    {
          x.img =(sqrt(-i))/(2*a);
          x.iscomplex = 1;
    }
    return x;
}

---

That code is actually in C not in C#.

You are right; are there any tools for conversion...
thanks

You might want to try a google search.

I checked on google, and found www.tangiblesoftwaresolutions.com.
It doesnt seem to be converting struct properly.

Wondering if you know any sites what would convert the code..
thanks

Quote:

---

Originally Posted by RobDog888

You might want to try a google search.

---

Kind of a round about way but I guess you could try this:

http://msmvps.com/blogs/montaque/arc...4/01/4497.aspx
then
http://www.developerfusion.co.uk/uti...sharptovb.aspx

Quote:

---

Originally Posted by surya

I checked on google, and found www.tangiblesoftwaresolutions.com.
It doesnt seem to be converting struct properly.

Wondering if you know any sites what would convert the code..
thanks

---

Conversion from C++ to VB is difficult, so there will be adjustments to make after any automatic conversion. Note that the C++ struct is not equivalent to the VB Structure - is this the problem you're referring to? (There is a bug in the current version of C++ to VB Converter which causes the 'struct' keyword to remain on the method header, but this will be fixed on today's build).

Quote:

---

Originally Posted by David Anton

Conversion from C++ to VB is difficult, so there will be adjustments to make after any automatic conversion. Note that the C++ struct is not equivalent to the VB Structure - is this the problem you're referring to? (There is a bug in the current version of C++ to VB Converter which causes the 'struct' keyword to remain on the method header, but this will be fixed on today's build).

---

Hi,
Yes, I had this struct problem.
Trust the latest update will convert the code perfectly now...

It will be nice if you can run your latest build on the sample code posted in this thread...

thanks

Quote:

---

Originally Posted by surya

Hi,
Yes, I had this struct problem.
Trust the latest update will convert the code perfectly now...

It will be nice if you can run your latest code on my sample code...

thanks

---

The update later today will certainly not convert the code perfectly (I'm sure you were being funny...).

I will test your sample code and we'll do all we can to produce the best conversion, but the nature of C++ to VB conversion is that only the most contrived examples will convert perfectly. It will save you some grunt work though.

thanks alot david;
it will save lot of my time as I am not very familiar with c...