Se ti crei una funzione che ti riempe un dataset e lo carica nel report, non risulta senza bisogno di file .xsd.
Una cosa del tipo

Private Function SetDataSource (ByVal conn As String, ByVal query As String, ByVal dataSet As DataSet)

Dim oleConn As New OleDbConnection(conn)
Dim oleAdapter As New OleDbDataAdapter()
oleAdapter.SelectCommand = New OleDbCommand(query, oleConn)

' carico il dataset
oleAdapter.Fill(dataSet, "Utenti")

' Passo il dataset al report
Report.SetDataSource(dataSet)

End Function

Dopo aver ovviamente definito la report come New CrystalReport