I ran across this post on Stack Overflow. Here is the code I ended up using:

Dim count = (From x In db.Orders Where x.OrderID = orderID From y In x.OrderDetails Select y).Count