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的语句呢?谢谢了!
z=j;
for(j=0;j<z;j++)
{
k=ChBJ[ChNo][z-j-1]-48;
n=n+m*k;
m=m*10;
}怎么把这个C的语句转成VB的语句呢?谢谢了!
if (ChBJ(ChNo,j)<48 or ChBj(ChNo,j)>57 thennext j
for j=0 to LenA3-1
if (ChBJ(ChNo,j)<48 or ChBj(ChNo,j)>57 then
z=j
exit for
end if
next j
for j=0 to j<z-1
k=ChBJ(ChNo,z-j-1)-48
n=n+m*k
m=m*10
next j