How do I retrieve the return value from a stored procedure with VB as the calling code

See more:

capture

Using VB 2012 and SQL Server 2012. Written and tested stored procedure to return a value depending upon success of procedure. Stored procedure works perfectly, but I am having difficulty writing the code correctly to retrieve the return value so I can process it.

What keeps getting returned to my variable is a -1. This happens regardless of whether NOCOUNT is set to ON or OFF.

What I have tried:

SQL Server stored procedure:

USE [BEClientData]
GO
/****** Object: StoredProcedure [dbo].[sprocAuthorizeLogin] Script Date: 9/20/2016 9:35:48 AM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author: Stan Bibbs
-- Create date: 18 Sep 2016
-- Description: Check login submission
-- =============================================
ALTER PROCEDURE [dbo].[sprocAuthorizeLogin]
-- Add the parameters for the stored procedure here
@Username nvarchar(20) = 0,
@Password nvarchar(20) = 0

AS

BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;


-- Insert statements for procedure here
IF EXISTS(SELECT Username, Password
FROM dbo.SignInTable
WHERE Username = @Username AND Password = @Password)

RETURN 2

ELSE

RETURN 1

END

VB function which calls procedure:

Public Function ValidateLogin(ByVal strUsername As String, ByVal strPassword As String) As Integer

Dim intExists As Integer

Dim cn As New SqlConnection(My.Settings.BEClientDataConnectionString)

Dim procName As String = "sprocAuthorizeLogin"
Dim cmd As New SqlCommand(procName, cn)
With cmd
.CommandType = CommandType.StoredProcedure
.CommandText = procName
.Parameters.Add("@Username", SqlDbType.NVarChar, 20).Value = strUsername
.Parameters.Add("@Password", SqlDbType.NVarChar, 20).Value = strPassword
End With

cn.Open()

intExists = cmd.ExecuteNonQuery()

Return intExists