Private Sub CommandButton1_Click()
If TextBox5 <> "" And TextBox7 <> "" And TextBox8 <> "" Then
Dim tuş1 As Double, tuş2 As Double, tuş3 As Double, tuş4 As Double, tuş5 As Double, sonuç As Double
tuş1 = TextBox5.Value
tuş3 = TextBox7.Value
tuş4 = TextBox8.Value
If sonuç < 90 Then
tuş2 = 15...