Using a Sub multiple times

[Yoxy99]

Hello , I have an array that I run from two buttons and for each buttons event it has the exact same code except one button reads from 1 text file and the other button reads from a different text file. How can I use this code one time instead of having to use it for both buttons but be able to change the one line of code that tells it which file to read from?

 

[ZmrAbdulla]

Suppose you have a function like this

    Function Message(ByRef CTL As Control, ByVal MSG As String) As String
        Return MessageBox.Show(MSG & " from " & CTL.Name)
    End Function

You will call it from button1 or button2 like this

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        Message(sender, "Good morning")
    End Sub

    Private Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        Message(sender, "Hello")
    End Sub

________________________________________________________
Zameer Abdulla
Help to find Missing people

 

[mmilan]

Public sub ReadFromFile(vstrFileName as string)
...
'This function is written such that in reads the file pointed to in the argument... 
...
end sub

public sub ButtonHandler(sender as Object, e as EventArgs) Handles but1.Click, but2.click

	if sender is but1 then 
		ReadFromFile("File1.txt")
	elseif sender is but2 then 
		ReadFromFile("File2.txt")
	endif

end sub

(Not tested)