Вывод даты в Грид виде ДД/ММ/ГГГГ - VB

Формулировка задачи:

Неподскажители вы мне как вывести дату на грид в виде ДД/ММ/ГГГГ, хотя в БД она сидит в виде ДД/ММ/ГГГГ но высвечивается на грид в виде ММ/ДД/ГГГГ

Set rs = New ADODB.Recordset
 
rs.CursorType = adOpenDynamic
rs.CursorLocation = adUseClient
rs.LockType = adLockPessimistic
sql='select name, expdate from tbl_depo'
rs.Open sql, 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + App.Path + 'datapreparat.mdb;Jet OLEDB:Database Password=1111'
Set grid.DataSource = rs
rs.Close
Set rs = Nothing

сласибо !!!

Решение задачи: «Вывод даты в Грид виде ДД/ММ/ГГГГ»

textual
                            Листинг программы 
                        
                            mu = '#' & tm(1) & '/' & tm(0) & '/' & tm(2) & '#'
dat1.RecordSource = 'Select * From Basa  Where [' & cboRad & ']   = ' & mu