Ja, det stemmer nok, se f.eks. her:
Private Function GetTripBetweenStops(ByVal stop1 As String, ByVal stop2 As String, Optional ByVal entries As Integer = 5) As List(Of Trippattern)
Dim jsonQuery As String = "{trip(from:{place: """ & stop1 & """} to: {place: """ & stop2 & """} modes: [bus] numTripPatterns: " & entries & ") { tripPatterns { startTime endTime duration walkDistance legs {mode distance line {id publicCode name } }}}}"
Dim result As String = RunQuery(jsonQuery)
Dim enTurJson As EnTur = JsonConvert.DeserializeObject(Of EnTur)(result)
Return enTurJson.data.trip.tripPatterns
End Function
Der står det "modes: [bus]". Det er kun buss. Jeg har ikke fått til å legge inn flere elementer i den, men det skal være mulig spørre etter "tram". En mulighet er å kopiere funksjonen og lage en ny "GetTripBetweenStopsForTram" og endre [bus] til [tram].