「Mid$」関数を数字型のまま利用したい

[NON]

少し分かりにくいかもしれませんが、
たとえば数字型の「1F」で「1」と「F」を別に取り出すみたいなことです。
こんなことはできるでしょうか？

[イグトランス]

　1Fとは十六進法でよいですね？
それならばビット演算をうまく使うことです。
十六進法の1桁は4ビットで表現されています。

コード: 全て選択

#strict
#prompt

Dim src = &h1f As Byte
Dim dst[ELM(2)] As Byte

dst[0] = src >> 4
dst[1] = src And &h0f

Print Hex$(dst[0]), Hex$(dst[1])

[NON]

すみません。
16進数の場合はいいのですが、この対象になるのは２～３６進数なので、
「Str$」関数の逆、みたいなのがあると良いのですが・・・。
1つ1つIF文でやるほかはないでしょうか？
ご提示くださったコードはビット演算が分からず、
おそらく中枢と思われる

コード: 全て選択

dst[0] = src >> 4
dst[1] = src And &h0f

の意味がよく分からない状態です。
まだまだ初心者で迷惑をおかけします。

[OverTaker]

Str$()関数の逆とは、文字列を数字にするということですか？
それでしたらVal()関数がありますよ。

http://www.geocities.jp/bfrqf368

[EIJI]

１０進数からｎ進数の変換ではChr$関数,ｎ進数から１０進数の変換ではAsc関数を使用します。

１０進数＜＞２進数は計算できますよね？

３６進数といえば、ちょうどＡ～Ｚまでを使用する学校の宿題みたいなので答えは自分で考えてみてください。

[NON]

OverTaker様
こんな関数があったんですね。何回か検索はしたのですが
気が付きませんでした。

EIJI様

１０進数＜＞２進数は計算できますよね？

文字列を数字にできればほぼできるはずです。一応作ってはあるので。

皆様ありがとうございました。