Я не знаком с VB, но похоже, что он делает str_pad(dechex(ord($AscSrc[0])), 2, '0', STR_PAD_LEFT);
или просто bin2hex($AscSrc[0]);
.
Возможно, вы сможете оптимизировать этот код, так как в PHP есть функция bin2hex();
, которая мгновенно преобразует всю строку в последовательность шестнадцатеричных цифр из двух цифр. Вы можете поставить пробел между ними с помощью preg_replace('/../' '\0 ', bin2hex($AscSrc));
, если это так.