Query a User's Schedule for Open Time Slots Using VB.NET in Microsoft Dynamics CRM 2011

This illustration shows how to query a user's schedule for open time blocks using VB.NET  in Microsoft Dynamics CRM 2011 with QueryScheduleRequest.

Dim reqWAI As New WhoAmIRequest()
Dim respWAI As WhoAmIResponse = DirectCast(_serviceProxy.Execute(reqWAI), WhoAmIResponse)

Dim reqSchedule As New QueryScheduleRequest()
reqSchedule.ResourceId = respWAI.UserId
reqSchedule.Start = DateTime.Now
reqSchedule.End = DateTime.Today.AddDays(3)
Dim tmc As New TimeCode()
tmc = TimeCode.Available
reqSchedule.TimeCodes = New TimeCode() {TimeCode.Available}

Dim respSchedule As QueryScheduleResponse = DirectCast(slos.Execute(reqSchedule), QueryScheduleResponse)

If respSchedule.TimeInfos.Length > 0 Then
    'act on timeslots
Else
    'user has no free time that meets these parameters
End If

If you need help instantiating a service object in .NET within a plugin check out this post:
http://mileyja.blogspot.com/2011/04/instantiating-service-object-within.html

I hope this helps!
-