bonsoir à tous,
j'aurais besoin de convertir le code suivant en vb
je précise que j'ai déjà essayé des logiciels qui soit disant le faisait mais cela ne fonctionne pas :
#define TAILLE 2147
void fact(int n)
{
int tab[TAILLE];
int k=1;
int m,i,p;
int base=1000000;
int x,y;
//initialisation du tableau de stockage
for(i=0;i<TAILLE;i++) tab[i]=0;
tab[TAILLE-1]=1;
//Calcul des composantes du résultats et stockage ds le tableau
for(m=1;m<=n;m++)
{
p=0;
for(i=1;i<=k;i++)
{
x=(p+m*tab[TAILLE-i]);
y=x%base;
p=(x-y)/base;
tab[TAILLE-i]=y;
}
if(p!=0) tab[TAILLE+1-k]=p;
k++;
}
//affichage du résultat
k=0;
while(tab[k]==0) k++;
cout<<tab[k];
for(i=k+1;i<TAILLE;i++)
{
if (tab[i]<10) cout<<"00000"<<tab[i];
else if (tab[i]<100) cout<<"0000"<<tab[i];
else if (tab[i]<1000) cout<<"000"<<tab[i];
else if (tab[i]<10000) cout<<"00"<<tab[i];
else if (tab[i]<100000) cout<<"0"<<tab[i];
else cout<<tab[i];
}
cout<<endl;
}
Merci d'avance.