How do I initialise the reader

Dim ConnectionString As String = "Data Source= (LocalDB)\MSSQLLocalDB"
Dim Connection As New SqlConnection(ConnectionString)
Connection.Open()
Dim Command As New SqlCommand("SELECT * FROM Table")
Dim Reader As SqlDataReader
Reader = Command.ExecuteReader()
Dim DT As New DataTable()
DT.Load(Reader)
Connection.Close()
ReservationsDVG.DataSource = DT