Список проголосовавших за комментарий "ES1667, <br/> Все изучил--код рабочий. Особое спасибо за вот это:<br/> Dim dS#, dComiss#. Ибо переменные надо объявлять правильно--это очень важно. <br/> <br/> Вопросы: <br/> 1) почему нельзя проверять на равенство floating point?<br/> 2) Что делает команда CInt(dS>0). CInt(dS)--преобразует dS в целую. А CInt(dS>0)?"