Предыдущая страница реферата | 13  14  15  16  17  18  19  20  21  22  23

M:

Text1.SetFocus

End Sub

Расчёт показателя рентабельности продаж:

Private Sub Rprodaj_Click()

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Label1.Caption = "Рентабельность продаж"

Text1.Text = InputBox("Чистая прибыль", "Рентабельность продаж")

Text2.Text = InputBox("Валовый доход (выручка)", "Рентабельность продаж")

If Text1.Text = "" Then GoTo M

If Text2.Text = "" Then GoTo M a = Text1.Text b = Text2.Text

Rpr = (a / b)

Label8.Caption = Rpr

Text3.Text = Rpr

If Rpr > 0.6 Then Label8.ForeColor = &HC000&

If Rpr < 0.6 Then Label8.ForeColor = &HFF&

If Rpr < 0.6 Then MsgBox ("Рентабельность продаж меньше нормы(0,6)!!!")

M:

Text1.SetFocus

End Sub

Заключение

Основной задачей бизнес-плана является получение целостной, системной оценки перспектив инвестиционного проекта, что невозможно без оценки финансового состояния предприятия, его рентабельности и платежеспособности.
С этой точки зрения бизнес-план выступает как форма представления результатов предварительного технико-экономического обоснования проектов.
От того, насколько достоверно и обоснованно изложены и оценены потребности и результаты инвестиционного проекта, то есть от того, насколько грамотно составлен бизнес-план, во многом зависит не только возможность привлечения дополнительных источников финансирования, но и успех и эффективность производственно-хозяйственной деятельности предприятия в целом.

Данная программа позволяет рассчитывать результаты финансовой деятельности и оценить финансовое положение предприятия, например, если коэффициент текущей ликвидности < 2 (норма), то программа сообщает о том, что предприятие не платежеспособно и выделяет полученное значение красным цветом, в противном случае – зелёным.

Так же при вычислении коэффициентов утраты (восстановления) платежеспособности, при значении

Скачали данный реферат: Kon'jakov, Veveja, Коренев, Zhirov, Арий, Фокин, Podorov.
Последние просмотренные рефераты на тему: шпаргалки по математике, рефераты по психологии, новшество, реферат машины.



Предыдущая страница реферата | 13  14  15  16  17  18  19  20  21  22  23

Поделитесь этой записью или добавьте в закладки