Question

i have a text file with the following data:

Calculated Concentrations
30.55 73.48 298.25 27.39 40.98 11.21 99.22 33.46 73.99 12.18 30.7
50 28.4 34.33 29.55 70.48 43.09 28.54 50.78 9.68 62.03 63.18 28.4
100 23.83 68.65 10.93 ?????? 31.42 8.16 24.97 8.3 114.97 34.92 15.53
200 32.15 29.98 23.69 ?????? 23.41 33.6 92.03 32.73 13.58 58.44 94.61
400 159.98 18.05 50.94 37.12 15.25 46.75 315.22 69.98 13.58 ?????? 58.77
208.82 11.07 38.15 86.31 35.5 41.88 28.25 5.39 40.83 29.98 54.42 69.48
36.09 13.16 23.26 19.31 147.56 31.86 6.77 19.45 33.6 32.87 205.47 134.21
?????? 17.35 9.96 58.61 13.44 23.97 22.13 145.17 29.55 26.54 37.12 198.33

and i would like to load this data into an array.

1. how do i enable the user to open a file of his choosing in vb.net?
2. how do i read these values into an array in vb.net?

---

i would like to clarify that what person-b has suggested works very very well. specifically the fields = calculationText.split(” “) was exactly what i needed; however, my next issue is the following. the data above is actually in this format:

http://pastebin.com/d29ae565b

where the i need the first value to be 0, then 50, then 100 etc. and i need it to read columns from left to right. the problem is that the values are not reading into the array in this manner. the values are actually reading like this: 6.65, 84.22, ????, 35.15. please help!

Answer 1

To read a file into a String variable, in VB.NET, you can use the System.IO.File.ReadAllText() function. An example is:

Imports System.IO '// placed at the top of the file'

'// some code'

Dim calculationText As String
calculationText = File.ReadAllText("calculations.txt") '// gets all the text in the file'

Where "calculations.txt" is the file name.

To your next point – to allow the user to load a file of their choosing, you can use the OpenFileDialog type. An example:

Dim fileName As String
Dim openDlg As OpenFileDialog
openDlg = New OpenFileDialog() '// make a new dialog'
If openDlg.ShowDialog() = DialogResult.OK Then
    '// the user clicked OK'
    fileName = openDlg.FileName '// openDlg.FileName is where it keeps the selected name'
End If

Combining this, we get:

Imports System.IO 

'// other code in the file'

Dim fileName As String
Dim openDlg As OpenFileDialog
openDlg = New OpenFileDialog() '// make a new dialog'
If openDlg.ShowDialog() = DialogResult.OK Then
    '// the user clicked OK'
    fileName = openDlg.FileName
End If

Dim calculationText As String
calculationText = File.ReadAllText(fileName)

Now, we need to process the input. First, we need to make a list of decimal numbers. Next, we put everything in the file that is a number in the list:

Dim numbers As List(Of Decimal)
numbers = New List(Of Decimal)() '// make a new list'

Dim fields() As String
fields = calculationText.Split(" ") '// split all the text by a space.'

For Each field As String in fields '// whats inside here gets run for every thing in fields'
    Dim thisNumber As Decimal
    If Decimal.TryParse(field, thisNumber) Then '// if it is a number'
        numbers.Add(thisNumber) '// then put it into the list'  
    End If
Next

This won’t include Calculated Concentrations or ????? in the list. For usable code, just combine the second and last code samples.

EDIT: In response to the comment below.
With List objects, you can index them like this:

Dim myNumber As Decimal
myNumber = numbers(1)

You do not need to use the Item property. Also, when showing it in a message box, you need to turn it into a String type first, like this:

MsgBox(myNumber.ToString())