for(j=0;j<LenA3;j++) if(ChBJ[ChNo][j]<48 || ChBJ[ChNo][j]>57) break;
  z=j;
  for(j=0;j<z;j++)
   {
   k=ChBJ[ChNo][z-j-1]-48;
   n=n+m*k;
   m=m*10;
   }怎么把这个C的语句转成VB的语句呢?谢谢了!