こんにちは、魔界の仮面弁士様、るきお様
　　熱が平熱になったり、上がったり一進一退を繰り返しています

>②TTC クラスの FindFont メソッドは、フォント名から *.ttf/*.ttc を検索するものです。
>　うまく検索できない場合があったので、その場合には
>　　Return New >System.IO.FileInfo("C:\Users\Y2\AppData\Local\Microsoft\Windows\Fonts\ipamjm.ttf")
>　のように固定パスで FileInfo を返すようにすれば、とりあえず先に進むかと。

上記の話を事前に書いておいて頂いていたので、修正して無事動きました！！
るきお様のWEBも頼りになります！！
大変ありがとうございます


>③肝となるのが  Public Shared Function FindISV なわけですが、元のコードでは
>　ByVal targetChar As Char な引数を受け取り、CUInt(AscW(targetChar)) を渡しています。
>　これだと、サロゲートペアを処理できないので、メソッドを Overloads して、>?　ByVal targetChar As >UInteger を受け取るメソッドをもう一つ用意してみてください。
>　そして、このメソッドに "𩸽" を渡すのではなく、そのコードポイントとなる
>　&H29E3DUI を引き渡すようにします。
オーバーロードはできるかどうかわかりませんが、別関数にしたら出来るかも？と思っております
まだ体調不調なので、ゆっくりがんばってみます