بدست آوردن روند بالای یک عدد

[sajad_boj70]

با سلام خدمت همه دوستان
میخواستم بدونم چه جوری میشه روند بالای یک عدد رو بدست آورد
به این معنا که هر عدد اعشاری رو به بزرگترین عدد نزدیک خودش تبدیل کنه
مثلا 4.1 برابر بشه با 5 یا مثلا 3.2 برابر بشه با 4
با تشکر

[vbhamed]

سلام

Function RondHigh(x)

RondHigh = Int(x) + 1

End Function

Private Sub Form_Load()

MsgBox RondHigh(3.2)

End

End Sub