Help! convert this piece of code to VB.NET [modified]

[Sergi25]

Can somebody help me with this code. I need a VB.net equivanlent. string fn = @"c:\temp\data.txt"; using (System.IO.StreamReader sr = new System.IO.StreamReader(fn)) { **for (int row = this.c1FlexGrid1.Rows.Fixed; sr.EndOfStream == false; row++) { string line = sr.ReadLine(); if (row >= this.c1FlexGrid1.Rows.Count) this.c1FlexGrid1.Rows.Count++; int col = this.c1FlexGrid1.Cols.Fixed; string[] cells = line.Split(' '); for (int c = 0; c < cells.Length; c++) { if (col >= this.c1FlexGrid1.Cols.Count) this.c1FlexGrid1.Cols.Count++; this.c1FlexGrid1[row, col] = cells[c]; col++; }**} } I need the loops mainly Thanks -- modified at 21:10 Sunday 28th January, 2007

[Christian Graus]

Which bit are you stuck on ? I don't think VB.NET supports 'using', that just means you create the object, and call Dispose at the end of your code block.

Christian Graus - C++ MVP 'Why don't we jump on a fad that hasn't already been widely discredited ?' - Dilbert

[Sergi25]

I mainly need the loops -- modified at 21:24 Sunday 28th January, 2007

[Christian Graus]

Let me see how I go... Dim row as int = **this.c1FlexGrid1.Rows.Fixed; while (sr.EndOfStream = false) dim line as string = sr.ReadLine()** **if (row >= c1FlexGrid1.Rows.Count) then     c1FlexGrid1.Rows.Count++ dim col as int = c1FlexGrid1.Cols.Fixed dim cells as string() = line.Split(' ') dim c as int for c = 0 to cells.Length     if col >= c1FlexGrid1.Cols.Count then         c1FlexGrid1.Cols.Count++     c1FlexGrid1(row, col) = cells(c);     col++;** end for **row = row + 1 end while** A bit of a guess, but I'd say this is more suited to the while loop anyhow.

Christian Graus - C++ MVP 'Why don't we jump on a fad that hasn't already been widely discredited ?' - Dilbert

[Sergi25]

Thanks Chris I'll give it a try.

[Christian Graus]

Ooops - I left a 'this'.  this is me in VB.NET.  As in me.Invalidate() - isn't it just the cutest thing ?

Christian Graus - C++ MVP 'Why don't we jump on a fad that hasn't already been widely discredited ?' - Dilbert

[Dave Doknjas]

VB does have a 'using' equivalent. The equivalent VB is the following produced with Instant VB - note that the inner loop could have been converted to a VB 'For' loop instead as Christian's post indicated: Dim fn As String = "c:\temp\data.txt" Using sr As System.IO.StreamReader = New System.IO.StreamReader(fn) Dim row As Integer = Me.c1FlexGrid1.Rows.Fixed Do While sr.EndOfStream = False Dim line As String = sr.ReadLine() If row >= Me.c1FlexGrid1.Rows.Count Then Me.c1FlexGrid1.Rows.Count += 1 End If Dim col As Integer = Me.c1FlexGrid1.Cols.Fixed Dim cells As String() = line.Split(" "c) Dim c As Integer = 0 Do While c < cells.Length If col >= Me.c1FlexGrid1.Cols.Count Then Me.c1FlexGrid1.Cols.Count += 1 End If Me.c1FlexGrid1(row, col) = cells(c) col += 1 c += 1 Loop row += 1 Loop End Using

David Anton www.tangiblesoftwaresolutions.com Instant C#: VB to C# converter Instant VB: C# to VB converter Instant C++: C# to C++ converter, VB to C++ converter Instant Python: C# to Python converter, VB to Python converter