Public Class Form1
    Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
        Me.Close()
    End Sub



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim FILE_NAME As String = "C:\time.txt"
        Dim objReader As New System.IO.StreamReader(FILE_NAME)
        Me.ComboBox2.Text = objReader.ReadToEnd
        objReader.Close()
    End Sub
End Class

''' <summary>
''' method to read through a text file a line at
''' a time searcing for a particular value that is
''' passed into the method
''' </summary>
''' <param name="value">value we are looking for</param>
''' <returns>the value we're looking for</returns>
Public Function FindValue(ByVal value As String) As String
	'variable to hold the return value
	Dim returnValue As String = String.Empty
	'open your file
	Dim reader As New StreamReader("C:\MyFile")
	'now use Peek to loop through each line
	While reader.Peek() >= 0
		'create a variable to hold the current line in
		Dim line As String = reader.ReadLine()
		'now use an if statement to check the value of the current line
		If line = value Then
			'do your work here
			returnValue = line
			'since we have our value we need to exit the loop
			Exit While
		End If
	End While
	'return the value
	Return returnValue
End Function