statement invalid outside type block

I have the following code that gives me the subject error. How can I fix it?

Sub ShowEmailInfo()
     EmailInfo("email@email.com", "jbkLeftovers", "jbkNoPricePage") As String
End Sub

Function EmailInfo(strAddresses As String, LOqry As String, NPPqry As String)
     MsgBox "Your email is:" & strAddresses & " string 1 is:" & LOqry & " string 2 is:" & NPPqry
End Function