One way to achieve this is by using the NavigationComplete server event as for example in the code below:
Dim scheduler As RadScheduler = DirectCast(sender, RadScheduler)
If e.Command = SchedulerNavigationCommand.SwitchToSelectedDay Then
scheduler.SelectedView = SchedulerViewType.AgendaView
Hope this will be helpful.
Check out the Telerik Platform - the only platform that combines a rich set of UI tools with powerful cloud services to develop web, hybrid and native mobile apps.