Too many arguments to 'Public Sub Close()'.
Can someone point me in the right dircetion?
Expand|Select|Wrap|Line Numbers
- Public Class HelloWorld
- Private Sub btnHello_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnHello.Click
- Dim vName As String
- vName = txtName.Text
- MsgBox("Hello World" & vName)
- End Sub
- Private Sub btnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnExit.Click
- End
- End Sub
- Private Sub btnDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDisplay.Click
- 'Declare variables
- Dim vFile As String
- Dim vInputString As String
- Dim iInput
- 'Create memory space for input file
- iInput = FreeFile()
- 'Pick up the file
- vFile = "C:\Users\Black & Gold\Documents\School work\402 VB.zip"
- 'Loop through all entries in the file
- Do Until EOF(iInput)
- LineInput("#iInput, vInputString")
- MsgBox(vInputString)
- Loop
- 'Housekeeping
- Close("#iInput")
- End Sub
- End Class