【満点差し上げます】[VB.NETで、改行を基準に文字列を切り出すサブルーチンを書いてほしいです]


0個、1個、または複数の改行を含むstring変数の中から、最初の改行までの文字列を取り出して別の変数に格納し、取り出した分を最初の変数から削除し、なおかつ別の変数に"Exist"を格納するサブルーチンを書いていただけますか? また、最初の変数が「空っぽ」になったら、これまた別の変数に"NotExist"を格納してほしいです。

例:
strA = "AAAA[vbCrLf]BBBB[vbCrLf]CCCC"
strB = ""
strC = ""

strA = "BBBB[vbCrLf]CCCC"
strB = "AAAA"
strC = "Exist"

例2:
strA = "BBBB"
strB = ""
strC = ""

strA = ""
strB = "BBBB"
strc = "Exist"

例3:
strA = ""
strB = ""
strC = ""

strA = ""
strB = ""
strC = "NotExist"

回答の条件
  • 1人2回まで
  • 登録:2010/02/06 05:28:42
  • 終了:2010/02/06 11:19:20

ベストアンサー

id:rafile No.1

rafile回答回数662ベストアンサー獲得回数242010/02/06 10:12:43

ポイント100pt

if strA.CompareTo("")=0 then

strB=""

strC="NotExist"

elseif strA.IndexOf(vbCrLf)>0 then

strB=strA.subString(0,strA.IndexOf(vbCrLf)-1))

strA=strA.subString(strA.IndexOf(vbCrLf),strA.Length-strA.IndexOf(vbCrLf))

strC="Exist"

else

strB=strA

strA=""

strC="Exist"

end if

id:jjkkjpvb2008

ありがとうございます!

2010/02/06 11:10:14

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません