The resultset returned by your stored procedure does not specify a column name. When you try to read the
column, you will get an error, because there is no such column in the resultset.
Add a column alias in your stored procedure:
SELECT sum(subtotal) As subtotal FROM ...
Or access the column by index instead of name:
Me.lblWeeklyRevenue.Text = Convert.ToString(sdr(0))