Автор: Пользователь скрыл имя, 29 Февраля 2012 в 02:16, курсовая работа
В современной рыночной экономике и жесткой конкуренции, в условиях переходного периода, в котором находится Украина сегодня, довольно актуальным стал вопрос об экономии и рациональном использовании материальных ресурсов.
Ведение 2
Значение и анализ материальных ресурсов. 4
1.1. Значение, задачи и источники анализа материальных ресурсов. 4
1.2.Анализ обеспеченности предприятия материальными ресурсами. 6
1.4.Анализ прибыли на гривну материальных затрат. 9
Практическая часть 18
Заключение 21
Приложение 1 23
Dim a, b, c As Integer
Dim Q, Q1, Q2, Q3 As Double
Private Sub CommandButton1_Click()
Q = a * b
TextBox7.Text = CDbl(Q)
Q1 = c / Q * 100
TextBox8.Text = CDbl(Q1)
Q2 = (c - Q) / b
TextBox9.Text = CDbl(Q2)
Q3 = Q2 * b
TextBox10.Text = CDbl(Q3)
End Sub
Private Sub CommandButton2_Click()
UserForm1.Hide
End Sub
Private Sub Frame1_Click()
End Sub
Private Sub Label1_Click()
End Sub
Private Sub Label2_Click()
End Sub
Private Sub Label3_Click()
End Sub
Private Sub TextBox1_Change()
a = CInt(TextBox1.Text)
End Sub
Private Sub TextBox10_Change()
End Sub
Private Sub TextBox2_Change()
b = CInt(TextBox2.Text)
End Sub
Private Sub TextBox3_Change()
c = CInt(TextBox3.Text)
End Sub
Private Sub TextBox7_Change()
End Sub
Private Sub TextBox8_Change()
End Sub