Loading A Text File into a Array into a Listbox

Please support our Visual Basic 4 / 5 / 6 advertiser: Programming Forums - DaniWeb Sister Site
Reply

•
•
Join Date: May 2008
Posts: 5
Reputation: Sliders is an unknown quantity at this point 
Solved Threads: 0
Sliders's Avatar
Sliders Sliders is offline Offline
Newbie Poster

Loading A Text File into a Array into a Listbox

 
0
  #1
May 8th, 2008
I am usually not keen for asking for help in these kind of situations but I am really stumped when it comes to this, all I really need is a good step in the right direction and I should be (hopefully) fine.

I am currently writing an airplane seating program for my VB class. What I am trying to do is load a text file into an array and then out put it into the list box.

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
  1.         Dim seat(15, 6) As Double
  2.         Dim sr As IO.StreamReader = IO.File.OpenText("plane.txt")
  3.         For row As Integer = 0 To 6
  4.             For col As Integer = 0 To 15
  5.                 seat(row, col) = CDbl(sr.ReadLine)
  6.             Next
  7.         Next
  8.         listSeat.Items.Clear()
  9.         listSeat.Items.Add("ABC DEF")
  10.         Do While sr.Peek <> -1
  11.             listSeat.Items.Add(sr.ReadLine)
  12.         Loop
  13.         sr.Close()
  14.     End Sub

The setup for the txt file is like this:

... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...
... ...

When I execute the program I get a InvalidCastException which said {"Conversion from string "V.. ..." to type 'Double' is not valid."}

The "V.. ...." is from the txt file, from this error from what I am trying to comprehend is that its trying to convert the whole line to double, but I am not sure on how to go about going fixing this small problem, because If i can figure this out then I can figure out the rest of my problem.

Thanks in advanced
Reply With Quote Quick reply to this message  
•
•
Join Date: Nov 2006
Posts: 848
Reputation: QVeen72 is on a distinguished road 
Solved Threads: 120
QVeen72's Avatar
QVeen72 QVeen72 is offline Offline
Practically a Posting Shark

Re: Loading A Text File into a Array into a Listbox

 
0
  #2
May 8th, 2008
Hi,

Not sure, try this, change your code:

listSeat.Items.Add(sr.ReadLine( ))

Regards
Veena
Reply With Quote Quick reply to this message  
•
•
Join Date: May 2008
Posts: 5
Reputation: Sliders is an unknown quantity at this point 
Solved Threads: 0
Sliders's Avatar
Sliders Sliders is offline Offline
Newbie Poster

Re: Loading A Text File into a Array into a Listbox

 
0
  #3
May 8th, 2008
No, that didn't work. What also I tried to do is reverse the do while statement and the for statement but I got an out of bounds exception.
Reply With Quote Quick reply to this message  
•
•
Join Date: Nov 2006
Posts: 848
Reputation: QVeen72 is on a distinguished road 
Solved Threads: 120
QVeen72's Avatar
QVeen72 QVeen72 is offline Offline
Practically a Posting Shark

Re: Loading A Text File into a Array into a Listbox

 
0
  #4
May 9th, 2008
Hi,

Try to declare reader oject like this :

Dim sr As New System.IO.StreamReader("C:\plane.txt")

Give complete path of the file..

REgards
Veena
Reply With Quote Quick reply to this message  
•
•
Join Date: May 2008
Posts: 5
Reputation: Sliders is an unknown quantity at this point 
Solved Threads: 0
Sliders's Avatar
Sliders Sliders is offline Offline
Newbie Poster

Re: Loading A Text File into a Array into a Listbox

 
0
  #5
May 9th, 2008
No I shouldn't have to give the complete path since the txt file is already where it is supposed to be in my project file, it will load just fine, but from what I see the problem is the way the code is written, and I have really no idea how to fix it.
Reply With Quote Quick reply to this message  
•
•
Join Date: May 2008
Posts: 5
Reputation: Sliders is an unknown quantity at this point 
Solved Threads: 0
Sliders's Avatar
Sliders Sliders is offline Offline
Newbie Poster

Re: Loading A Text File into a Array into a Listbox

 
0
  #6
May 9th, 2008
Sorry for double posting but I think I fixed the code to make it better, and it works to an extent.

Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text) 
  1. Private Sub Chart_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
  2.         Dim sr As IO.StreamReader = IO.File.OpenText("plane.txt")
  3.         For row As Integer = 0 To 15
  4.             For col As Integer = 0 To 6
  5.                 seat(row, col) = CStr(sr.ReadLine)
  6.             Next
  7.         Next
  8.         listSeat.Items.Add("ABC DEF")
  9.         'Do While sr.Peek <> -1
  10.         ''''listSeat.Items.Add(seat(row, col))
  11.         sr.Close()
  12.     End Sub

I don't get any out of bounds errors or null exception errors, but it won't output the text file into the list box for some reason
Reply With Quote Quick reply to this message  
•
•
Join Date: Nov 2006
Posts: 848
Reputation: QVeen72 is on a distinguished road 
Solved Threads: 120
QVeen72's Avatar
QVeen72 QVeen72 is offline Offline
Practically a Posting Shark

Re: Loading A Text File into a Array into a Listbox

 
0
  #7
May 12th, 2008
Hi,

While populating the "Seat", populate the Listbox as well...

vb Syntax (Toggle Plain Text) 
  1. Private Sub Chart_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
  2.   Dim sr As IO.StreamReader = IO.File.OpenText("plane.txt")
  3.   listSeat.Items.Add("ABC DEF")
  4. For row As Integer = 0 To 15
  5.  For col As Integer = 0 To 6
  6.   seat(row, col) = CStr(sr.ReadLine)
  7.   listSeat.Items.Add(seat(row, col))
  8.  Next
  9. Next
  10. sr.Close()
  11. End Sub

Regards
Veena
Last edited by QVeen72; May 12th, 2008 at 8:22 am.
Reply With Quote Quick reply to this message  
Reply

Quick Reply to Thread
This thread is more than three months old.
Perhaps start a new thread instead?
•
•
•
•
•
•
•
•
Message:
•
•
•
•



Similar Threads
Other Threads in the Visual Basic 4 / 5 / 6 Forum


Views: 3819 | Replies: 6
Thread Tools Search this Thread



Tag cloud for Visual Basic 4 / 5 / 6
6 429 2007 access activex add age append application basic beginner birth c++ calculator cd cells.find click client code college column component connection connectionproblemusingvb6usingoledb copy creat ctrl+f data database datareport date delete dissertations dissertationthesis dissertationtopic edit error excel excelmacro file filename form hardware header iamthwee image inboxinvb internetfiledownload keypress label listbox listview liveperson login looping machine microsoft movingranges number objectinsert open oracle password prime program prompt range-objects readfile reading record refresh remotesqlserverdatabase report retrieve save search sendbyte sites sort sql sql2008 sqlserver struct subroutine table tags textbox time timer urldownloadtofile vb vb6 vb6.0 vba visual visualbasic visualbasic6 web window windows
About Us | Contact Us | Advertise | DaniWeb | Acceptable Use Policy | RSS Feed

©2003 - 2009 DaniWeb® LLC