ايران ويج

یک دستور با مثالش می خواهم که مشخص کنه آیا یک درایو قابل خواندن است یا نه .مثالی برای کار کردن با دستور IsRezady یا دستوری مشابه آن؟

function IsAready() as boolean
on error goto100
a$ = dir("A:\")
f = true
exit function
100: f = false
end function