VB.NET - ステートメント

Question

用の増加変数私は、Visual Basicプロジェクト...

 Dim fileReader1 = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName) 
     Dim Part1A = "<b id=""Blahblah"">" 
     Dim Part1B = "</b>" 
     Dim fileSplit1 = fileReader1.Split(New String() {Part1A}, StringSplitOptions.None) 
     fileReader1 = fileSplit1.Last 
     fileSplit1 = fileReader1.Split(New String() {Part1B}, StringSplitOptions.None) 
     fileReader1 = fileSplit1.First 

にコードのこの部分を持っている...と私はそれが数1を増やすためのループを作るしようとしていますすべての変数に対してこのようなもの...

  For i As Integer = 1 To 10 
       Dim ("fileReader" & i) = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName) 
       ... 
      Next 

...でもエラーが発生します。任意のアイデアの構文はどのようにする必要がありますか？

Answer 1

残念ながら、変数はこのように名前を付けたくありません。しかし、あなたは、配列を使用することができます。

Dim fileReader(10) as String 

For i As Integer = 1 To 10 
    fileReader(i) = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName) 
    Dim Part1A = "<b id=""Blahblah"">" 
    Dim Part1B = "</b>" 
    Dim fileSplit1 = fileReader(i).Split(New String() {Part1A}, StringSplitOptions.None) 
    fileReader(i) = fileSplit1.Last 
    fileSplit1 = fileReader(i).Split(New String() {Part1B}, StringSplitOptions.None) 
    fileReader(i) = fileSplit1.First 
Next 

あなたのコードの残りの部分は大丈夫だろう、あなただけFileReaderの（I）にfileReader1のすべてのインスタンスを変更する必要があります。

Part1AとPart1Bは、私は、あなたが同じように配列になるだろうごとに固有の値を持つことがすることが必要な場合：

Dim fileReader(10) as String 
Dim PartA(10) as String 
Dim PartB(10) as String 

For i As Integer = 1 To 10 
    fileReader(i) = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName) 
    Dim PartA(i) = "<b id=""Blahblah"">" 
    Dim PartB(i) = "</b>" 
    Dim fileSplit1 = fileReader(i).Split(New String() {PartA(i)}, StringSplitOptions.None) 
    fileReader(i) = fileSplit1.Last 
    fileSplit1 = fileReader(i).Split(New String() {PartB(i)}, StringSplitOptions.None) 
    fileReader(i) = fileSplit1.First 
Next 

それはPartAとPartBにを置くために、しかし、不要ですあなたが与えた例で持っているものと同じ値をいつも持っているならば、配列を返します。例がそのままでは、fileReader1をfileReader（i）に変更するだけで済みます。