字符串分割问题

Question

function StrGoto($mStr, $mSetChar, $mCount, $mLeft=TRUE)
// 取字串直到mSetChar在mStr中出现mCount次结束
/*
f('1a2b3c4d', '0123456789', 1, true)=''
f('1a2b3c4d', '0123456789', 2, true)='1a'
f('1a2b3c4d', '0123456789', 1, false)='d'
*/
{
  $Result = "";
  $K = 0;
  $L = strlen($mStr);
  for($I = 1; $I <= $L; $I++)
  {
    $J = $mLeft ? $I : ($L - $I + 1);
    if (strpos("\n".$mSetChar, $mStr[$J - 1])) $K++;
    if ($K >= $mCount) break;
    $Result = ($mLeft ? "" : $mStr[$J - 1]).$Result.($mLeft ? $mStr[$J - 1] : "");
  }
  return($Result);
}$a=StrGoto('1234$ddd', '$', 1);
$b=StrGoto('1234$ddd', '$', 1, FALSE);

Answer 1

dim aa
bb=1234$ddd
aa=split(bb,"$")
a=aa(0)
b=aa(1)

Answer 2

$bb="1234$ddd";
$aa=split($bb,"$");
$a=$aa(0);
$b=$aa(1);

Answer 3

$a="1234$ddd";
$b=explode("$",$a);
echo "$b[0]";
echo "$b[2]";

Answer 4

$a= "1234"."$"."ddd";
$b=explode("$",$a);
echo "$b[0]";
echo "$b[1]";
虽然结贴了，也顶上一把，我感觉这样就可以可