Question

谁能帮忙将这段vbscript转换成javascript

Function vbCut(Z,Y)
Dim A,B,i
Z = Trim(Z)
A = Len(Z)
B = 0
If A >= 1 Then
For i = 1 To A
If Asc(Mid(Z,i,1)) < 0 Or Asc(Mid(Z,i,1)) >255 Then
B = B + 2
Else
B = B + 1
End If
If B >= Y Then
Z = Left(Trim(Z),i)
Exit For
End If
Next
vbCut = Z
Else
vbCut = ""
End If
End Function

Answer 1

function vbCut(Z,Y)
{
var B=0;
Z = Z.replace(/(^\s*)|(\s*$)/g, "");
if(Z.length >=1)
{
for(i=0;i<Z.length;i++)
{
if( Z.charCodeAt(i) >=255 )
{
B = B + 2;
}
else
{
B = B + 1;
}
if( B > Y )
{
Z = Z.substr(0,i);
break;
}
}
return Z;
}
else
{
return "";
}
}
alert(vbCut(" sffa测试sdafafsdf ",6));

以上测试通过返回:sffa测