0FA00FA0012C012C00640064
データを4桁づつ区切り、Text1〜6までに代入したいのですが
簡単に出来る方法を教えて下さい。
Mid関数を調べてみるとか
これだとText1(i)に分割ですよね?
Text1,2,3,4,5,6にそれぞれいれたいんですが・・・
If lngResult <> 0 Then
For i = 0 To 5
Text1(i).Text = Mid(Data, lngResult + Len(Finscode) + (4 * (i + 1)), 4)
Next
何に分割するかなんてプログラム次第ですよ
せっかくここまでやったのなら、少し手を加えて
Dim Dammy(5) As String
If lngResult <> 0 Then
For i = 0 To 5
Dammy(i) = Mid(Data, lngResult + Len(Finscode) + (4 * (i + 1)), 4)
Next
Text1 = Dammy(0)
Text2 = Dammy(1)
Text3 = Dammy(2)
Text4 = Dammy(3)
Text5 = Dammy(4)
Text6 = Dammy(5)
でいいかと
ちなみに、TextBoxを配列化しない理由があるんでしょうか
dataがHexなのですが、10進数に変換する所としない所があるので
配列化しない方が良いのかなと思いまして・・・
有難う御座います。
解決したと思ったのですか・・・
コンパイルエラー:
プロパティの使い方が不正です。
と表示されます。どうすれば良いでしょうか?
エラーの解除方法を教えて下さい。
>プロパティの使い方が不正です。
ヘルプを読んで正しい使い方に変更してください。
# ヘルプの表示は、コード上でエラーのでるプロパティ
# を選択状態にして[F1]キー押下です。
MSDNを再インストールになってしまいます。
再インストールしてください。
CDが無くてインストール出来ないんです。
MSDNのサイトで探しているのですが何をインストールすれば良いのか
分かりません。
ハロハロ さん こんにちは。
> MSDNのサイトで探しているのですが何をインストールすれば良いのか
分かりません。
「MSDNライブラリ」が必要ですが・・・
一般には、インストール用のファイルはサイト上には公開されていませんよ。
#有料の「MSDN サブスクリプション」の契約をしていれば、専用サイトからダウンロードできますけど・・・
ですから、
> CDが無くて
が、「見つからない」と言う意味なら、CDを頑張って探してください。
#CD2枚(以上?)組で、VBのパッケージに同梱されている(されていた)はずですよ。
そうなんですか。
う〜んどうも無くしてしまったようです・・・
何とかします!どうも有難う御座います。
何とかなりました。
ツイート | ![]() |