N = (L / Z) * 100 Label3.Caption = N ‘ If N >= 85 Then Label4.Caption = «5» End If If N < 85 And N >= 60 Then Label4.Caption = «4» End If If N < 60 And N >= 30 Then Label4.Caption = «3» End If If N < 30 Then Label4.Caption = «2» End If End Sub
Сурет 13.
Жазылған кодқа түсініктеме:
Label1.Caption = Z – мұнда орындалған тапсырмалардың саны енгізіледі.
Label2.Caption = L – мұнда дұрыс орындалған тапсырмалар саны енгізіледі.
N = (L / Z) * 100 – тапсырманы орындау пайызы есептелінеді.
Label3.Caption = N – орындалған тапсырманың пайыздық үлесі көрсетіледі.
If N >= 85 Then Label4.Caption = «5» – Егер де орындалған тапсырманың пайызы 85 %<= болса, «Баға» «5»
End If If N < 85 And N >= 60 Then Label4.Caption = «4» –Егер де орындалған тапсырманың пайызы 60- 85% аралығында болса, онда «Баға» «4».
End If If N < 60 And N >= 30 Then Label4.Caption = «3» – Егер де орындалған тапсырманың пайызы 30- 60% аралығында болса, онда «Баға» «3».
End If If N < 30 Then Label4.Caption = «2» Егер де орындалған тапсырманың пайызы 30-дан төмен болса, онда «Баға» «2».
End If End Sub б) Енді «Шығу» батырмасын сипаттаймыз.
Private Sub CommandButton2_Click() Slide5.Application.Quit End Sub Код редактор терезесін жауып бағдарламаны сақтаймыз, содан кейін орындауға жіберіп тексереміз.