VBAのRight,Format,Val関数を用いたコードをPHPに書き換える方法

Question

以下のVBAのコードをPHPに書き換えるとなると、
どういった書き方がよろしいでしょうか。

Dim a As String
Dim b As String

a = "123456789012"
b = Right(Format(10 - Val(Right(Format(a, "####0"), 1)), "####0"), 1)

Comments

[m.ts10806]

目的や背景がわかりません。ご自身でなにもされてないので「作業依頼」になりますよ

[papinianus]

"####0"の意味が分からないです。最低桁の0と#だけの繰り返しとで何が表現したいのでしょうか。aのパターンを複数、それも境界値を含むように提示していただけませんか？aがこの値固定ならPHP的には`$b = 8;`にしかならないので。

Answer 1

こんな感じでしょうか。

$a = "123456789012";
$b = 10 - substr($a, -1, 1);

Comments

[ttyp03]

あら、退会しちゃった。
最近多いな、この手の人。
せめていいのか悪いのかくらい言ってから去ってくれ。

[papinianus]

$aの末尾が"0"だったときに、$bが二桁になるからBAにしなかったんですかね？

[ttyp03]

あ、その対応忘れてた…。
じゃあ仕方ないか。