質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.50%
VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。

Q&A

解決済

2回答

3722閲覧

VB.net 文字列の判定

dera

総合スコア28

VB.NET

Microsoft Visual Basic .NETのことで、Microsoft Visual Basic(VB6)の後継。 .NET環境向けのプログラムを開発することができます。 現在のVB.NETでは、.NET Frameworkを利用して開発を行うことが可能です。

0グッド

0クリップ

投稿2019/04/19 01:58

皆様こんにちは。

今回、テキストファイルの全行を1行ずつ読込み、
1行の文字列に対して「=」があれば、「=」から右側の文字列を取得する、という処理を行いたいです。

以下にコードを書きましたが、
「=」の右側を取得するというのが、どう判定すればいいか、調べてもわからず、躓いているところであります。

以前は、1行の文字列をEquals関数(完全一致)で比較させ、
Replace関数で整形させていました。
ただ、その場合、テキストファイルの中身が変わった時点で、対応できなくなるので、
なんとかならないかな・・・。という経緯があります。

VB

1    Using fs As New FileStream(testfile, FileMode.Open, FileAccess.Read, FileShare.ReadWrite) 2 Using tr As TextReader = New StreamReader(fs, Encoding.GetEncoding("shift-jis")) 3 '全行読込 4 Dim line As String 5 Do 6 line = tr.ReadLine() 7 'ここで読み込んだ文字列に対して、「=」があれば、「=」から右側の文字列を取得したい 8 9 Loop Until line Is Nothing 10 End Using 11 End Using

もし、ご存知の方がいらしましたら、ご教示願いたく思います。

よろしくおねがいいたします。

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

退会済みユーザー

退会済みユーザー

2019/04/19 03:22

一行の中に '=' が複数存在することはない(ゼロまたは一つ)のですか? 複数あった場合はどうするのですか?
dera

2019/04/19 06:21

今回の場合は、1行の中に’='が複数存在することはありませんので、考慮しておりませんでした・・・。
guest

回答2

0

ベストアンサー

人間が考えるように処理すれば良いと思います。質問者さん自身がその対象の1行を見たとき、どのように取り扱うでしょうか?

dobon.net - 文字列内に指定された文字列があるか調べ、その位置を知る

位置を知ったらその位置に+1したインデックスから始めて、行末まで取得すれば良い訳です。
なお、正規表現が分かれば一発ですが、現段階では後回しで良いと思います。

投稿2019/04/19 02:15

dodox86

総合スコア9183

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

dera

2019/04/19 06:31

ありがとうございます。こちらの方法で無事とることができました。 //上記コード省略 If line.Contains("AAAA") Then count = line.IndexOf("=") RightChar = line.Substring(count + 1)
dodox86

2019/04/19 06:38

お役に立ててよかったです。必要に応じてIndexOfで見つからなかった(-1が返る)ケースも適時ご検討ください。この場合は例外(ArgumentOutOfRangeException)が発生します。もちろん、検討済みで、絶対に"="が存在するならその限りではありません。
guest

0

複数"="があった場合はどうすればいいのか不明ですが
split でもいいのではないでしょうか

VB.NET

1Dim fileData As String() 2 3fileData = System.IO.File.ReadAllLines("d:\testdata.txt") 4 5Dim getData As String() 6 7getData = fileData _ 8 .Select(Function(row) row.Split("=")) _ 9 .Where(Function(splitValue) splitValue.Length = 2) _ 10 .Select(Function(value) value(1)) _ 11 .ToArray()

投稿2019/04/19 04:04

trick

総合スコア366

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

dera

2019/04/19 06:28

なるほど、これは、spilitで文字分割して処理しているのですね。 Linqを使うというのが思いつきませんでした。とても参考になります。 Linqはあまり馴染みがなく、理解できる範囲も狭いので、これを気にもう少し勉強してみたいと思います。ありがとうございます。
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.50%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問