Why is this generating a message that file is not found

[pooker75]

This code works perfectly except when I start I get a message that file is not found. The file is there and everything reads perfectly. How can I get the file to read and not get the message that the file is not found? Do I need to use something other than Try? I tried taking the Try away and then I get errors and no file reads. Jo Ann

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
        'load the item into the combobox
        Try
 
            vinStreamreader = New StreamReader("car.txt")
            DisplayRecord()
        Catch ex As Exception
            'File is not found.
            MessageBox.Show("File does not exist.")
        End Try
 
 
    End Sub
    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        'Read the next record.
        DisplayRecord()
    End Sub
 
    Private Sub DisplayRecord()
        'Read and display the next record.
        Dim vinString As String
        Do While vinStreamreader.Peek <> -1
            vinString = vinStreamreader.ReadLine()
            Me.ComboBox1.Text = vinString
            Me.ComboBox1.Items.Add(ComboBox1.Text)
 
            Me.ListBox1.Items.Add(vinStreamreader.ReadLine())
            Me.ListBox2.Items.Add(vinStreamreader.ReadLine())
            Me.ListBox3.Items.Add(vinStreamreader.ReadLine())
 
        Loop
        'Display labels
        Me.Label4.Text = Me.ListBox1.Items(Me.ComboBox1.SelectedIndex)
        Me.Label5.Text = Me.ListBox2.Items(Me.ComboBox1.SelectedIndex)
        Me.Label6.Text = Me.ListBox3.Items(Me.ComboBox1.SelectedIndex)
 
    End Sub
 
 
End Class

[Killer42]

If the code produces an error, then what do you mean by "working perfectly"?

Presumably it's line 6 that produces the error? If so, then I guess you're looking for the file in the wrong directory. Try specifying the full path to the file.

[QVeen72]

Hi,

You have hard-coded the message.
Catch the actual Exception message. Change your code this way, and check ..

Try 
    vinStreamreader = New StreamReader("car.txt")
    DisplayRecord()
Catch ex As Exception
     MessageBox.Show(ex.Message)
End Try
 

Regards
Veena

[pooker75]

I did what you said but it just generates another error message that I don't know how to fix. Please advise if you have any ideas how to fix so I don't get an error message.

[pooker75]

If the code produces an error, then what do you mean by "working perfectly"?

Presumably it's line 6 that produces the error? If so, then I guess you're looking for the file in the wrong directory. Try specifying the full path to the file.

If I click ok on the message, the program proceeds to run just fine. I just need to get rid of the first error message that pops. The file is there and does not need the full file location to read. I just need the code to get rid of that error message. I tried changing file not found to ex.message but that just generates another error message that I can't fix.

[Killer42]

... I tried changing file not found to ex.message but that just generates another error message that I can't fix.

I think we need to know the details of the error that is generated.

[pooker75]

I think we need to know the details of the error that is generated.

It says "Value cannot be null; Parameter Name: Item

[Killer42]

It says "Value cannot be null; Parameter Name: Item

Exactly where is it reporting this error? On the New StreamReader? If so, check out the Item parameter, since it apparently needs a value.