Dim DBConn as OleDBConnection
Dim DBCommand as OleDBDataAdapter
Dim DSPageData as New DataSet
DBConn = New OleDbConnection ("Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=C:\web\Orion_!"& _
".mdb")

DBCommand = New OleDbDataAdapter ("Select Name + ' ' + FirstName + ' ' + MidName as Сотрудник, Post as Должность, TimeVal as [Дата и время] from Orion", DBConn)
DBCommand.Fill (DSPageData, _
"SignIn9")

Подскажите, как можно по нажатии кнопочки полученный результат запроса вывести в Excel.