テキストファイルの置換について

質問

VB6について質問です。
規則性のある(1)のようなバイナリファイルを(2)のように置き換えたいので
お知恵をお貸しください＞＜
Replace関数で<A>を</B>に置換して・・・と考えたのですが前方の<B>をどうやって実現してよいか考えが浮かびません；
※なまえ等の文字列はは可変長です。。。

(1) なまえ<A>ふりがな<A>ねんれい<A>・・・・
(2) <B>なまえ</B><B>ふりがな</B><B>ねんれい</B>・・・・

回答No.6

BLUEPIXY

a = "なまえ<A>ふりがな<A>ねんれい"
b = ""
data = Split(a, "<A>")
For Each v In data
b = b & "<B>" & v & "</B>"
Next
MsgBox b

回答No.5

pbforce

<A>を全部改行に変更してしまい、行頭に<B>を入れて、行末に</B>を入れる。

のも有効かと思います。

回答No.4

sagamiya

頭の<B>とお尻の</B>は固定で入れて、
str="<B>"&replace(str,"<A>","</B><B>")&"</B>"

回答No.3

ayusu

<A>で一旦splitして配列に格納するとか。

回答No.2

pbforce

> 改行の後に<b>をつける、改行の前に</b>をつける、<A>の変わりに</b><b>をつける、でいけませんでしょうか？

見当はずれな回答をしてしまい申し訳ございませんでした。
ご容赦下さい。

回答No.1

siddhaartha

文字列の先頭は必ず<B>を付けて、以降は<A>を</B><B>に置換ではダメですか？

ｘｘなまえ<A>ｘｘｘｘふりがな<A>ｘねんれい<A>ｘｘｘ・・・
ｘｘ<B>なまえ</B>ｘｘｘｘ<B>ふりがな</B>ｘ<B>ねんれい</B>ｘｘｘ・・・

を実現されようとしているのであれば、頭の<B>を何処に入れるかの判断基準が無いと不可能です。

蛇足ですが、バイナリファイルじゃなくてテキストじゃないですか？