After a bit of Research and trial i found a solution to the above question. Below code line is actual beginning of it.
store = _session.Stores.GetSharedMailbox("Example shared mailbox ");
Below is the code to find the folder in the shared mailbox you need to find.
Dim Rclass As Redemption.RDOStore
Dim oTempFolders As Redemption.RDOFolders
Dim oTempFolder As Redemption.RDOFolder
Rclass = oRDOSession.Stores.GetSharedMailbox(aFolders(0))
oTempFolders = Rclass.IPMRootFolder.Folders
For i = 1 To oTempFolders.Count
oTempFolder2 = oTempFolders.Item(i)
If oTempFolder2.Name.ToLower = "folder name" Then
oTempFolder = oTempFolder2
Exit For
End If
Next
Hope this helps someone who comes accross this issue.