Vise en besked hvis data til repeater er tom

Hvordan for jeg Repeateren ikke til at blive vist vist der ikke er nogle data, og aktiveret en label i stedet!

Bruger en sub til at hente data til en vilkår repeater - code følger:



BDUser(Repeater1)

     
Sub BDUser(ByVal element As Repeater)
        Dim Connection = New System.Data.SqlClient.SqlConnection
        Connection.ConnectionString = ConfigurationManager.ConnectionStrings("XXXXX").ConnectionString

        Dim Command = New System.Data.SqlClient.SqlCommand
        Command.CommandText = "[YYYYYY]"
        Command.CommandType = System.Data.CommandType.StoredProcedure
        Command.Connection = Connection

        Dim parameterItemId1 As SqlParameter ' UserId
        parameterItemId1 = Command.CreateParameter()
        parameterItemId1.ParameterName = "@UserId"
        parameterItemId1.Direction = ParameterDirection.Input
        parameterItemId1.SqlDbType = SqlDbType.Int
        parameterItemId1.Value = 99
        Command.Parameters.Add(parameterItemId1)

        Connection.Open()
        Dim DataReader As SqlDataReader
        DataReader = Command.ExecuteReader(CommandBehavior.CloseConnection)

        element.DataSource = DataReader
        element.DataBind()


        Connection.Close()
        Command.dispose()
        Connection.Dispose()
  End Sub

?:-) karsten_larsen