دوست عزیز پیشنهاد می کنم یک ماژول اینجاد کرده و در ماژول یک تابع به نام زیر تعریف کنید 


Public Function getInt() As Integer

getInt = Int((300 - 200 + 1) * Rnd + 200)

End Function


بعد شرط کوئری رو به نام تابع تغییر بدین . فکر کنم حل بشه . موفق باشین


http://h63.ir